为什么form表单的不会传到asp里。 5
dologin.html页面<body><formACTION="dologin.asp"name="form1"method="POST"id="login"><h1>...
dologin.html页面
<body>
<form ACTION="dologin.asp" name="form1" method="POST" id="login">
<h1>登录</h1>
<div id="inputs">
<input id="username" type="text" placeholder="Username"/>
<input id="password" type="password" placeholder="Password"/>
</div>
<div id="actions">
<input type="submit" id="submit" value="登录">
<a href="" style="float:left;">忘记密码?</a>
</div>
</form>
</body>
dologin.asp页面
<title>用户登录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<%
dim username
dim passsword
' 接收参数
'id=trim(request("tex1"))
username = trim(request("username"))
password =trim(request("password"))
' 创建链接对象
set cn = Server.CreateObject("ADODB.Connection")
' 设置连接参数
' 打开数据库连接
cn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("message.mdb")
' 查询数据
set rs = cn.Execute("select * from Admin where username='"&username&"' and password='"&password&"'")
' 定义变量 result 存放查询结果, 是否有匹配的用户数据
dim result
result = ( NOT rs.eof )
' 关闭连接
rs.close
cn.close
' 释放资源
set rs = nothing
set cn = nothing
%>
</head>
<body>
<%
if result then
' 有匹配的用户名和密码
' 将用户信息保存在session里, 以便后续判断是否登录
Session("user") = username
' 自动跳转到文章列表
Response.Redirect("index.asp")
else
' 无匹配数据, 显示错误信息
%>
</body> 展开
<body>
<form ACTION="dologin.asp" name="form1" method="POST" id="login">
<h1>登录</h1>
<div id="inputs">
<input id="username" type="text" placeholder="Username"/>
<input id="password" type="password" placeholder="Password"/>
</div>
<div id="actions">
<input type="submit" id="submit" value="登录">
<a href="" style="float:left;">忘记密码?</a>
</div>
</form>
</body>
dologin.asp页面
<title>用户登录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<%
dim username
dim passsword
' 接收参数
'id=trim(request("tex1"))
username = trim(request("username"))
password =trim(request("password"))
' 创建链接对象
set cn = Server.CreateObject("ADODB.Connection")
' 设置连接参数
' 打开数据库连接
cn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("message.mdb")
' 查询数据
set rs = cn.Execute("select * from Admin where username='"&username&"' and password='"&password&"'")
' 定义变量 result 存放查询结果, 是否有匹配的用户数据
dim result
result = ( NOT rs.eof )
' 关闭连接
rs.close
cn.close
' 释放资源
set rs = nothing
set cn = nothing
%>
</head>
<body>
<%
if result then
' 有匹配的用户名和密码
' 将用户信息保存在session里, 以便后续判断是否登录
Session("user") = username
' 自动跳转到文章列表
Response.Redirect("index.asp")
else
' 无匹配数据, 显示错误信息
%>
</body> 展开
1个回答
展开全部
<input id="username" type="text" placeholder="Username"/>
<input id="password" type="password" placeholder="Password"/>
要加name,,,request("tex1")意思就是接受name为tex1的文本框,,,
<input id="username" type="text" name="uname" placeholder="Username"/>
request("uname")这样就行了。
<input id="password" type="password" placeholder="Password"/>
要加name,,,request("tex1")意思就是接受name为tex1的文本框,,,
<input id="username" type="text" name="uname" placeholder="Username"/>
request("uname")这样就行了。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询