asp̽Õë
<%@ Language="VBScript" %>
<%' Option Explicit %>
<%
'²»Ê¹ÓÃÊä³ö»º³åÇø£¬Ö±½Ó½«ÔËÐнá¹ûÏÔʾÔÚ¿Í»§¶Ë
Response.Buffer = False
'ÉùÃ÷´ý¼ì²âÊý×é
Dim ObjTotest(26,4)
ObjTotest(0,0) = "MSWC.AdRotator"
ObjTotest(1,0) = "MSWC.BrowserType"
ObjTotest(2,0) = "MSWC.NextLink"
ObjTotest(3,0) = "MSWC.Tools"
ObjTotest(4,0) = "MSWC.Status"
ObjTotest(5,0) = "MSWC.Counters"
ObjTotest(6,0) = "IISSample.ContentRotator"
ObjTotest(7,0) = "IISSample.PageCounter"
ObjTotest(8,0) = "MSWC.PermissionChecker"
ObjTotest(9,0) = "Scripting.FileSystemObject"
ObjTotest(9,1) = "(FSO Îı¾Îļþ¶Áд)"
ObjTotest(10,0) = "adodb.connection"
ObjTotest(10,1) = "(ADO Êý¾Ý¶ÔÏó)"
ObjTotest(11,0) = "SoftArtisans.FileUp"
ObjTotest(11,1) = "(SA-FileUp ÎļþÉÏ´«)"
ObjTotest(12,0) = "SoftArtisans.FileManager"
ObjTotest(12,1) = "(SoftArtisans Îļþ¹ÜÀí)"
ObjTotest(13,0) = "LyfUpload.UploadFile"
ObjTotest(13,1) = "(ÁõÔÆ·åµÄÎļþÉÏ´«×é¼þ)"
ObjTotest(14,0) = "Persits.Upload.1"
ObjTotest(14,1) = "(ASPUpload ÎļþÉÏ´«)"
ObjTotest(15,0) = "w3.upload"
ObjTotest(15,1) = "(Dimac ÎļþÉÏ´«)"
ObjTotest(16,0) = "JMail.SmtpMail"
ObjTotest(16,1) = "(Dimac JMail ÓʼþÊÕ·¢) <a href="http://www.ajiang.net" mce_href="http://www.ajiang.net">ÖÐÎÄÊÖ²áÏÂÔØ</a>"
ObjTotest(17,0) = "CDONTS.NewMail"
ObjTotest(17,1) = "(ÐéÄâ SMTP ·¢ÐÅ)"
ObjTotest(18,0) = "Persits.MailSender"
ObjTotest(18,1) = "(ASPemail ·¢ÐÅ)"
ObjTotest(19,0) = "SMTPsvg.Mailer"
ObjTotest(19,1) = "(ASPmail ·¢ÐÅ)"
ObjTotest(20,0) = "DkQmail.Qmail"
ObjTotest(20,1) = "(dkQmail ·¢ÐÅ)"
ObjTotest(21,0) = "Geocel.Mailer"
ObjTotest(21,1) = "(Geo
Ïà¹ØÎĵµ£º
ÔÚÍøÉÏ¿´µ½ºÜ¶àÕâ·½ÃæµÄ´úÂ룬µ«ÊÇÓÐЩÊDz»ÄÜÓã¬ÓÐЩÊÇÀ¬»ø´úÂëÌ«¶à£¬ÎÒ¼òµ¥µÄÐÞ¸ÄÁËÒ»ÏÂÏÖÔÚÓë´ó¼Ò¹²Ïíһϡ£
<%
Option Explicit
dim databasename '¶¨ÒåÊý¾Ý¿âÃû³Æ
databasename="database.mdb" 'Êý¾Ý¿âÃû³Æ
dim databasepath '¶¨ÒåÊý¾Ý¿â´æ·Å·¾¶
......
Active Server Pages ÌṩÄÚ½¨¶ÔÏó£¬ÕâЩ¶ÔÏóʹÓû§¸üÈÝÒ×ÊÕ¼¯Í¨¹ýä¯ÀÀÆ÷ÇëÇó·¢Ë͵ÄÐÅÏ¢¡¢ÏìÓ¦ä¯ÀÀÆ÷ÒÔ¼°´æ´¢Óû§ÐÅÏ¢£¨ÈçÓû§Ê×Ñ¡Ï¡£±¾ÎļòҪ˵Ã÷ÿһ¸ö¶ÔÏó¡£
Application ¶ÔÏó
¿ÉÒÔʹÓà Application ¶ÔÏóʹ¸ø¶¨Ó¦ÓóÌÐòµÄËùÓÐÓû§¹²ÏíÐÅÏ¢¡£
Request ¶ÔÏó
¿ÉÒÔʹÓà Request ¶ÔÏó·ÃÎÊÈκÎÓà HTTP Çë ......
×î¼òµ¥ÓÃVB°Ñasp·â×°³ÉdllµÄÈëÃųÌÐò
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½<%%>±êǩ֮¼äµÄ´úÂë,²¢ÇÒÖ´ÐÐËü(Ò²¿ÉÒÔÊÇ<scri ptrunat=server></script....>Ö®¼äµÄ´úÂë).Èç¹ûÕâ¸öASP³ÌÐòÔÚÏÈǰ±»µ÷Óùý,ÄÇôËü¾Í»áÓÃÄÚ´æÖеıàÒë¹ýµÄ³ÌÐòÀ´ÏòÓû§·µ»ØHTML´úÂë,Èç¹ûûÓÐ,ÄÇôËü¾ÍÖØÐ±àÒë.Õ ......
'º¯ÊýÃû£ºCodeCookie
'×÷ ÓãºCookie·ÀÂÒÂëдÈëʱÓÃ
'²Î Êý£ºstr ---- ×Ö·û´®
'·µ»ØÖµ£ºÕûÀíºóµÄ×Ö·û´®
'ʾ Àý£º
'**************************************************
Public Function CodeCookie(str)
If is ......
¡¡ 'º¯ÊýÃû£ºGetMyTimeNumber()
'×÷ ÓãºÉú³Éʱ¼äµÄÕûÊý
'²Î Êý£ºlx ---- ʱ¼äÕûÊýµÄÀàÐÍ
' lx=0 µ½·ÖÖÓ lx=1 µ½Ð¡Ê± lx=2 µ½Ìì lx=3 µ½ÔÂ
'·µ»ØÖµ£ºÉú³Éʱ¼äµÄÕûÊýÖµ(×îСµ½·ÖÖÓ)
'ʾ Àý£º
'********************************* ......