UC知道我的ASP 读不到验证码session,呵呵,我一菜鸟,麻烦你看一下
来源：百度知道 编辑：UC知道 时间：2024/09/27 21:20:16
我在网上找了一个getcode.asp,原本按着教程一步一步的做,但是就是不成,ai~~~~做了一天了,就是想不通.验证码的原理倒是搞懂了,但是login页就是认不到getcode的session.我的源代码如下:
login.asp
<!-<!--#include file="db.asp"-->
<% session("code")=request.form("GetCode") %>
<%
validpwd = true
If request.form("submit") <> "" Then
' setup variables
userid = Request.Form("userid")
passwd = Request.Form("passwd")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open xDb_Conn_Str
Set rs = conn.Execute( "Select * from [admin] where [user_id] = '" & UCASE(userid) & "'")
If not rs.eof then
If ucase(rs("user_pwd")) = ucase(passwd) Then
validpwd = true
Else
validpwd = false
End If
Else
validpwd = false
end if
lev=rs("lev")
user=rs("user_id")
rs.
login.asp
<!-<!--#include file="db.asp"-->
<% session("code")=request.form("GetCode") %>
<%
validpwd = true
If request.form("submit") <> "" Then
' setup variables
userid = Request.Form("userid")
passwd = Request.Form("passwd")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open xDb_Conn_Str
Set rs = conn.Execute( "Select * from [admin] where [user_id] = '" & UCASE(userid) & "'")
If not rs.eof then
If ucase(rs("user_pwd")) = ucase(passwd) Then
validpwd = true
Else
validpwd = false
End If
Else
validpwd = false
end if
lev=rs("lev")
user=rs("user_id")
rs.
<% session("code")=request.form("GetCode") %>
不用这样取值了，因为显示验证码的图片时，Session("code")的值已经有了，直接使用即可。
比如我的GetCode.asp中设置了Session("GetCode")=vCodes，那么可以这样使用：
'验证码验证，Request.form("passcode")为用户输入的验证码
If Ucase(Trim(Request.form("passcode"))) <> Session("GetCode") Then
Session("GetCode")=""
Response.Write "<script type=""text/javascript"">alert('验证码有误！');window.location.href='Login.asp';</script>"
Response.End
End If