如何提示用户打开Cookie？_编程10000问_

NEWSZW_HZH_BEGIN-->

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

 

 

NEWSZW_HZH_END-->

查看更多关于如何提示用户打开Cookie？_编程10000问_的详细内容...