Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

3¡¢´¿ASP´úÂëÉú³Éͼ±íº¯Êý——ÕÛÏßͼ

3¡¢´¿ASP´úÂëÉú³Éͼ±íº¯Êý——ÕÛÏßͼ
<%dim total(7,3)
total(1,0)="Öйú¾­Óª±¨"
total(2,0)="ÕÐÆ¸Íø"
total(3,0)="51Job"
total(4,0)="ÐÂÃñÍí±¨"
total(5,0)="ÐÂÎÅÍí±¨"
total(6,0)="ÄÏ·½ÖÜÄ©"
total(7,0)="Ñò³ÇÍí±¨"
total(0,1)="#FF0000,1.5,1,2,¹«Ë¾1"'²ÎÊý1ÏßÌõµÄÑÕÉ«£¬²ÎÊý2ÏßÌõµÄ¿í¶È£¬²ÎÊý3ÏßÌõµÄÀàÐÍ£¬²ÎÊý4תÕÛµãµÄÀàÐÍ,²ÎÊý5ÏßÌõÃû³Æ
total(1,1)=200
total(2,1)=1200
total(3,1)=900
total(4,1)=600
total(5,1)=1222
total(6,1)=413
total(7,1)=800
total(0,2)="#0000FF,1,2,3,¹«Ë¾2"
total(1,2)=400
total(2,2)=500
total(3,2)=1040
total(4,2)=1600
total(5,2)=1
total(6,2)=813
total(7,2)=980
total(0,3)="#004D00,1,1,3,¹«Ë¾3"
total(1,3)=900
total(2,3)=890
total(3,3)=1240
total(4,3)=1300
total(5,3)=722
total(6,3)=833
total(7,3)=1280
%><html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office">
<!--[if !mso]>
<style>
v\:*         { behavior: url(#default#VML) }
o\:*         { behavior: url(#default#VML) }
.shape       { behavior: url(#default#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>
<%call table2(total,100,90,600,250,3)%>
</body>
</html>
<%
function table2(total,table_x,table_y,all_width,all_height,line_no)
'²ÎÊýº¬Òå(´«µÝµÄÊý×飬ºá×ø±ê£¬×Ý×ø±ê£¬Í¼±íµÄ¿í¶È£¬Í¼±íµÄ¸ß¶È,ÕÛÏßÌõÊý)
'´¿ASP´úÂëÉú³Éͼ±íº¯Êý——ÕÛÏßͼ
'×÷Õߣº¹¨Ãù(Passwordgm) QQ:25968152 MSN:passwordgm@sina.com Email:passwordgm@sina.com
'±¾È˷dz£Ô¸ÒâºÍASP,VML,FLASHµÄ°®ºÃÕßÔÚHTTP://www.ilisten.cn½øÐн»Á÷ºÍ̽ÌÖ
'·Ç³£¸ÐлÄúʹÓÃÕâ¸öº¯Êý£¬ÇëÄúʹÓúÍ×ªÔØÊ±±£Áô°æÈ¨ÐÅÏ¢£¬ÕâÊǶÔ×÷Õß¹¤×÷µÄ×îºÃµÄ×ðÖØ¡£
line_color="#69f"
left_width=70
total_no=ubound(total,1)


Ïà¹ØÎĵµ£º

Ô¶³Ì»ñÈ¡ÀàAsp xmlHttp

±àÕß×¢£ºÕâ¸öclassÖ÷ÒªÓÃÓÚ²Ù×÷aspÖеÄxmlhttp¡£
¡¡¡¡
Ê×ÏÈÊÇÀඨÒå Cls_AspHttp.asp£º
<%
''=================================================================
''·ÉÑïÔ¶³Ì»ñÈ¡Àà(AspHttp) 1.0.1 Bate1
''¡¡¡¡ By ±¼ÌÚµÄÐÄ
''¡¡¡¡ 2006-04-19
''=========================================================== ......

ASPÖÐÈÕÆÚÏà¼Ó¼°Ïà¼õ

ÔÚASPÖÐΪÎÒÃÇÌṩÁËרÃŵÄÈÕÆÚ¼Ó¼õº¯Êý¡£
¡¡¡¡1.ÈÕÆÚÏà¼Ó
¡¡¡¡DateAdd º¯Êý 
¡¡¡¡·µ»ØÒÑÌí¼ÓÖ¸¶¨Ê±¼ä¼ä¸ôµÄÈÕÆÚ¡£ 
¡¡¡¡DateAdd(interval, number, date) 
¡¡¡¡DateAdd º¯ÊýµÄÓï·¨ÓÐÒÔϲÎÊý 
¡¡¡¡£¨1£©interval ±ØÑ¡Ïî¡£×Ö·û´®±í´ïʽ£¬±íʾҪÌí¼ÓµÄʱ¼ä¼ä¸ô¡£ÓйØÊýÖµ£¬Çë²ÎÔÄ“ÉèÖ ......

ASPÖÐMD5¼ÓÃÜ´úÂë

<%
Private Const BITS_TO_A_BYTE = 8
Private Const BYTES_TO_A_WORD = 4
Private Const BITS_TO_A_WORD = 32
Private m_lOnBits(30)
Private m_l2Power(30)

Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then
LShift = lValue
Exit Function
ElseIf iShiftBi ......

aspÕýÔò±í´ïʽÅжÏÊÇ·ñÊÇÊý×Ö

'ÅжÏÊÇ·ñÊÇÊý×Ö£¨°üÀ¨ÕûÊýºÍ¸¡µãÊý£©
function IsNumber(str)
if RegPatrn("^-?[1-9]\d*$",str) or RegPatrn("^-?([1-9]\d*\.\d*|0\.\d*[1-9]\d*|0?\.0+|0)$",str) then
IsNumber=true
else
IsNumber=false
end if
end function
'ÕýÔò±í´ïʽÅжÏÊÇ·ñÆ¥Åä
Function RegPatrn(patrn, strng)
RegPatrn = false
Di ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ