vbscript&javascript 操作cookie

javascript:

  1. <SCRIPT language="javascript">  
  2. function setCookie(sVar, sVal){  
  3. theCookie = sVar + '=' + sVal + '; expires=Fri, 1 Jul 2010 09:45:27 UTC';  
  4. document.cookie = theCookie;  
  5. }  
  6.   
  7. function getCookie(sVar){  
  8. cookies = document.cookie.split('; ');  
  9. for(var i = 1; i <= cookies.length; i++){  
  10.     if(cookies[i - 1].split('=')[0] == sVar){  
  11.      return cookies[i - 1].split('=')[1];  
  12.     }  
  13. }  
  14. return '';  
  15. }  
  16.   
  17. function doWrite(){  
  18. document.write('………………………html语句,嘿嘿…………………');  
  19.   
  20.   
  21. }  
  22.   
  23. if(getCookie('Evil') == ''){  
  24. doWrite();  
  25.   
  26. setCookie('Evil''Something');  
  27. }  
  28. </SCRIPT>
vbscript:
  1. <SCRIPT LANGUAGE="VBSCRIPT">  
  2. function GetCookie(sName)  
  3.   
  4.     DIM aCookie, i, aCrumb  
  5.     GetCookie = ""  
  6.     aCookie = split(document.cookie, "; ")  
  7.     FOR i = LBOUND(aCookie) to UBOUND(aCookie)  
  8.       aCrumb = split(aCookie(i), "=")  
  9.       if sName = aCrumb(0) then  
  10.         GetCookie = unescape(aCrumb(1))  
  11.         EXIT FOR  
  12.       end if  
  13.     NEXT  
  14. end function  
  15.   
  16. Sub SetCookie(sName, sValue)  
  17.     document.cookie = sName & "=" & escape(sValue) & "; expires=Tue, 31 Dec 2009 23:59:59 GMT"  
  18. end Sub  
  19.   
  20. sub DeleteCookie(sName)  
  21.     document.cookie = sName & "=" + escape(sValue) & "; expires=Fri, 31 Dec 1999 23:59:59 GMT;"  
  22. end sub  
  23. </SCRIPT>  
  24. <form name="frm">  
  25. Name:<input type="text" name="cookiename"><br>  
  26. Value:<input type="text" name="cookievalue"><br>  
  27. <input type="button" value="create cookie" onclick="SetCookie me.form.cookiename.value, me.form.cookievalue.value"  
  28. language="vbscript">  
  29. <input type="button" value="get cookie" onclick="msgbox GetCookie(me.form.cookiename.value)"  
  30. language="vbscript">  
  31.   
  32. <input type="button" value="delete cookie" onclick="DeleteCookie(me.form.cookiename.value)"  
  33. language="vbscript">

关键词: 代码收藏

上一篇: 应用系统安全评估
下一篇: ubuntu 文件重定向

相关文章
访客评论
#1
回复 路过 2007-07-22, 17:33:56
这个用什么用哦,
#2
回复 kiki 2007-07-22, 19:51:32
没什么大的用处,就只能做坏事
#3
回复 4mxku 2007-07-28, 12:46:06
谁说的只能做坏事啊
发表评论

评论内容 (必填):