您所在位置：主题：请大家帮小弟一下.谢谢!
itboy
[专家分：0] 发布于 2006-06-27 18:02:00
<html>
<!-- #INCLUDE FILE = "conn.asp"-->
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>登陆窗口</title>
</head>
<%
Username = Trim(Request.form("id"))
Password = Trim(Request.form("pass"))
if Username=""or Password=""then
Errmsg="请输入用户名和密码"
set objconn = nothing
else
set rs = server.createobject("adodb.recordset")
sql = "Select id,pass from AllUser where id = '"& Username &"' and pass = '"& Password &"'"
rs.open sql,objconn
if rs.eof and rs.eof then
Errmsg = "用户或密码不正确，或者你不是管理员，请重新输入！"
objconn.close
set objconn = nothing
else
Response.Redirect("kehu.asp")
end if
end if
%>
<script language="VBScript">
</script>
<body topmargin=250 bgcolor="#eaf2ff">
<form method="post" action="login.asp?">
<table align="center" border="1" width="35%" bordercolorlight=000000 bordercolordark=FFFFFF>
<tr>
<td width="100%" align="center" bgcolor=""><font color="#ff12bc">用户登陆</font></td>
</tr>
<tr>
<td width="100%" align="center" bgcolor="">用户名<input type="text" name="id" size="20"></td>
</tr>
<tr>
<td width="100%" align="center">密 码 <input type="password" name="pass" size="20"></td>
</tr>
<tr>
<td width="100%" align="center"><input type="submit" value="管理员" name="B1">
<input type="submit" value="客 服" name="B2"></td>
</tr>
</table>
<p align="center"> </p>
</form>
</body>
</html>
测试下,总是出现如下错误:
ADODB.Recordset 错误 '800a0bb9'
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/login.asp，行 22
谢谢,帮小弟下
<!-- #INCLUDE FILE = "conn.asp"-->
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>登陆窗口</title>
</head>
<%
Username = Trim(Request.form("id"))
Password = Trim(Request.form("pass"))
if Username=""or Password=""then
Errmsg="请输入用户名和密码"
set objconn = nothing
else
set rs = server.createobject("adodb.recordset")
sql = "Select id,pass from AllUser where id = '"& Username &"' and pass = '"& Password &"'"
rs.open sql,objconn
if rs.eof and rs.eof then
Errmsg = "用户或密码不正确，或者你不是管理员，请重新输入！"
objconn.close
set objconn = nothing
else
Response.Redirect("kehu.asp")
end if
end if
%>
<script language="VBScript">
</script>
<body topmargin=250 bgcolor="#eaf2ff">
<form method="post" action="login.asp?">
<table align="center" border="1" width="35%" bordercolorlight=000000 bordercolordark=FFFFFF>
<tr>
<td width="100%" align="center" bgcolor=""><font color="#ff12bc">用户登陆</font></td>
</tr>
<tr>
<td width="100%" align="center" bgcolor="">用户名<input type="text" name="id" size="20"></td>
</tr>
<tr>
<td width="100%" align="center">密 码 <input type="password" name="pass" size="20"></td>
</tr>
<tr>
<td width="100%" align="center"><input type="submit" value="管理员" name="B1">
<input type="submit" value="客 服" name="B2"></td>
</tr>
</table>
<p align="center"> </p>
</form>
</body>
</html>
测试下,总是出现如下错误:
ADODB.Recordset 错误 '800a0bb9'
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/login.asp，行 22
谢谢,帮小弟下
