موصى به: إحصائيات وقت تنفيذ رمز برنامج ASP في المرة الأولى التي أكتب فيها فئة ASP ، تنفيذ الوظائف: وقت تنفيذ برنامج الإحصائيات المجزأة ، جدول إحصاءات الإخراج ، إلخ
| ما يلي هو المحتوى المقتبس: <٪ دالة Table2 (Total ، Table_X ، Table_y ، all_width ، all_height ، line_no) معنى المعلمة (تم تمرير صفيف ، الإحداثيات الأفقية ، الإحداثيات العمودية ، عرض الرسم البياني ، ارتفاع الرسم البياني ، عدد الخطوط) يقوم رمز ASP النقي بإنشاء مخطط دالة المخططين "المؤلف: Gong Ming (PasswordGM) QQ: 25968152 MSN: [email protected] البريد الإلكتروني: [email protected] "أنا على استعداد للغاية للتواصل والمناقشة مع ASP و VML و Flash Atmans على http://topclouds.126.com الإصدار 1.0 آخر تاريخ تم تعديله 2003-8-11 شكرا جزيلا لك على استخدام هذه الوظيفة. يرجى الاحتفاظ بمعلومات حقوق الطبع والنشر عند استخدام وإعادة الطباعة. هذا هو أفضل احترام لعمل المؤلف. line_color =#69f Left_width = 70 TOTAL_NO = UBUND (المجموع ، 1) temp1 = 0 لأني = 1 إلى total_no ل j = 1 إلى line_no إذا temp1 <total (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 آخر temp3 = 5 إنهاء إذا temp4 = temp3 Response.write <v: rect id = '_x0000_s1027' alt = '' 'style =' position: absomute ؛ left: & table_x left_width & px ؛ top: & table_y & px ؛ width: 't' angle = '-45' Focus = '100 ٪' Type = 'Gradient'/> </v: rect> لأني = 0 إلى all_height-1 الخطوة all_height/5 repart.write <v: line id = '_x0000_s1027' alt = '' 'style =' الموضع: aboor ؛ اليسار: 0 ؛ نص النص: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width length & px ، & table_y all_hight-length-i left_width & px ، & table_y all_height-length-i & px 'strokecolor =' & line_color & '/> desponse.write <v: line id = '_x0000_s1027' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x (left_width-15) & px ، &y i & px 'to =' & table_x ، استجابة استجابة. write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: absert ؛ left: & table_x & px ؛ top: & table_y i & px ؛ width: استجابة. write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'right'> temp4 = temp4-temp3/5 التالي repart.write <v: line id = '_x0000_s1027' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width & px ، & table_y all_height & px 'to =' all_height & px '/> استجابة. write <v: line id = '_x0000_s1027' alt = '' 'style =' الموضع: aboor ؛ اليسار: 0 ؛ align-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width & px ، & table_y & px 'to' dim line_code redim line_code (line_no ، 5) ل I = 1 إلى line_no line_temp = split (total (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) استجابة. write <v: معرف السطر = _x0000_s1025 alt = style = 'الموضع: aboor ؛ اليسار: 0 ؛ align-align: left ؛ top: 0 ؛ z-index: 1' from = & x1 & px ، & y1 & px to = & x2 & px ، & y2 & px تنسيق = 21600،21600 strokeweight = & line_code (j ، 2) &> حدد case line_code (j ، 3) الحالة 1 الحالة 2 استجابة. write <v: Stroke DashStyle = '1 1'/> الحالة 3 استجابة. write <v: Stroke DashStyle = 'Dash'/> الحالة 4 استجابة. write <v: Stroke DashStyle = 'DashDot'/> الحالة 5 استجابة. write <v: Stroke DashStyle = 'Longdash'/> الحالة 6 استجابة. write <v: stroke dashstyle = 'longdashdot'/> الحالة 7 استجابة. write <v: Stroke DashStyle = 'longdashdotdot'/> حالة أخرى نهاية الاختيار استجابة. write </v: line> & chr (13) حدد case line_code (j ، 4) الحالة 1 الحالة 2 استجابة. write <v: rect id = _x0000_s1027 style = 'الموضع: absolute ؛ اليسار: & x1-2 & px ؛ top: & y1-2 & px ؛ width: 4px ؛ الارتفاع: 4px ؛ z-index: 2' fillcolor = & line_code (j ، 1) & strokecolor = & line_code ( الحالة 3 استجابة. write <v: id id = _x0000_s1026 style = 'الموضع: absolute ؛ اليسار: & x1-2 & px ؛ top: & y1-2 & px ؛ width: 4px ؛ height: 4px ؛ z-index: 1' fillcolor = & line_code (j ، 1) & strokecolor = & line_code (j ، 1) نهاية الاختيار التالي حدد case line_code (j ، 4) الحالة 1 الحالة 2 استجابة. write <v: rect id = _x0000_s1027 style = 'الموضع: absolute ؛ اليسار: & x2-2 & px ؛ top: & y2-2 & px ؛ width: 4px ؛ الارتفاع: 4px ؛ z-index: 2' fillcolor = & line_code (j ، 1) & strokecolor = & line_code ( الحالة 3 استجابة. write <v: Oval id = _x0000_s1026 style = 'الموضع: absolute ؛ اليسار: & x2-2 & px ؛ top: & y2-2 & px ؛ width: 4px ؛ height: 4px ؛ z-index: 1' fillcolor = & line_code (j ، 1) & strokecolor = & line_code (j ، 1) نهاية الاختيار التالي لأني = 1 إلى total_no Response.write <v: line id = '_x0000_s1027' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width all_width*(i-1)/total_no & px all_width*(i-1)/total_no & px ، & table_y all_height 15 & px '/> استجابة reponse.write <v: earm id = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'position: absert ؛ left: all_height & px ؛ العرض: & all_width/total_no & px ؛ الارتفاع: 18px ؛ z-index: 1 '> reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'left' التالي tb_height = 30 استجابة. write <v: rect id = '_x0000_s1025' style = 'الموضع: absolute ؛ اليسار: & table_x all_width 20 & px ؛ top: & table_y & px ؛ width: 100px ؛ height: ل I = 1 إلى line_no استجابة. write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: aboor ؛ left: & table_x all_width 25 & px ؛ top: & table_y 10 (i-1) reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'left'> & line_code (i ، 5) & </td> Response.write <v: rect id = '_x0000_s1040' alt = '' 'style =' position: aboor ؛ left: & table_x all_width 80 & px ؛ top: & table_y 10 (i-1)*tb_height 4 & px '& line_code (i ، 1) &' rotate = 't' focus = '100 ٪' type = 'gradient'/> </v: rect> التالي وظيفة نهاية ٪> <٪ الدالة Table1 (Total ، Table_X ، Table_y ، سمك ، Table_Width ، all_width ، all_height ، table_type) 'معنى المعلمة (تم تمرير مجموعة ، الإحداثي الأفقي ، الإحداثي العمودي ، سمك العمود ، عرض العمود ، عرض الرسم البياني ، ارتفاع المخطط ، نوع الرسم البياني) يولد رمز ASP النقي وظيفة الرسم البياني 1 - مخطط شريط "المؤلف: Gong Ming (PasswordGM) QQ: 25968152 MSN: [email protected] البريد الإلكتروني: [email protected] "أنا على استعداد للغاية للتواصل والمناقشة مع ASP و VML و Flash Atmans على 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 لأني = 1 إلى total_no إذا temp1 <total (i ، 1) temp1 = total (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 آخر temp3 = 5 إنهاء إذا temp4 = temp3 Response.write <!-[if gte vml 1]> <v: rect id = '_x0000_s1027' alt = '' 'style =' position: absolute ؛ left: & table_x left_width & px ؛ top: stroked = 'f'> <v: fill rotate = 't' angle = '-45' focus = '100 ٪' type = 'gradient' // </v: rect> <! [endif]-> desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'position: absert ؛ left: 0 ؛ alt-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1' from = '& table_x left_widt & px ، & ally all_we. left_width & px ، & table_y all_height & px '/> <! [endif]-> desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width & px ، left_width & px ، & table_y all_height & px '/> <! [endif]-> حدد CASE TABLE_TYPE الحالة أ table_space = (all_width-table_width*total_no)/total_no desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_wid length & px ، Length & px ، & table_y all_height-length & px 'strokecolor =' & line_color & '/> <! [endif]-> لأني = 0 إلى all_height-1 الخطوة all_height/5 desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' 'style =' position: absert ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width & px ، & ablied_y all_height- Left_width Length & px ، & table_y all_height-i & px 'strokecolor =' & line_color & '/> <! [endif]-> desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' 'style =' position: abort ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_wid length & px all_width left_width & px ، & table_y all_height-length-i & px 'strokecolor =' & line_color & '/> <! [endif]-> repart.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'position: absert ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1' from = '& table_x (left_wid-15) left_width & px ، & table_y i & px '/> <! [endif]-> Response.write <!-[إذا GTE VML 1]> استجابة. write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: absert ؛ left: & table_x & px ؛ top: & table_y i & px ؛ width: reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'right'> & temp4 & </td> </tr> </v: temp4 = temp4-temp3/5 التالي لأني = 1 إلى total_no temp_space = table_x left_width table_space/2 table_space*(i-1) table_width*(i-1) reponse.write <v: rect id = '_x0000_s1025' alt = '' 'style =' position: aboor ؛ left: استجابة. write temp_space استجابة. كتابة PX ؛ TOP: استجابة. write table_y all_height*(1- (المجموع (i ، 1)/temp3)) استجابة. write px ؛ width: & table_width & px ؛ الارتفاع: & all_height*(total (i ، 1)/temp3) & px ؛ z-index: 1 'fillColor =' & tb_color (i ، 2) & '>>> استجابة. write <v: fill color2 = '& tb_color (i ، 1) &' rotate = 't' type = 'gradient'/> reponse.write <o: proude v: ext = 'view' backdepth = '& shight & pt' color = '& tb_color (i ، 2) &' on = 't'/> استجابة. write </v: rect> reponse.write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: absert ؛ left: & temp_space & px ؛ top: 15 & px ؛ الارتفاع: 18px ؛ z-index: 1 '> reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'center'> & total (i ، 1) repart.write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' 'style =' الموضع: abselute ؛ left: & temp_space-table_space/2 & px ؛ top: reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'center'> & total (i ، 2) التالي الحالة ب table_space = (all_height-table_width*total_no)/total_no desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'position: absert ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1' from = '& table_x left_wid length & px all_width & px ، & table_y all_height-length & px 'strokecolor =' & line_color & '/> <! [endif]-> ل i = 0 إلى all_width-1 الخطوة all_width/5 desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' style = 'position: absert ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1' from = '& table_x left_wid i & px ، & ably_y all_high طول I & PX ، & table_y all_height & px 'strokecolor =' & line_color & ' /> <! [endif]-> desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' 'style =' position: abort ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_wid length i & px Left_width طول i & px ، & table_y & px 'strokecolor =' & line_color & ' /> <! [endif]-> desponse.write <!-[if gte vml 1]> <v: line id = '_x0000_s1027' alt = '' 'style =' position: abort ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ flip: y ؛ z-index: -1 'from =' & table_x left_width i all_width/5 & px ، left_width i all_width/5 & px ، & table_y all_height 15 & px '/> <! [endif]-> Response.write <!-[إذا GTE VML 1]> Response.write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: abser ؛ left: & table_x left_width i all_width/5-left_width & px ؛ top: & all_hight & px ؛ width: '> reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'right'> & temp4 & </td> </tr> </v: temp4 = temp4-temp3/5 التالي لأني = 1 إلى total_no temp_space = table_space/2 table_space*(i-1) table_width*(i-1) reponse.write <v: rect id = '_x0000_s1025' alt = '' 'style =' position: aboor ؛ left: استجابة. write table_x left_width استجابة. كتابة PX ؛ TOP: استجابة. write table_y temp_space استجابة. write px ؛ width: & all_width*(total (i ، 1)/temp3) & px ؛ height: استجابة. write <v: fill color2 = '& tb_color (i ، 1) &' rotate = 't' angle = '-90' focus = '100 ٪' type = 'bradient'/> reponse.write <o: proude v: ext = 'view' backdepth = '& shight & pt' color = '& tb_color (i ، 2) &' on = 't'/> استجابة. write </v: rect> repart.write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: abser ؛ left: 15 & px ؛ الارتفاع: 18px ؛ z-index: 1 '> reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'center'> & total (i ، 1) استجابة. write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: absert ؛ left: & table_x & px ؛ top: & table_y temp_space & px ؛ width: reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'right'> & total (i ، 2) التالي حالة أخرى نهاية الاختيار وظيفة نهاية ٪> <٪ الدالة Table3 (Total ، Table_X ، Table_y ، all_width ، all_height ، table_type) 'معنى المعلمة (تم تمرير صفيف ، الإحداثي الأفقي ، الإحداثي العمودي ، عرض الرسم البياني ، الارتفاع ، نوع الرسم البياني) "مخطط الرسم البياني لتوليد رمز ASP النقي وظيفة 3-PIE "المؤلف: Gong Ming (PasswordGM) QQ: 25968152 MSN: [email protected] البريد الإلكتروني: [email protected] "أنا على استعداد للغاية للتواصل والمناقشة مع ASP و VML و Flash Atmans على 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 لأني = 1 إلى total_no TotalPie = TotalPie Total (i ، 1) التالي preangle = 0 لأني = 1 إلى total_no repart.write <v: earm id = '_x0000_s1025' alt = '' 'style =' position: apport ؛ left: & table_x & px ؛ top: & table_y & px ؛ width: 'M750،700ae750،700،750،700 ، & int (23592960*preangle) & ، & int (23592960*total (i ، 1)/totalpie) & xe' fillcolor = '& tb_color (i ، 1) rotate = 't' focus = '100 ٪' type = 'gradient'/> <v: stroke joinstyle = 'Round'/> <v: formulas/> <v: path o: connecttype = 'secments' // </v: form> & chr (13) Preangle = Preangle Total (I ، 1)/TotalPie التالي إذا table_type = a ثم استجابة. write <v: rect id = '_x0000_s1025' style = 'الموضع: absolute ؛ اليسار: & table_x all_width 20 & px ؛ top: & table_y 20 & px ؛ width: 100px ؛ height: & total_no*tb_hight 20 & px ؛ z-index: 1'/ لأني = 1 إلى total_no استجابة. write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: abser ؛ left: & table_x all_width 25 & px ؛ top: & table_y 30 (i-1) reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'left' Response.write <v: rect id = '_x0000_s1040' alt = '' 'style =' position: absomute ؛ left: color2 = '& tb_color (i ، 2) &' rotate = 't' focus = '100 ٪' type = 'gradient'/> </v: rect> "عرض النسبة "response.write <v: form id = '_x0000_s1025' type = '#_x0000_t202' alt = '' 'style =' position: apport ؛ left: & table_x all_width 110 & px ؛ top: "reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'left '> & formatnumber (total (i ، 1)*100/totalpie ، 2 ، -1) & ٪ </td> </tr> </table> </table> </v: textbox> </v: mapple> التالي إنهاء إذا إذا table_type = b ثم فطيرة = 3.14159265358979 Temppie = 0 لأني = 1 إلى total_no Tempangle = PIE*2*(Total (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 إنهاء إذا استجابة. write <v: Oval id = '_x0000_s1027' style = 'الموضع: absolute ؛ left: & x1-2 & px ؛ top: Response.write <v: line id = '_x0000_s1025' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ z-index: 1 'from =' & x1 & px ، & y1 & px 'to =' & x2 & px ، strokeweight = '1px'> </v: line> Response.write <v: line id = '_x0000_s1025' alt = '' 'style =' position: aboor ؛ left: 0 ؛ text-align: left ؛ top: 0 ؛ z-index: 1 'from =' & x2 & px ، & y2 & px 'to =' & x3 & px ، strokeweight = '1px'> </v: line> reponse.write <v: شكل معرف = '_x0000_s1025' type = '#_x0000_t202' alt = '' style = 'الموضع: aboor ؛ left: & x4 & px ؛ top: reponse.write <v: textbox inset = '0px ، 0px ، 0px ، 0px'> <table cellpacing = '3' cellpadding = '0' width = '100 ٪' height = '100 ٪'> <tr> <td align = 'left'> & total (i ، 0) & & formatnumber (Total (i ، 1)*100/totalpie ، 2 ، -1) & ٪ </td> </tr> </table> </table> </v: textbox> </v: mapple> Temppie = Temppie Total (I ، 1)/TotalPie التالي إنهاء إذا وظيفة نهاية ٪> وظيفة تخطيط رمز ASP النقي وظيفة 1 - مثال على مخطط الشريط <٪ إجمالي قاتمة (7،2) المجموع (1،1) = 200 المجموع (2،1) = 800 المجموع (3،1) = 1000 المجموع (4،1) = 600 المجموع (5،1) = 1222 المجموع (6،1) = 3213 المجموع (7،1) = 8 المجموع (1،2) = أخبار الأعمال الصينية المجموع (2،2) = موقع التوظيف المجموع (3،2) = 51JOB المجموع (4،2) = أخبار Xinmin المسائية المجموع (5،2) = أخبار الأخبار المسائية المجموع (6،2) = عطلة نهاية الأسبوع الجنوبية المجموع (7،2) = أخبار يانغشنغ المسائية Total_no = 7 ٪> <html xmlns: v = urn: schemas-microsoft-com: vml xmlns: o = urn: schemas-microsoft-com: Office: Office> <!-[if! mso]> <style> v/:* {السلوك: url (#default#vml)} o/:* {السلوك: url (#افتراضي#vml)} .shape {السلوك: url (#الافتراضي#vml)} </style> <! [endif]-> <head> <meta http-equiv = content-type content = text/html ؛ charset = gb2312> <title> </title> <style> td {font-size: 9pt} </style> </head> <body topmargin = 5 leftMargin = 0 scroll = auto> <L Table1 (Total ، 200،20،20،30،400،200 ، a) ٪> <L Table1 (Total ، 200،320،20،20،400،250 ، b) ٪> </body> </html> |
مشاركة: رمز يوجه تنفيذ FTP وإزالة الضغط باستخدام ASP Trojans أعتقد أن كل شخص لديه بعض اللوحة بالميناء 80. إذا كان محليًا ، فلا تنظر إلى الأمان. إذا كنت لا تريد أن تنظر إلى الأسفل ، فقد تنظر أيضًا. أنا قبيح جدًا لمحاولة جذب الانتباه. إن أكثر الأشياء إثارة للقلق حول وضع موقع ويب على شعاع هو تحديث وتحميل عدد كبير من الملفات.