高手给看看我写的登陆页面为什么不能用阿!!!
<%@ Language=VBScript %>
<%
name=trim(request("name"))
passwd=trim(request("pwd"))
'检查用户是否输入信息
if name<> "" and passwd<> "" then
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("kygl.mdb")
set rs= server.createobject("adodb.recordset")
sql="select * from users where id='"&name&"' and pwd='"&passwd&"'"
'检查用户的合法性
Set rs=conn.Execute(sql)
if not(rs.eof) then
msgbox "登陆成功"
else
msgbox " 用户名或密码错误"
end if
else
msgbox "用户名或密码为空"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>河北大学科研信息管理系统</title>
</head>
<body bgcolor="#808080">
<form name="form1" id="form1"method="post" action="login.asp">
<p> </p>
<p align="center"><font size="7" face="华文行楷">河北大学科研信息管理系统</font></p>
<p align="center"> </p>
<div align="center"></div>
<table width="322" border="1" align="center">
<tr>
<td width="89">用户名:</td>
<td width="217"><input name="user" type="text" value="admin" maxlength="10" size="20"></td>
</tr>
<tr>
<td width="89">密 码:</td>
<td width="217"><input name="pwd" type="password" maxlength="20" size="20"></td>
</tr>
</table>
<div align="center"></div>
<div align="center"></div>
<div align="center"></div>
<p align="center">
<input type="submit" name="login" value="登陆">
<input type="reset" value="清空" name="clear">
</p>
<p align="center"> </p>
</form>
<hr>
<p align="center">河北大学科技处维护 版权所有</p>
<p align="center">2004-04-22</p>
</body>
</html>