为什么无法写入cookie?
..............
Const CookiesPATH = "app "
UserName = Req( "UserName ")
UserPassWord = Req( "password ")
Set Rs = Server.CreateObject( "ADODB.RecordSet ")
Rs.Open "Select Top 1 * From Member Where UserName = ' " & UserName & " ' And UserPassWord = ' " & UserPassWord & " ' ",Conn,1,1
If Not(Rs.bof and Rs.eof) Then
If UserName = Rs( "UserName ") And UserPassWord = Rs( "UserPassWord ") Then
Response.Cookies(CookiesPATH)( "UserName ")= UserName
Response.Cookies(CookiesPATH)( "UserID ")=Rs( "ID ")
Else
Call Msgs( "错误,用户名或密码错误! ", "Index.Asp ")
End If
Else
Call Msgs( "错误,您不是我们的会员,赶快去注册一个吧! ", "Reg.Asp ")
End If
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
.................
代码如上.这是一个登录的页面.登录之后生成一个cookie.
我在修改别人的程序,页面可以正常运行,但是在本机调试的时候发现它无法在Temporary Internet Files 这个临时文件夹生成cookie.
请问哪里出错了呢? 谢谢
另外 CookiesPATH 这个有什么用呢?
------解决方案--------------------CookiesPATH定义了一个路径,表示该COOKIES为某程序专用
相当于一个记号,区分其他系统的同名COOKIES,避免造成错误
所以Request的时候也需要加上CookiesPATH