|
#2
hams2010-12-15 08:13
|
我想做一个动态网站的登入页面，下面是前台的页面显示程序：
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>登入</title>
<style type="text/css">
<!--
.style2 {font-size: 18px}
-->
</style>
</head>
<body>
<form name="form1" method="post" action="middle.asp">
<p><span class="style2">用户名：</span>
<input type="text" name="textfield"></p>
<p><span class="style2">密 码：</span>
<input type="password" name="tfPassword1"></p>
<p>
<input type="submit" name="Submit" value="登入">
<input type="reset" name="Submit2" value="重新输入">
</p>
</form>
</body>
</html>
下面是后台的连接数据库的语句：
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<%
dim conn
dim tname
dim password
dim connstr
dim db
tname=Request.Form("textfield")
password=Request.Form("tfPassword1")
db="/databases/mytable.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/")&db
conn.Open connstr
set rs=conn.execute("select pwd from dengru where name=tname")
if rs("pwd=password")
Response.Redirect("index.asp") ‘当输入的姓名和密码符合就转到index.asp’
%>
我用ACCESS做了一个数据库mytable.mdb,该数据库中有一个表叫dengru，表中只有两个属性一个name,一个pwd，分别用来存取姓名和密码，但是就是有错，希望高手能帮帮忙忙，谢谢了先！！！！