แนะนำ: สถิติเวลาดำเนินการรหัสโปรแกรม ASP ครั้งแรกที่ฉันเขียนคลาส ASP ใช้ฟังก์ชั่น: เวลาดำเนินการโปรแกรมสถิติแบ่งส่วนตารางสถิติเอาท์พุท ฯลฯ รหัสโปรแกรม: ต่อไปนี้เป็นเนื้อหาอ้างอิง: คลาส CCCLSProcessTimerecOrder ''
| ต่อไปนี้เป็นเนื้อหาที่ยกมา: - ฟังก์ชั่นตารางที่ 2 (ทั้งหมด, table_x, table_y, all_width, all_height, line_no) 'ความหมายของพารามิเตอร์ (อาร์เรย์ที่ผ่าน, พิกัดแนวนอน, พิกัดแนวตั้ง, ความกว้างของแผนภูมิ, ความสูงของแผนภูมิ, จำนวนเส้น) 'รหัส ASP บริสุทธิ์สร้างแผนภูมิแผนภูมิ 2 บรรทัด 'ผู้แต่ง: กงหมิง (รหัสผ่าน) QQ: 25968152 msn: [email protected] อีเมล: [email protected] 'ฉันเต็มใจที่จะสื่อสารและพูดคุยกับ ASP, VML และผู้ที่ชื่นชอบแฟลชที่ http://topclouds.126.com 'เวอร์ชัน 1.0 วันที่แก้ไขล่าสุด 2003-8-11 'ขอบคุณมากสำหรับการใช้ฟังก์ชั่นนี้ โปรดเก็บข้อมูลลิขสิทธิ์เมื่อใช้และพิมพ์ซ้ำ นี่คือความเคารพที่ดีที่สุดสำหรับงานของผู้เขียน line_color =#69f left_width = 70 total_no = ubund (ทั้งหมด, 1) temp1 = 0 สำหรับ i = 1 ถึง total_no สำหรับ j = 1 ถึง line_no ถ้า temp1 <ทั้งหมด (i, j) ดังนั้น temp1 = ทั้งหมด (i, j) ต่อไป ต่อไป temp1 = int (temp1) ถ้า Temp1> 9 แล้ว temp2 = mid (cstr (temp1), 2,1) ถ้า temp2> 4 แล้ว temp3 = (int (temp1/(10^(len (cstr (temp1))-1))) 1)*10^(len (cstr (temp1))-1) อื่น temp3 = (int (temp1/(10^(len (cstr (temp1))-1))) 0.5)*10^(len (cstr (temp1))-1) สิ้นสุดถ้า อื่น ถ้า temp1> 4 temp3 = 10 else temp3 = 5 สิ้นสุดถ้า temp4 = temp3 Response.write <v: rect id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: สัมบูรณ์; ซ้าย: & table_x left_width & px; top: & table_y & px; ความกว้าง: & all_width & px; rotate = 't' angle = '-45' focus = '100%' type = 'gradient'/> </v: rect> สำหรับ i = 0 ถึง all_height-1 ขั้นตอน all_height/5 ขั้นตอน Response.write <V: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: left; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width ความยาว & px left_width & px, & table_y all_height-length-i & px 'strokecolor =' & line_color & '/> Response.write <V: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; left: 0; text-allign: left; top: 0; flip: y; z-index: -1' จาก = '& table_x (left_width-15) Response.write Response.write <v: รูปร่าง id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x & px; top: & table_y i & px; width: & left_width & px; Response.write <V: Inset กล่องข้อความ = '0px, 0px, 0px, 0px'> <ตารางการจับมืออาชีพ = '3' cellpadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'ขวา'> & temp4 & </td> </tr> temp4 = temp4-temp3/5 ต่อไป Response.write <V: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: left; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width & px all_height & px '/> Response.write <V: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; left: 0; text-allign: left; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width & px, & table_y & px' DIM LINE_CODE REDIM LINE_CODE (LINE_NO, 5) สำหรับ i = 1 ถึง line_no line_temp = แยก (ทั้งหมด (0, i) ,,) line_code (i, 1) = line_temp (0) line_code (i, 2) = line_temp (1) line_code (i, 3) = line_temp (2) line_code (i, 4) = line_temp (3) line_code (i, 5) = line_temp (4) ต่อไป สำหรับ j = 1 ถึง line_no สำหรับ i = 1 ถึง total_no-1 x1 = table_x left_width all_width*(i-1)/total_no y1 = table_y (temp3-total (i, j))*(all_height/temp3) x2 = table_x left_width all_width*i/total_no y2 = table_y (temp3-total (i 1, j))*(all_height/temp3) Response.write <V: Line ID = _x0000_S1025 ALT = style = 'ตำแหน่ง: Absolute; ซ้าย: 0; Text-ALIGN: ซ้าย; TOP; TOP: 0; Z-INDEX: 1' จาก = & X1 & PX, & Y1 & PX ถึง = & X2 & PX, & Y2 & PX strokeweight = & line_code (j, 2) &> เลือก case line_code (j, 3) กรณีที่ 1 กรณีที่ 2 Response.write <V: stroke dashstyle = '1 1'/> กรณีที่ 3 Response.write <V: stroke dashstyle = 'dash'/> กรณีที่ 4 Response.write <V: stroke dashstyle = 'dashdot'/>> กรณีที่ 5 Response.write <V: stroke dashstyle = 'longdash'/>> กรณีที่ 6 Response.write <V: stroke dashstyle = 'longdashdot'/>> กรณีที่ 7 Response.write <V: stroke dashstyle = 'longdashdotdot'/>>> กรณีอื่น สิ้นสุดเลือก Response.write </v: line> & ch (13) เลือก case line_code (j, 4) กรณีที่ 1 กรณีที่ 2 Response.write <V: rect id = _x0000_s1027 style = 'ตำแหน่ง: สัมบูรณ์; ซ้าย: & x1-2 & px; top: & y1-2 & px; ความกว้าง: 4px; ความสูง: 4px; z-index: 2' fillcolor = & line_code (J, 1) กรณีที่ 3 Response.write <V: OVAL ID = _X0000_S1026 Style = 'ตำแหน่ง: Absolute; ซ้าย: & X1-2 & PX; TOP: & Y1-2 & PX; ความกว้าง: 4PX; ความสูง: 4PX; Z-INDEX: 1' FillColor = & line_code (J, 1) สิ้นสุดเลือก ต่อไป เลือก case line_code (j, 4) กรณีที่ 1 กรณีที่ 2 Response.write <V: rect id = _x0000_s1027 style = 'ตำแหน่ง: สัมบูรณ์; ซ้าย: & x2-2 & px; top: & y2-2 & px; ความกว้าง: 4px; ความสูง: 4px; z-index: 2' fillcolor = & line_code (J, 1) กรณีที่ 3 Response.write <V: OVAL ID = _X0000_S1026 Style = 'ตำแหน่ง: Absolute; ซ้าย: & x2-2 & px; top: & y2-2 & px; ความกว้าง: 4px; ความสูง: 4px; z-index: 1' fillcolor = & line_code (J, 1) สิ้นสุดเลือก ต่อไป สำหรับ i = 1 ถึง total_no Response.write <V: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: left; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width all_width*(i-1) all_width*(i-1)/total_no & px, & table_y all_height 15 & px '/> Response.write Response.write <v: รูปร่าง id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x left_width all_width*(i-1)/total_no & px; all_height & px; width: & all_width/total_no & px; ความสูง: 18px; z-index: 1 '> Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'left'> & total (i, 0) ต่อไป tb_height = 30 Response.write <V: rect id = '_x0000_s1025' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x all_width 20 & px; top: & table_y & px; ความกว้าง: 100px; ความสูง: & line_no*tb_height 20 & px; z-index: 1'/> สำหรับ i = 1 ถึง line_no Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x all_width 25 & px; top: & table_y 10 (i-1)*tb_height & px; Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'left'> & line_code (i, 5) Response.write <v: rect id = '_x0000_s1040' alt = '' style = 'ตำแหน่ง: สัมบูรณ์; ซ้าย: & table_x all_width 80 & px; top: & table_y 10 (i-1)*tb_height 4 & px; color2 = '& line_code (i, 1) &' rotate = 't' focus = '100%' type = 'gradient'/> </v: rect> ต่อไป ฟังก์ชันสิ้นสุด - - ฟังก์ชั่นตารางที่ 1 (ทั้งหมด, table_x, table_y, ความหนา, table_width, all_width, all_height, table_type) 'ความหมายของพารามิเตอร์ (อาร์เรย์ที่ผ่าน, พิกัดแนวนอน, พิกัดแนวตั้ง, ความหนาของคอลัมน์, ความกว้างของคอลัมน์, ความกว้างของแผนภูมิ, ความสูงของแผนภูมิ, ประเภทแผนภูมิ) 'รหัส ASP บริสุทธิ์สร้างฟังก์ชั่นแผนภูมิ 1 - แผนภูมิแท่ง 'ผู้แต่ง: กงหมิง (รหัสผ่าน) QQ: 25968152 msn: [email protected] อีเมล: [email protected] 'ฉันเต็มใจที่จะสื่อสารและพูดคุยกับ ASP, VML และผู้ที่ชื่นชอบแฟลชที่ http://topclouds.126.com 'เวอร์ชัน 2.0 วันที่แก้ไขล่าสุด 2003-7-22 'ขอบคุณมากสำหรับการใช้ฟังก์ชั่นนี้ โปรดเก็บข้อมูลลิขสิทธิ์เมื่อใช้และพิมพ์ซ้ำ นี่คือความเคารพที่ดีที่สุดสำหรับงานของผู้เขียน Dim Tb_Color (7,2) tb_color (1,1) =#d1ffd1 tb_color (2,1) =#ffbbbbb tb_color (3,1) =#ffe3bb tb_color (4,1) =#cff4f3 tb_color (5,1) =#d9d9e5 tb_color (6,1) =#ffc7ab tb_color (7,1) =#ecffb7 tb_color (1,2) =#00ff00 tb_color (2,2) =#ff0000 tb_color (3,2) =#ff9900 tb_color (4,2) =#33ccccc tb_color (5,2) =#666699 tb_color (6,2) =#993300 tb_color (7,2) =#99cc00 line_color =#69f left_width = 70 ความยาว = ความหนา/2 total_no = ubund (ทั้งหมด, 1) temp1 = 0 สำหรับ i = 1 ถึง total_no ถ้า temp1 <ทั้งหมด (i, 1) ดังนั้น temp1 = ทั้งหมด (i, 1) ต่อไป temp1 = int (temp1) ถ้า Temp1> 9 แล้ว temp2 = mid (cstr (temp1), 2,1) ถ้า temp2> 4 แล้ว temp3 = (int (temp1/(10^(len (cstr (temp1))-1))) 1)*10^(len (cstr (temp1))-1) อื่น temp3 = (int (temp1/(10^(len (cstr (temp1))-1))) 0.5)*10^(len (cstr (temp1))-1) สิ้นสุดถ้า อื่น ถ้า temp1> 4 temp3 = 10 else temp3 = 5 สิ้นสุดถ้า temp4 = temp3 Response.write <!-[ถ้า gte vml 1]> <v: rect id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x left_width & px; top: & table_y & px; stroked = 'f'> <v: เติม rotate = 't' angle = '-45' focus = '100%' type = 'gradient' // </v: rect> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width & px left_width & px, & table_y all_height & px '/> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width & px left_width & px, & table_y all_height & px '/> <! [endif]-> เลือก case table_type กรณี a table_space = (all_width-table_width*total_no)/total_no Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; ด้านบน: 0; Flip: y; z-index: -1' จาก = '& table_x ความยาว & px, & table_y all_height-length & px 'strokecolor =' & line_color & '/> <! [endif]-> สำหรับ i = 0 ถึง all_height-1 ขั้นตอน all_height/5 ขั้นตอน Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width & px left_width ความยาว & px, & table_y all_height-i & px 'strokecolor =' & line_color & '/> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x all_width left_width & px, & table_y all_height-length-i & px 'strokecolor =' & line_color & '/> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width & px, & table_y i & px '/> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> Response.write <v: รูปร่าง id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x & px; top: & table_y i & px; width: & left_width & px; Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'ขวา'> & temp4 & </td> </tr> temp4 = temp4-temp3/5 ต่อไป สำหรับ i = 1 ถึง total_no temp_space = table_x left_width table_space/2 table_space*(i-1) table_width*(i-1) Response.write <v: rect id = '_x0000_s1025' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: Response.write Temp_space Response.write px; ด้านบน: Response.write table_y all_height*(1- (ทั้งหมด (i, 1)/temp3)) Response.write px; width: & table_width & px; ความสูง: & all_height*(ทั้งหมด (i, 1)/temp3) & px; z-index: 1 'fillcolor =' & tb_color (i, 2) & '> Response.write <v: เติม color2 = '& tb_color (i, 1) &' rotate = 't' type = 'gradient'/> Response.write <o: extrusion v: ext = 'view' backdepth = '& thickness & pt' color = '& tb_color (i, 2) &' on = 't'/> Response.write </v: rect> Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & temp_space & px; top: & table_y all_height*(1- (ทั้งหมด (i, 1)/temp3) 15 & px; ความสูง: 18px; z-index: 1 '> Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'center'> & ทั้งหมด (i, 1) Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & temp_space-table_space/2 & px; top: & table_y all_height 1 & px; Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'center'> & ทั้งหมด (i, 2) ต่อไป กรณี B table_space = (all_height-table_width*total_no)/total_no Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width ความยาว & px left_width all_width & px, & table_y all_height-length & px 'strokecolor =' & line_color & '/> <! [endif]-> สำหรับ i = 0 ถึง all_width-1 ขั้นตอน all_width/5 ขั้นตอน Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width i & px left_width ความยาว i & px, & table_y all_height & px 'strokecolor =' & line_color & ' /> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x left_width ความยาว left_width ความยาว i & px, & table_y & px 'strokecolor =' & line_color & ' /> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: 0; text-allign: ซ้าย; top: 0; flip: y; z-index: -1' จาก = '& table_x '& table_x left_width ฉัน all_width/5 & px, & table_y all_height 15 & px'/> <! [endif]-> Response.write <!-[ถ้า gte vml 1]> Response.write <V: รูปร่าง id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x left_width i all_width/5-left_width & px; - Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'ขวา'> & temp4 & </td> </tr> temp4 = temp4-temp3/5 ต่อไป สำหรับ i = 1 ถึง total_no temp_space = table_space/2 table_space*(i-1) table_width*(i-1) Response.write <v: rect id = '_x0000_s1025' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: response.write table_x left_width Response.write px; ด้านบน: Response.write table_y temp_space Response.write px; width: & all_width*(ทั้งหมด (i, 1)/temp3) & px; ความสูง: & table_width & px; z-index: 1 'fillcolor =' & tb_color (i, 2) & '> Response.write <V: เติม color2 = '& tb_color (i, 1) &' rotate = 't' angle = '-90' focus = '100%' type = 'gradient'/>> Response.write <o: extrusion v: ext = 'view' backdepth = '& thickness & pt' color = '& tb_color (i, 2) &' on = 't'/> Response.write </v: rect> Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x left_width all_width*(ทั้งหมด (i, 1)/temp3) ความหนา/2 & px; 15 & px; ความสูง: 18px; z-index: 1 '> Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'center'> & ทั้งหมด (i, 1) Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x & px; top: & table_y temp_space & px; Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'ขวา'> & ทั้งหมด (i, 2) ต่อไป กรณีอื่น สิ้นสุดเลือก ฟังก์ชันสิ้นสุด - - ฟังก์ชั่นตารางที่ 3 (ทั้งหมด, table_x, table_y, all_width, all_height, table_type) 'ความหมายของพารามิเตอร์ (อาร์เรย์ที่ผ่าน, พิกัดแนวนอน, พิกัดแนวตั้ง, ความกว้างของแผนภูมิ, ความสูง, ประเภทแผนภูมิ) 'แผนภูมิการสร้างรหัส ASP บริสุทธิ์ 3 พายแผนภูมิ 'ผู้แต่ง: กงหมิง (รหัสผ่าน) QQ: 25968152 msn: [email protected] อีเมล: [email protected] 'ฉันเต็มใจที่จะสื่อสารและพูดคุยกับ ASP, VML และผู้ที่ชื่นชอบแฟลชที่ http://topclouds.126.com 'เวอร์ชัน 1.0 วันที่แก้ไขล่าสุด 2003-8-11 'ขอบคุณมากสำหรับการใช้ฟังก์ชั่นนี้ โปรดเก็บข้อมูลลิขสิทธิ์เมื่อใช้และพิมพ์ซ้ำ นี่คือความเคารพที่ดีที่สุดสำหรับงานของผู้เขียน tb_height = 30 Dim Tb_Color (7,2) tb_color (1,1) =#d1ffd1 tb_color (2,1) =#ffbbbbb tb_color (3,1) =#ffe3bb tb_color (4,1) =#cff4f3 tb_color (5,1) =#d9d9e5 tb_color (6,1) =#ffc7ab tb_color (7,1) =#ecffb7 tb_color (1,2) =#00ff00 tb_color (2,2) =#ff0000 tb_color (3,2) =#ff9900 tb_color (4,2) =#33ccccc tb_color (5,2) =#666699 tb_color (6,2) =#993300 tb_color (7,2) =#99cc00 total_no = ubund (ทั้งหมด, 1) TotalPie = 0 สำหรับ i = 1 ถึง total_no TotalPie = TotalPie Total (I, 1) ต่อไป preangle = 0 สำหรับ i = 1 ถึง total_no Response.write <v: รูปร่าง id = '_x0000_s1025' alt = '' style = 'ตำแหน่ง: สัมบูรณ์; ซ้าย: & table_x & px; top: & table_y & px; width: & all_width & px; ความสูง: & all_height & px; z-index: 1' 'M750,700AE750,700,750,700, & int (23592960*preangle) &, & int (23592960*ทั้งหมด (i, 1)/totalpie) & xe' fillcolor = '& tb_color (i, 1) &' Strokecolor = '# rotate = 't' focus = '100%' type = 'gradient'/> <v: stroke joinstyle = 'round'/> <v: formulas/> <v: path o: connectype = 'เซ็กเมนต์' // </v: รูปร่าง> & chr (13) preangle = preangle ทั้งหมด (i, 1)/totalpie ต่อไป ถ้า table_type = a แล้ว Response.write <V: rect id = '_x0000_s1025' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x all_width 20 & px; top: & table_y 20 & px; ความกว้าง: 100px; ความสูง: & total_no*tb_height 20 & px; z-index: 1'/> สำหรับ i = 1 ถึง total_no Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & table_x all_width 25 & px; top: & table_y 30 (i-1)*tb_height & px; Response.write <V: Inset กล่องข้อความ = '0PX, 0PX, 0PX, 0PX'> <ตารางการจับมืออาชีพ = '3' CellPadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'left'> & total (i, 0) Response.write <V: rect id = '_x0000_s1040' alt = '' style = 'ตำแหน่ง: สัมบูรณ์; ซ้าย: & table_x all_width 80 & px; top: & table_y 30 (i-1)*tb_height 3 & px; '> <v: เติม color2 =' & tb_color (i, 2) & 'rotate =' t 'โฟกัส =' 100% 'type =' gradient '/> </v: rect> 'แสดงอัตราส่วน 'response.write <v: รูปร่าง id =' _x0000_s1025 'type ='#_x0000_t202 'alt =' 'style =' ตำแหน่ง: Absolute; ซ้าย: & table_x all_width 110 & px; top: & table_y 30 (i-1)*tb_height & px; 'response.write <v: textbox inset =' 0px, 0px, 0px, 0px '> <table cellpacing =' 3 'cellpadding =' 0 'width =' 100% 'ความสูง =' 100% '> <tr> <td allign =' ซ้าย '> & formatNumber (ทั้งหมด (i, 1)*100/totalPie, 2, -1) &%</td> </tr> </table> </table> </v: textbox> </v: shape> ต่อไป สิ้นสุดถ้า ถ้า table_type = b แล้ว PIE = 3.14159265358979 Temppie = 0 สำหรับ i = 1 ถึง total_no Tempangle = Pie*2*(ทั้งหมด (I, 1)/(TotalPie*2) Temppie) x1 = table_x all_width/2 cos (tempangle)*all_width*3/8 y1 = table_y all_height/2-sin (tempangle)*all_height*3/8 x2 = table_x all_width/2 cos (tempangle)*all_width*3/4 y2 = table_y all_height/2-sin (tempangle)*all_height*3/4 ถ้า x2> table_x all_width/2 แล้ว x3 = x2 20 x4 = x3 อื่น x3 = x2-20 x4 = x3-100 สิ้นสุดถ้า Response.write <V: OVAL ID = '_X0000_S1027' style = 'ตำแหน่ง: Absolute; ซ้าย: & x1-2 & px; top: & y1-2 & px; width: 4px; ความสูง: 4px; z-index: 2' fillcolor = '#111111' strokecolor = '#111111 Response.write <V: line id = '_x0000_s1025' alt = '' style = 'ตำแหน่ง: Absolute; left: 0; text-allign: left; top; top: 0; z-index: 1' จาก = '& x1 & px, & y1 & px' strokeweight = '1px'> </v: line> Response.write <V: line id = '_x0000_s1025' alt = '' style = 'ตำแหน่ง: Absolute; left: 0; text-allign: left; top; top: 0; z-index: 1' จาก = '& x2 & px, & y2 & px' strokeweight = '1px'> </v: line> Response.write <V: shape id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'ตำแหน่ง: Absolute; ซ้าย: & x4 & px; top: & y2-10 & px; width: 100px; ความสูง: 20px; z-index: 1'> Response.write <V: Inset กล่องข้อความ = '0px, 0px, 0px, 0px'> <ตารางการจับมืออาชีพ = '3' cellpadding = '0' width = '100%' ความสูง = '100%'> <tr> <td allign = 'left'> & total (i, 0) & & formatNumber (ทั้งหมด (I, 1)*100/TotalPie, 2, -1) &%</td> </tr> </table> </table> </v: textbox> </v: รูปร่าง> Temppie = Temppie Total (I, 1)/TotalPie ต่อไป สิ้นสุดถ้า ฟังก์ชันสิ้นสุด - แผนภูมิการสร้างรหัส ASP บริสุทธิ์ฟังก์ชั่น 1 - ตัวอย่างการโทรแผนภูมิแท่ง - สลัวทั้งหมด (7,2) ทั้งหมด (1,1) = 200 ทั้งหมด (2,1) = 800 ทั้งหมด (3,1) = 1,000 ทั้งหมด (4,1) = 600 ทั้งหมด (5,1) = 1222 ทั้งหมด (6,1) = 3213 ทั้งหมด (7,1) = 8 ทั้งหมด (1,2) = ข่าวธุรกิจของจีน ทั้งหมด (2,2) = เว็บไซต์จัดหางาน ทั้งหมด (3,2) = 51Job ทั้งหมด (4,2) = Xinmin News ทั้งหมด (5,2) = ข่าวภาคค่ำ ทั้งหมด (6,2) = สุดสัปดาห์ใต้ ทั้งหมด (7,2) = ข่าวภาคค่ำของ Yangcheng total_no = 7 - <html xmlns: v = urn: schemas-microsoft-com: vml xmlns: o = urn: schemas-microsoft-com: สำนักงาน: สำนักงาน> <!-[ถ้า! mSO]> <style> v/:* {พฤติกรรม: url (#เริ่มต้น#vml)} o/:* {พฤติกรรม: url (#เริ่มต้น#vml)} .shape {พฤติกรรม: url (#เริ่มต้น#vml)} </style> <! [endif]-> <head> <meta http-equiv = เนื้อหาประเภทเนื้อหา = text/html; charset = gb2312> <title> </title> <style> TD {FONT-SIZE: 9PT} </style> </head> <body topMargin = 5 leftMargin = 0 scroll = auto> <l ตารางที่ 1 (รวม, 200,20,20,30,30,400,200, a)%> <l ตารางที่ 1 (รวม, 200,320,20,20,400,250, b)%> </body> </html> |
แบ่งปัน: รหัสแนะนำการใช้งาน FTP และการบีบอัดโดยใช้ Trojans ASP ฉันคิดว่าทุกคนมีไก่เนื้อบางคนที่มีพอร์ต 80 ถ้าเป็นในประเทศอย่ามองลงไปเพื่อความปลอดภัย หากคุณไม่ต้องการดูถูกคุณอาจมองลงไป ฉันน่าเกลียดมากที่พยายามดึงดูดความสนใจ สิ่งที่ลำบากที่สุดเกี่ยวกับการวางเว็บไซต์บนไก่เนื้อคือการอัปเดตและอัปโหลดไฟล์จำนวนมาก