เพื่ออำนวยความสะดวกในการสร้างฟังก์ชั่นแผนภูมิ 3 มิติฉันได้รวบรวมรหัสของฟังก์ชั่นเพื่อสร้างแผนภูมิพาย 3 มิติภายใต้ ASP ซึ่งสะดวกสำหรับทุกคนที่จะใช้ในสถานการณ์พิเศษ
-
'ความหมายของพารามิเตอร์ (อาร์เรย์, พิกัดแนวนอน, พิกัดแนวตั้ง, ความกว้างของแผนภูมิ, ความสูงของแผนภูมิ, ชื่อแผนภูมิ, หน่วย)
functionTable2 (stat_array, table_left, table_top, all_width, all_height, table_title, หน่วย)
dimbg_color (10), พาย (10)
bg_color (1) = "#ff1919"
bg_color (2) = "#ffff19"
bg_color (3) = "#1919ff"
bg_color (4) = "#19ff19"
bg_color (5) = "#fc0"
bg_color (6) = "#3cc"
bg_color (7) = "#ff19ff"
bg_color (8) = "#993300"
bg_color (9) = "#f60"
bg_color (10) = "#ff8c19"
num = ubund (stat_array, 1)
AllValues = 0
fori = 1Tonum
AllValues = AllValues+Stat_Array (i, 1)
ต่อไป
k = 0
fori = 1Tonum-1
พาย (i) = formatNumber (stat_array (i, 1)/allvalues, 4, -1)
k = k+พาย (i)
ต่อไป
พาย (num) = formatNumber ((1-k), 4, -1)
Response.write "<v: shapetypeId = 'cake_3d'coordsize =' 21600,21600'o: spt = '95'adj =' 11796480,5400'path = 'Al10800,10800@0@2,10800,10800,10800,10800,10800
Response.write "<v: shapeTypeId = '3dtxt'CoordSize =' 21600,21600'O: spt = '136'adj =' 10800'Path = 'M@7, l@8, m@5,21600L@6,21600E'>"
Response.write "<v: pathTextPathok = 't'o: connectYpe =' custom'o: connectlocs = '@9,0;@10,10800;@11,21600;@12,10800'O: Connectangles =' 270,180,90,0,0,0 '/>>"
Response.write "<v: textPathon = 't'fitshape =' t '/>"
Response.write "<o: lockv: ext = 'edit'text =' t'shapetype = 't'/>"
Response.write "</v: shapetype>"
Response.write "<v: rectid = 'background'style =' ตำแหน่ง: สัมบูรณ์; ซ้าย:" & table_left & "px; top:" & table_top & "px; width:" & all_width & "px; ความสูง:" & all_height & "px;
Response.write "<v: shadowon = 't'type =' single'color = 'silver'offset =' 4pt, 4pt '/>"
Response.write "</v: rect>"
Response.write "<v: GroupId = 'table'style =' ตำแหน่ง: สัมบูรณ์; ซ้าย:" & table_left & "px; top:" & table_top & "px; width:" & all_width & "px; ความสูง:" & all_height & "px; 'Coordsize =' 21000,11500 '>"
Response.write "<v: rectstyle = 'ตำแหน่ง: สัมพัทธ์; ซ้าย: 500; top: 200; ความกว้าง: 20000; ความสูง: 800'filled =' false'stroked = 'false'>"
Response.write "<v: textboxinset = '0pt, 0pt, 0pt, 0pt'>"
Response.write "<TableWidth = '100%' border = '0'align =' center'cellspacing = '0'>"
Response.write "<tr>"
Response.write "<tdalign = 'center'valign =' middle '> <divstyle =' font-size: 15pt; font-family: bold; '> <b>" & table_title & "</b> </div> </td>"
Response.write "</tr>"
Response.write "</table>"
Response.write "</v: textbox>"
Response.write "</v: rect>"
Response.write "<v: rectid = 'back'style =' ตำแหน่ง: สัมพัทธ์; ซ้าย: 500; ด้านบน: 1000; ความกว้าง: 20000; ความสูง: 10,000;
Response.write "<v: fillrotate = 't'angle ='-45'Focus = '100%' type = 'gradient'/>"
Response.write "</v: rect>"
Response.write "<v: rectid = 'back'style =' ตำแหน่ง: ญาติ; ซ้าย: 15000; top: 1400; ความกว้าง: 5000; ความสูง:" & ((num+1)*9000/11+200) & "; 'fillcolor ='#9cf'stroked = 't'strokecolor ='#
Response.write "<v: fillrotate = 't'angle ='-175'Focus = '100%' type = 'gradient'/>"
Response.write "<v: shadowon = 't'type =' single'color = 'silver'offset =' 3pt, 3pt '/>"
Response.write "</v: rect>"
Response.write "<v: rectstyle = 'ตำแหน่ง: สัมพัทธ์; ซ้าย: 15500; ด้านบน: 1500; ความกว้าง: 4000; ความสูง: 700'FillColor ='#000000'stroked = 'f'strokecolor ='#000000 '>"
Response.write "<v: textboxSet = '8pt, 4pt, 3pt, 3pt'style =' font-size: 11pt; '> <divalign =' left '> <fontcolor ='#ffffff '> <b> ทั้งหมด:
Response.write "</v: rect>"
fori = 1Tonum
Response.write "<v: rectid = 'rec" & i & "' style = 'ตำแหน่ง: ญาติ; ซ้าย: 15400; ด้านบน:" & i*9000/11+1450 & "; ความกว้าง: 4300; ความสูง: 800;
Response.write "<v: fillopacity = '. 6'Color2 =' Filldarken (118) 'o: opacity2 ='. 6'rotate = 't'method =' linearsigma'focus = '100%' type = 'gradient'/>"
Response.write "</v: rect>"
Response.write "<v: rectstyle = 'ตำแหน่ง: ญาติ; ซ้าย: 15500; ด้านบน:" & i*9000/11+1500 & "; ความกว้าง: 600; ความสูง: 700'fillcolor ='" & bg_color (i) & "stroked = 'f'/>"/> "
Response.write "<v: rectstyle = 'ตำแหน่ง: ญาติ; ซ้าย: 16300; ด้านบน:" & i*9000/11+1500 & "; ความกว้าง: 3400; ความสูง: 700'filled =' f'stroked = 'f'>"
Response.write "<v: textboxSet = '0pt, 5pt, 0pt, 0pt'style =' font-size: 9pt; '> <divalign =' left '>" & stat_array (i, 2) & ":" att_array (i, 1)
Response.write "</v: rect>"
ต่อไป
Response.write "</v: Group>"
K1 = 180
K4 = 10
fori = 1Tonum
Response.write "<ahref = aaa.asp>"
k2 = 360*พาย (i)/2
K3 = K1+K2
ifk3> = 360 จากนั้น
K3 = K3-360
endif
kkk = (-11796480*พาย (i) +5898240)
K5 = 3.1414926*2*(180- (K3-180))/360
r = all_height/2
txt_x = table_left+all_height/8-30+r+r*sin (k5)*0.7
txt_y = table_top+all_height/14-39+r+r*cos (k5)*0.7*0.5
titlestr = "ชื่อ:" & stat_array (i, 2) & "ค่า:" & stat_array (i, 1) & หน่วย & "เปอร์เซ็นต์:" & พาย (i)*100 & "%"
Response.write "<divstyle = 'เคอร์เซอร์: hand;'>"
Response.write "<v: shapeId = 'cake" & i & "' type = '#cake_3d'title ='" titlestr & "'"
Response.write "style = 'ตำแหน่ง: Absolute; ซ้าย:" & Table_left+all_height/8 & "px; top:" & table_top+all_height/14 & "px; width:" & all_height & "px; ความสูง:" & all_height & "px;
Response.write "adj = '" & kkk & ", 0'FillColor ='" & bg_color (i) & "'onMouseOver =' MoveUp (เค้ก" & i & "," & (table_top+all_height /14) & ", txt" & i & ", rec" & i & ") '; onmouseout =' movedown (เค้ก" & i & "," & (table_top+all_height/14) & ", txt" & i & ", rec" & "); '>"
Response.write "<v: fillopacity = '60293f'Color2 =' filllighten (120) 'o: opacity2 =' 60293f'rotate = 't'angle ='-135'method = 'linearsigma'focus =' 100%'type =' Gradient '/>
Response.write "<o: extrusionv: ext = 'view'on =' t'backdepth = '25'rotationAnstor =' 60'ViewPoint = '0,0'ViewPointOrigin =' 0,0'SKEWAMT = '0'lightPosition ='-50000, -50000'lightPosition2 = '50000'/>
Response.write "</v: Shape>"
Response.write "<v: shapeId = 'txt" & i & "' type = '#3dtxt'style =' ตำแหน่ง: Absolute; ซ้าย:" & txt_x & "px; top:" & txt_y & "px; z-index: 20;
Response.write "onMouseOver = 'ontxt (เค้ก" & i & "," & (table_top+all_height/14) & ", txt" & i & ", rec" & i & ")'>"
Response.write "<v: fillopacity = '60293f'Color2 =' filllighten (120) 'o: opacity2 =' 60293f'rotate = 't'angle ='-135'method = 'linearsigma'focus =' 100%'type =' Gradient '/>
Response.write "<v: textPathStyle = 'font-family:' 安 '; v-text-kern: t'trim =' t'fitpath = 't'string ='" พาย (i)*100 & "%'/>"
Response.write "<o: extrusionv: ext = 'view'backdepth =' 8pt'on = 't'lightposition =' 0,0'lightposition2 = '0,0'/>"
Response.write "</v: Shape>"
Response.write "</div>"
K1 = K1+K2*2
ifk1> = 360 จากนั้น
K1 = K1-360
endif
ifk1> 180 จากนั้น
K4 = K4+1
อื่น
K4 = K4-1
endif
Response.write "</a>"
ต่อไป
endfunction
-
<htmlxmlns: v = "urn: schemas-microsoft-com: vml" xmlns: o = "urn: schemas-microsoft-com: Office: Office">
<head>
<title> </title>
<style>
v/:*{พฤติกรรม: url (#เริ่มต้น#vml)}
o/:*{พฤติกรรม: url (#เริ่มต้น#vml)}
</style>
</head>
<body>
<scriptLanguage = "JavaScript">
-
onit = true
num = 0
functionMoveup (iteam, top, txt, rec) {
temp = eval (iteam)
Tempat = eval (บนสุด)
temptxt = eval
temprec = eval
ที่ = parseint (temp.style.top)
temprec.style.display = "";
ถ้า (num> 27) {
temptxt.style.display = "";
-
