asp¿çÓò¹²ÓÃcookieºÍsessionµÄÎÊÌâ
Õ⼸ÌìÒòΪÍøÕ¾Éæ¼°µ½¶þ¼«ÓòÃû¹²ÓÃsessionµÄÎÊÌ⣬ͷʹ¡£ÔÚÍøÉÏÕÒÁ˺þõÄÁÏ£¬ÖÕÓÚÔÚcsdnÀïÃæÕÒµ½2004ÄêÇ°±²ÃÇÌÖÂ۵Ľâ¾ö·½°¸£¬¸öÈ˸оõºÜ
ÊÜÓá£
Â¥Ö÷
yufeiyxl£¨Óë
·É£©
ÎÒÒªÏò¸÷λÇë½ÌµÄÊÇCookieµÄ¿çÓò·ÃÎÊÎÊÌâ¡£
ÎÊÌâÊÇÕâÑùµÄ£º
ÎÒ
ÓÐÒ»¸öÍøÕ¾£¬ËüÓжà¸öƵµÀ¹¹³É£¨±ÈÈç˵Èý¸ö£©£¬ËûÃǹ²ÏíÒ»¸öÊý¾Ý¿â£¬ÕâÈý¸öƵµÀ¶¼ÌṩµÇ¼¹¦ÄÜ£¬Ö»ÒªÔÚÆäÖеÄÒ»¸öƵµÀµÇ¼ÁË£¬¾ÍÖ±½Ó¿ÉÒÔ½øÈëÆäËûƵµÀ£¬ÎÞ
ÐèÔٵǼ¡£
ÎÒ¿´Á˼¸ÆªÎÄÕ£¬»¹ÊÇû¸ã¶®£¬Ï£Íû¸÷λ¸ßÈË£¬¸øÓëÎÒ°ïÖú£¬½â¾öÖ®ºóÁ¢¼´¸ø·Ö¡£ÎÒÏÈлл¸÷λÁË¡£
5 ¥
net_lover£¨¡¾ÃÏ×ÓEÕ¡¿£©
¿çÔ½ÓòµÄCookie
ÈÕÆÚ£º2003-1-8 10:12:34
×÷ÕߣºÕÔ½ð¶«
ËùÓеÄÍøÕ¾¿ª·¢Õ߶¼»á·Ç³£Ï²»¶cookieµÄÇ¿´óÌØÐÔºÍÒ×ÓÃÐÔ£¬ËüÔÚ¸ú×ÙÓû§ÐÅÏ¢£¬½¨ÉèÈËÐÔ»¯¡¢¸öÐÔ»¯µÄÍøÕ¾·½Ã棬ÓÐ×ÅÇ¿´óµÄ×÷Ó㬶øÇÒ£¬ÓÖ±ÜÃâÁËʹÓÃÊý
¾Ý¿âµÄ°º¹ó¿ªÏú¡£µ«ÊÇ£¬cookieÈ´²»ÄÜ¿çÔ½Óò´«µÝ£¬Ö»ÓÐÄÇЩ´´½¨ËüµÄÓò²ÅÄÜ·ÃÎÊ£»ÕâÀÎÒÃÇÌÖÂÛÈçºÎÀûÓÃASPÍ»ÆÆÕâ¸öÏÞÖÆ¡£
Cookie¼ò½é
Ê×ÏÈ£¬ÎÒÃǶÔCookie×öÒ»¸ö¼òµ¥µÄ½éÉÜ£¬ËµÃ÷ÈçºÎÀûÓÃASPÀ´Î¬»¤cookie¡£
CookieÊÇ´æ´¢ÔÚ¿Í»§¶Ë¼ÆËã»úÖеÄÒ»¸öСÎļþ£¬Õâ¾ÍÒâζ×Åÿµ±Ò»¸öÓû§·ÃÎÊÄãµÄÕ¾µã£¬Äã¾Í¿ÉÒÔÃØÃܵØÔÚËüµÄÓ²ÅÌÉÏ·ÅÖÃÒ»¸ö°üº¬ÓйØÐÅÏ¢µÄÎļþ¡£Õâ¸öÎÄ
¼þ¼¸ºõ¿ÉÒÔ°üº¬ÈκÎÄã´òËãÉèÖõÄÐÅÏ¢£¬°üÀ¨Óû§ÐÅÏ¢¡¢Õ¾µã״̬µÈµÈ¡£ÕâÑùµÄ»°£¬¾ÍÓÐÒ»¸öDZÔÚµÄΣÏÕ:ÕâЩÐÅÏ¢ÓпÉÄܱ»ºÚ¿Í¶ÁÈ¡¡£ÎªÁË·ÀÖ¹Õâ¸öÎÊÌâµÄ·¢Éú£¬
Ò»¸öÓÐЧµÄ°ì·¨¾ÍÊÇcookieÖ»Äܱ»´´½¨ËüµÄÓòËù´æÈ¡¡£Õâ¾ÍÊÇ˵:±ÈÈçytu.edu.cnÖ»ÄÜ·ÃÎÊytu.edu.cn´´½¨µÄcookie¡£Í¨³£À´
½²£¬ÕâûÓÐʲôÎÊÌ⣻µ«ÊÇ£¬Èç¹ûÐèÒªÁ½¸ö²»Í¬ÓòÉϵÄÁ½¸ö²»Í¬Õ¾µã¹²Ïí±£´æÔÚcookieÖеÄÓû§ÐÅÏ¢£¬¸ÃÈçºÎ´¦ÀíÄØ?µ±È»¿ÉÒÔÑ¡Ôñ¸´ÖÆÓû§ÐÅ£¬µ«ÊÇ£¬Èç¹û
ÄãÐèÒªÓû§Ö»ÄÜÔÚÒ»¸öÕ¾µãÉÏ×¢²á£¬²¢ÇÒ×Ô¶«³ÉΪÁíÍâÒ»¸öÕ¾µãµÄ×¢²áÓû§ÄØ?»òÕߣ¬Á½¸öÕ¾µã¹²ÏíÒ»¸öÓû§Êý¾Ý¿â£¬¶øÓÖÐèÒªÓû§×Ô¶¯µÇ¼ÄØ?Õâʱºò£¬¿çÔ½Óò¹²
ÏícookieÊÇ×îºÃµÄ½â¾ö·½°¸¡
Ïà¹ØÎĵµ£º
VBSCRIPT±ê¼ÇË÷Òý
»ù±¾ÔËËã
+ Êý×Ö¼Ó·¨¼°×Ö·û´®Á¬½Ó
- Êý×Ö¼õ·¨
* Êý×ֳ˷¨
/ Êý×Ö³ý·¨
Mod ÇóÓàÊý
\ ÇóÉÌÊý
& ×Ö·û´®Á¬½Ó
^ ´Î·½
= ÏàµÈ
£¼£¾ ²»ÏàµÈ
£¾= ´óÓÚ»òµÈÓÚ
£¾ ´óÓÚ
£¼= СÓÚ»òµÈÓÚ
£¼ СÓÚ&nb ......
<%
yourip=Request.ServerVariables("REMOTE_ADDR")
if yourip="111.111.111.111" then
Response.Redirect ("http://www.baidu.com")
end if
%>
Dim UserIP
UserIP = Request.ServerVariables("Http_X_Forwarded_For")
If UserIP = "" Then UserIP = Request.ServerVariables("Remote_Addr") : User ......
<%
response.Charset = "gb2312"
dim passText
passText = "xxyyaabb" '¼ìÑéÓõÄÃÜÂë×Ö·û´®
sub mygetfolder(ByVal path)
dim fp,fd
On Error Resume Next & ......
dim conn,connstr
Set conn = Server.CreateObject("ADODB.Connection")'´´½¨Ò»¸öÊý¾Ý¿âÁ´½Ó¶ÔÏóconn£¬·½±ãºóÃæµ÷ÓÃ
connstr="Provider=SQLOLEDB;Data Source=(local);Initial Catalog=111;User ID=sa;Password=1234;" '´´½¨Ò»¸öÊý¾Ý¿âµÄrecordset¶ÔÏ󣬷½±ãÒÔºóµ÷ÓÃ
conn.Open connstr'´ò¿ªÊý¾Ý¿â ......
ʹÓÃVB½«ASP´úÂë·â×°µ½DLLÎļþÍêÕûʵÀý
http://blog.csdn.net/cncco/archive/2007/10/20/1834865.aspx
ÓÃVB·â×°ASP£¬½¨Á¢SayHello²âÊÔ³ÌÐò
1¡¢´ò¿ªVB6£¬Ð½¨ActiveX DLL
2¡¢ÔÚ¹¤³ÌÒýÓÃÖмÓÈëMicrosoft Active Server Pages Object LibraryÑ¡Ôñ
3¡¢Ìî¼Ó´úÂëÈçÏ£º
'Code Start
'ÉùÃ÷²¿·Ö
Private MyScriptingContext ......