网页制作问题
本人已有一个网页，想做一个用户登陆的页面就是像论坛那种用户12345密码*****登陆这种样子的数据库已建好user.mdb希望帮我写一个代码在这里先谢谢了（不用注册界面...
本人已有一个网页，想做一个用户登陆的页面
就是像论坛那种
用户 12345
密码 *****
登陆
这种样子的
数据库已建好user.mdb
希望帮我写一个代码
在这里先谢谢了
（不用注册界面，数据库中已有信息，就是想要一个登陆的页面，还有就是怎么与数据库连接，输入的用户名怎样与数据库中的信息对比）
越详细越好，最好每句都有注释
高分悬赏，成功的话再赏200
如果用户登陆成功的话，登陆到指定的页面
反之则显示用户密码错误
ASP编程
先谢谢ku621 不过我调试的时候说网页有问题
我留下自己的QQ 15240255 可以直接和我联系，加入时 注明baidu知道
数据库两个字段，主建name 另一个password 展开
就是像论坛那种
用户 12345
密码 *****
登陆
这种样子的
数据库已建好user.mdb
希望帮我写一个代码
在这里先谢谢了
（不用注册界面，数据库中已有信息，就是想要一个登陆的页面，还有就是怎么与数据库连接，输入的用户名怎样与数据库中的信息对比）
越详细越好，最好每句都有注释
高分悬赏，成功的话再赏200
如果用户登陆成功的话，登陆到指定的页面
反之则显示用户密码错误
ASP编程
先谢谢ku621 不过我调试的时候说网页有问题
我留下自己的QQ 15240255 可以直接和我联系，加入时 注明baidu知道
数据库两个字段，主建name 另一个password 展开
23个回答
展开全部
用asp连
文件名：a.asp
<html>
<head>
<script language=vbscript>
<!--
sub chek()
if document.a.a1.value=""then
msgbox"姓名不能为空"
else
if document.a.a2.value<>"" then
docoument.a.submit
else
msgbox"密码不能为空"
end if
end if
end sub
-->
</script>
</head>
<body>
<form action="connection_sql.asp" method="post" name=a>
<p>姓名<input type="text" name="a1"></p>
<p>密码<input type="password" name="a2"></p>
<input type=button name="a3" value="提交" onclick=chek()>
<input type="reset" name="a4" value="重写">
<% call chek()%>
</body>
</html>
connection_sql.asp
<%@language="vbscript"%>
<% name=request.form("a1")
mm=request.form("a2")
set conn=server.createobject("adodb.connection")
strcnn="driver={mircosoft access driver(*.mdb)};dbq="&server.mappath("\") & "\user.mdb ;uid=12345;pwd=12345;dbq=master"
conn.open strcnn
sql="select * from aa where username='"&name&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
while not rs.eof
response.write "此用户的名已被使用！"
rs.movenext
wend
if rs.eof then
rs.addnew
rs("username").value=name
rs("userpassword").value=mm
rs.updatebatch
response.write"添加成功！"
end if
rs.close
conn.close
%>
文件名：a.asp
<html>
<head>
<script language=vbscript>
<!--
sub chek()
if document.a.a1.value=""then
msgbox"姓名不能为空"
else
if document.a.a2.value<>"" then
docoument.a.submit
else
msgbox"密码不能为空"
end if
end if
end sub
-->
</script>
</head>
<body>
<form action="connection_sql.asp" method="post" name=a>
<p>姓名<input type="text" name="a1"></p>
<p>密码<input type="password" name="a2"></p>
<input type=button name="a3" value="提交" onclick=chek()>
<input type="reset" name="a4" value="重写">
<% call chek()%>
</body>
</html>
connection_sql.asp
<%@language="vbscript"%>
<% name=request.form("a1")
mm=request.form("a2")
set conn=server.createobject("adodb.connection")
strcnn="driver={mircosoft access driver(*.mdb)};dbq="&server.mappath("\") & "\user.mdb ;uid=12345;pwd=12345;dbq=master"
conn.open strcnn
sql="select * from aa where username='"&name&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
while not rs.eof
response.write "此用户的名已被使用！"
rs.movenext
wend
if rs.eof then
rs.addnew
rs("username").value=name
rs("userpassword").value=mm
rs.updatebatch
response.write"添加成功！"
end if
rs.close
conn.close
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
<html>
<head>
<script language=vbscript>
<!--
sub chek()
if document.a.a1.value=""then
msgbox"姓名不能为空"
else
if document.a.a2.value<>"" then
docoument.a.submit
else
msgbox"密码不能为空"
end if
end if
end sub
-->
</script>
</head>
<body>
<form action="connection_sql.asp" method="post" name=a>
<p>姓名<input type="text" name="a1"></p>
<p>密码<input type="password" name="a2"></p>
<input type=button name="a3" value="提交" onclick=chek()>
<input type="reset" name="a4" value="重写">
<% call chek()%>
</body>
</html>
connection_sql.asp
<%@language="vbscript"%>
<% name=request.form("a1")
mm=request.form("a2")
set conn=server.createobject("adodb.connection")
strcnn="driver={mircosoft access driver(*.mdb)};dbq="&server.mappath("\") & "\user.mdb ;uid=12345;pwd=12345;dbq=master"
conn.open strcnn
sql="select * from aa where username='"&name&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
while not rs.eof
response.write "此用户的名已被使用！"
rs.movenext
wend
if rs.eof then
rs.addnew
rs("username").value=name
rs("userpassword").value=mm
rs.updatebatch
response.write"添加成功！"
end if
rs.close
conn.close
%>
<html>
<head>
<script language=vbscript>
<!--
sub chek()
if document.a.a1.value=""then
msgbox"姓名不能为空"
else
if document.a.a2.value<>"" then
docoument.a.submit
else
msgbox"密码不能为空"
end if
end if
end sub
-->
</script>
</head>
<body>
<form action="connection_sql.asp" method="post" name=a>
<p>姓名<input type="text" name="a1"></p>
<p>密码<input type="password" name="a2"></p>
<input type=button name="a3" value="提交" onclick=chek()>
<input type="reset" name="a4" value="重写">
<% call chek()%>
</body>
</html>
connection_sql.asp
<%@language="vbscript"%>
<% name=request.form("a1")
mm=request.form("a2")
set conn=server.createobject("adodb.connection")
strcnn="driver={mircosoft access driver(*.mdb)};dbq="&server.mappath("\") & "\user.mdb ;uid=12345;pwd=12345;dbq=master"
conn.open strcnn
sql="select * from aa where username='"&name&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
while not rs.eof
response.write "此用户的名已被使用！"
rs.movenext
wend
if rs.eof then
rs.addnew
rs("username").value=name
rs("userpassword").value=mm
rs.updatebatch
response.write"添加成功！"
end if
rs.close
conn.close
%>
<html>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
我已加你QQ,具体问题QQ谈
另外我资料里有我的QQ
另外我资料里有我的QQ
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
你可以用动网
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
找到代码告诉我
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
