Response.Cookies("MyCookie").Expires = 0orResponse.Cookies("MyCookie") = ""

解决方案 »

  1.   

    '===========保存cookies
                Response.Cookies("UserName").Value = UserName.Value
                Response.Cookies("PWD").Value = Password.Value
                Response.Cookies("Nickname").Value = Session("NickName")
                Dim Tm As DateTime = DateTime.Now()
                Dim ts As TimeSpan
                Select Case method.SelectedIndex
                    Case 0
                        ts = New TimeSpan(0, 0, 0, 0)
                    Case 1
                        ts = New TimeSpan(1, 0, 0, 0)
                    Case 2
                        ts = New TimeSpan(30, 0, 0, 0)
                    Case 3
                        ts = New TimeSpan(365, 0, 0, 0)
                End Select
                Response.Cookies("UserName").Expires = Tm.Add(ts)
                Response.Cookies("PWD").Expires = Tm.Add(ts)
                Response.Cookies("Nickname").Expires = Tm.Add(ts)
      

  2.   

    请问UserName、PWD、Nickname是ie定义的?还是你自己定义的?
      

  3.   

    Response.Cookies("UserName").Expires = 0