帝王谷资源网 Design By www.wdxyy.com

Dim strCookie, strTry

strCookie = Request.Cookies("MyCookie")  

strTry = Request.QueryString("Try")

     

If strCookie = "" Then     

' 检测否是设置了Cookie.

 

If strTry = "" Then   

         Response.Cookies("MyCookie") = "Set"

' 重定向到这一页面再试.

       

Response.Redirect(Request.ServerVariables("script_NAME")

& "?Try=Yes")

      Else       

     ' 如果没有开启Cookie.

 

 End If 

 Else

 ' 客户端正在接受Cookie.

 

Response.Cookies("MyCookie").Expires = "April 15, 2001"

End If

 

 

标签:
|如何|何提|提示|示用|用户|户打|打开|开C|Co|oo|ok|ki|ie|e?|?|

帝王谷资源网 Design By www.wdxyy.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
帝王谷资源网 Design By www.wdxyy.com