Question

怎么ASP网页代码？注册、登录界面

注册、登录两个界面，要ASP代码 数据库名字：super 表名：zhuce 分开写，写完300分送上

Answer 1

怎么没说明SQL Server 还是ACCESS，我给你用ACCESS吧： zhuce中创建字段：user和pasw分别存放用户名和密码： 数据库连接页(conn.asp) <% db = "sqlmdb.mdb" 'ACCESS文件路径（相对） set conn=server.CreateObject("adodb.connection") '创建连接 strConn="Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(db) '连接字符串 conn.open strConn '打开连接，用完别忘记关哦 if err then'如果有错误，继续！ err.clear end if sub closeconn() '关闭连接，用完请调用此Sub关闭 conn.close set conn=nothing End Sub %> 注册页：zc.html <form id="" name="form1" method="get" action="active.asp"> <!--关键在action--> <label> 用户名:<input type="text" name="user" id="user" /> </label> <label> 密码：<input type="password" name="paw" id="paw" /> </label> <label> <input type="submit" name="button" id="button" value="注册" /> <!--关键在name--> </label> <label> <input type="reset" name="button2" id="button2" value="重填" /> <!--关键在name--> </label> </form> active.asp <!--#include file="conn.asp"--> <% dim user = request("user")'获取通过Get提交的Name为user的值 dim pasw = request("paw")''获取通过Get提交的Name为paw的值 dim sqlstr = "INSERT INTO zhuce(user,pasw) Value("&user&","&pasw&")" set rs = server.createObject("ADOBD.Recordset") rs.open sqlstr 1,4 rs.close set rs = nothing Call closeconn() %> 登陆login.html 代码同注册页：zc.html只改form的active值为login.asp login.asp <% dim user = request("user")'获取通过Get提交的Name为user的值 dim pasw = request("paw")''获取通过Get提交的Name为paw的值 dim sqlstr = "select * from zhuce while user='"&user&"'" set rs = server.createObject("ADOBD.Recordset") rs.open sqlstr if rs("pasw") = pasw then response.write("<script>alert('登陆成功,点击返回');window.location.history.go(-1)<script>") else response.write("<script>alert('密码错误,点击返回重新填写');window.location.history.go(-1)<script>") end if %> 自己现写的，没测试，理论上可以，自己测试吧，有问题Q我

采纳哦