UC知道asp登陆代码错误
来源：百度知道 编辑：UC知道 时间：2024/04/29 21:48:49
denglu.asp
<form name="form2" method="post" action="classlogin.asp">
<label>用户号
<input type="text" name="zhanghao" size="15">
</label>
<p>
<label>密码<input type="password" name="mima" size="15">
</label>
</p>
<p>
<label>
<input type="submit" name="Submit" value="提交" />
</label>
</p>
connection.asp
<%
connstr="driver={SQL Server};server=(local);database={xyl}"
set conn=Server.Createobject("adodb.connection")
conn.open connstr
%>
classlogin.asp也就是验证代码
<!--#include file=connection.asp -->
<%
userid =trim(Request.form("zhanghao"))
password =trim(Request.form("mima"))
if userid=&
<form name="form2" method="post" action="classlogin.asp">
<label>用户号
<input type="text" name="zhanghao" size="15">
</label>
<p>
<label>密码<input type="password" name="mima" size="15">
</label>
</p>
<p>
<label>
<input type="submit" name="Submit" value="提交" />
</label>
</p>
connection.asp
<%
connstr="driver={SQL Server};server=(local);database={xyl}"
set conn=Server.Createobject("adodb.connection")
conn.open connstr
%>
classlogin.asp也就是验证代码
<!--#include file=connection.asp -->
<%
userid =trim(Request.form("zhanghao"))
password =trim(Request.form("mima"))
if userid=&
<!--#include file="conn.asp"-->
<%
na = trim(request("na"))
password = request("password")
if na = "" then
conn.close
set conn = nothing
response.write "<script>alert('请输入您的姓名');history.go(-1);</script>"
response.end
end if
if password = "" then
conn.close
set conn = nothing
response.write "<script>alert('请输入密码');history.go(-1);</script>"
response.end
end if
if IsNumeric(na) then
sql = "select * from user where userid="&na
else
sql = "select * from user where username='"&na&"'"
end if
set rs = server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.bof and rs.eof then
rs.close
set rs = nothing
conn.close
set conn = nothing
response.write "&