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

¼òÒ×ASPÎļþ»º´æ¼¼Êõ

 ×¢Ò⣺ϵͳÐèÒªFSOȨÏÞ¡¢XMLHTTPȨÏÞ
ϵͳ°üÀ¨Á½¸öÎļþ£¬Æäʵ¿ÉÒԺϲ¢ÎªÒ»¸ö¡£Ö®ËùÒÔ·ÖΪÁ½¸öÊÇÒòΪ²¿·Öɱ¶¾Èí¼þ»áÒòΪÀï±ßº¬ÓÐFSO¡¢XMLHTTP²Ù×÷¶ø±»ÈÏΪÊǽű¾Ä¾Âí¡£
µ÷ÓÃʱ£¬ÐèÒªÔÚASPÒ³ÃæµÄ×îÉϱ߰üº¬Ö÷Îļþ£¬È»ºóÔÚϱßдÏÂÒÔÏ´úÂë
Set MyCatch=new CatchFile
MyCatch.Overdue=60*5        'Ð޸ĹýÆÚʱ¼äÉèÖÃΪ5¸öСʱ
if MyCatch.CatchNow(Rev) then
        response.write MyCatch.CatchData
        response.end
end if
set MyCatch=nothing
¸´ÖÆ´úÂë
ÎļþÒ»£ºFileCatch.asp µÄ´úÂë
<!--#include file="FileCatch-Inc.asp"-->
<%
'---- ±¾ÎļþÓÃÓÚÇ©ÈëԭʼÎļþ£¬ÊµÏÖ¶ÔÒ³ÃæµÄÎļþCatch
'---- 1¡¢Èç¹ûÎļþÇëÇóΪPOST·½Ê½£¬ÔòÈ¡Ïû´Ë¹¦ÄÜ
'---- 2¡¢ÎļþµÄÇëÇó²»Äܰüº¬ÏµÍ³µÄʶ±ð¹Ø¼ü×Ö
'---- 3¡¢×÷Õß ºÎֱȺ (www.wozhai.com)
Class CatchFile
        Public Overdue,Mark,CFolder,CFile '¶¨Òåϵͳ²ÎÊý
        Private ScriptName,ScriptPath,ServerHost '¶¨Òå·þÎñÆ÷/Ò³Ãæ²ÎÊý±äÁ¿
        Public CatchData        'Êä³öµÄÊý¾Ý
        Private Sub Class_Initialize        '³õʼ»¯º¯Êý
                '»ñµÃ·þÎñÆ÷¼°½Å±¾Êý¾Ý
                ScriptName=Request.Servervariables("Script_Name") 'ʶ±ð³öµ±Ç°½Å±¾µÄÐéÄâµØÖ·
                ScriptPath=GetScriptPath(false)        'ʶ±ð³ö½Å±¾µÄÍêÕûGETµØÖ·
                ServerHost=Request.Servervariables("Server_Name") 'ʶ±ð³öµ±Ç°·þÎñÆ÷µÄµØÖ·
                '³õʼ»¯ÏµÍ³²ÎÊý
                Overdue=30        'ĬÈÏ30·ÖÖÓ¹ýÆÚ
                Mark="NoCatch"        'ÎÞCatchÇëÇó²ÎÊýΪ NoCatch
                CF


Ïà¹ØÎĵµ£º

Ò»¸öASPµÄ¸ß¼¶Ä£°åÒýÇæ

Õâ¸öÄ£°åÒýÇæ±È½Ï·½±ã,¸úHTML½áºÏÁË
Class template
Private c_Char, c_Path, c_FileName, c_Content, c_PageUrl, c_CurrentPage, c_PageStr, ReplacePageStr
Private TagName

' ***************************************
' ÉèÖñàÂë
' ***************************************
Public Property Let Char( ......

Asp¸üÐÂÊý¾Ý¿âµÄ¼¸ÖÖ·½·¨

aspÖвåÈëÓëÐÞ¸ÄÊý¾ÝµÄ¼¸ÖÖ·½Ê½¡£ÎªÁË·½±ã½â˵£¬ÎÒÃÇÏȽ¨Á¢Ò»¸öÃûΪtestµÄ±í£¬±íÄÚÖ»ÓÐÁ½¸öÊý¾Ý
Ïî:usernameºÍemail,·Ö±ðÓÃÀ´´æ´¢Óû§ÃûÓëÓÊÏ䵨ַ¡£
1.ÀûÓÃinsertÓï¾ä²åÈëÊý¾Ý£º
insertÊÇsqlÓï¾äµÄ»ù±¾Ö¸ÁîÖ®Ò»£¬ Ó÷¨ºÜ¼òµ¥£¬ÕâÀïÎÒÖ»½«Æä»ù±¾¸ñʽÁгö.
´úÂëÈçÏ£º
       set conn=s ......

ASP¸ß¼¶¼¼Êõ¾«Ñ¡¼¯

ASP¸ß¼¶¼¼Êõ¾«Ñ¡¼¯
 
Ò»¡¢GetRowsµÄʹÓ÷½·¨£º
<%
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("test.mdb")
Set Rs=Server.CreateObject("Adodb.Recordset")
Rs.Open "Select Top 2 * from ±íÃû",conn,0,1 &nb ......

aspÖÐÓÃjmail£¬Cdonts×é¼þºÍAspemail×é¼þ·¢Óʼþ


JMAIL°²×°ÅäÖÃ
jmail·¢ËÍÓʼþµÄʵÀý´úÂëÍøÉϺܶà.µ«ÊÇÓÐЩϸ½ÚÈç¹û²»ÅäÖúÃ,·¢ËÍʧ°ÜµÄ¿ÉÄÜÐԺܴó.
Ê×ÏÈ˵Ã÷Ò»ÏÂjmail°²×°ÅäÖò½Öè:
1. JMail ÏÂÔØµØÖ·
http://hbdx3.skycn.com/down/w3JMail43Personal.exe
2.°²×°
±¾ÈËÔÚWindows 2003ÏÂÃæÅäÖÃ,ÆäËüϵͳ»¹Ã»ÓвâÊÔ.
°²×°µ½Ä¿Â¼±ÈÈç: C:\Program Files\Dimac\w3JMai ......

AccessÊý¾Ý¿âÖвéѯÊý×éÀàÐÍ×ֶεÄASP´úÂëSQLÓï·¨

 ½ñÌìÔÚÐÞ¸ÄÒÔǰ¿ª·¢µÄÒ»¸öÍøÕ¾µÄʱºòÓöµ½Ò»¸öÎÊÌ⣬ÒòΪ¹¦ÄܵÄÐèÒª£¬ÒÔǰµÄÒ»¸öÊý×ÖÀàÐÍ×ֶθıäΪÎı¾×ֶΣ¬ÒòΪÕâ¸ö×Ö¶ÎÐèÒª°üº¬¶à¸öÀà±ðµÄID£¬ÒÔǰÕâ¸ö×Ö¶ÎÖ»¶ÔÓ¦Ò»¸öIDµÄ¡£
ÍøÕ¾ÊÇASP VBÓïÑԵģ¬Êý¾Ý¿âʹÓõÄÊÇAccess
ÐÞ¸ÄÊý¾ÝÀàÐÍÖ®ºóǰ̨µÄ²éѯ´úÂë¾Í²»ÄÜʹÓÃÖîÈçxID=1ÕâÖÖÌõ¼þÁË¡£ÓÉÓÚÏÖÔÚ¸Ã×ֶαäΪÎı¾ÀàÐ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ