asp网站的发布问题

[fly0804]

我在本地做了一个网站 在本地用webasp.exe运行没问题 但是我在IIS里运行后台时不能登录就是刷新一下登录页面 验证码验证和密码用户验证都有
Function CheckAdmin(admin,ch)
CheckAdmin=false
if IsLogin() then
CheckAdmin=true
if ch and Cint(Trim(Request.cookies(AT)))<>1 then
if instr(Trim(Request.cookies(AA)),admin)>0 then
CheckAdmin=true
else
CheckAdmin=false
end if
end if
end if
End Function
这是检查是否登录 就是Request.cookies(AT)没东西 但是我在登录的时候
sql="select * from wAdmin where AdminName='"&adminname&"' and AdminKey='"&adminpwd&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
if rs.eof and rs.bof then
rs.close
set rs=nothing
Response.Write("<script language=javascript>alert('管理员名称或密码错误！');this.location.href='admin.asp';</script>")
else
Response.Cookies(AN)=toEncrypt(rs("AdminName"))
Response.Cookies(AN).Expires=date+1
Response.Cookies(AN).Domain=ADomain
Response.Cookies(AID)=rs("AdminID")
Response.Cookies(AID).Expires=date+1
Response.Cookies(AID).Domain=ADomain
Response.Cookies(AT)=rs("AdminType")
Response.Cookies(AT).Expires=date+1
Response.Cookies(AT).Domain=ADomain
if rs("AdminType")=1 then
Response.Cookies(AA)="system"
else
Response.Cookies(AA)=rs("AdminAdmin")
end if
Response.Cookies(AA).Expires=date+1
Response.Cookies(AA).Domain=ADomain
Response.Cookies(AIP)=toEncrypt(GetUserIP())
Response.Cookies(AIP).Expires=date+1
Response.Cookies(AIP).Domain=ADomain
Response.Cookies(APW)=toEncrypt(md5(APWStr)&rs("AdminKey"))
Response.Cookies(APW).Expires=date+1
Response.Cookies(APW).Domain=ADomain
rs("AdminTime")=Now()
rs("AdminIP")=GetUserIP()
rs.update
rs.close
set rs=Nothing
if err.number<>0 Then err.clear
response.redirect "Admin.asp"
response.end
end if


是我的代码问题 还是IIS里设置的问题 请碰到过这类问题的大虾教教我 QQ344848968

[ChinaXtHuLang]

你的问题：Cookies记录时间太长了。webasp.exe怎么也没有iis好。。
测试还是用IIS。不要用其它来代替IIS。。

• 打赏
• 举报

回复 赞

[fly0804]

嗯 所以我是决定用IIS 但是现在有问题500 都不晓得哪里错了 搞不懂 哪个有时间的我可以发源码给你们看 帮我改改咯

• 打赏
• 举报

回复 赞