数据库为user/data/huiyuan.mdb
制作一个网站用户注册页面（newuser.asp），表单动作指向user/ok.asp，表单里连接到数据库里的表“user”，包括：
表单名称user，连接到字段user，
表单名称pwd，连接到字段pwd，
表单名称nickname，连接到字段nickname，
表单名称qq,连接到字段email，
表单名称email，连接到字段email，
表单名称phone，连接到字段phone，
表单名称homepage,连接到字段homepage，
按钮名称为Submit。
提交后台页面：user/ok.asp
该页面显示：您的会员账号已经成功注册。
将表单信息提交到数据库或者直接在数据库填写信息后，数据库文件会发现该记录并自动产生表book+ID（例如：book5）和booka+ID（例如：booka5）,用来记录每个用户在自己的账号里添加和保存内容，防止泄露。
登录页面user/login.asp，
连接到数据库里的表“user”，包括：
表单名称user，连接到字段user，
表单名称pwd，连接到字段pwd，
表单动作指向user/loginok.asp，
用户在登录到自己的账户后，会自动读取数据库在他注册时创建的那两个表的内容。
已有conn.asp,login.asp，newuser.asp
帮忙制作loginok.asp,ok.asp。
loginok.asp页面源代码：
<!--#include file="conn.asp"-->
<html>
<head>
<title>登陆成功</title>
</head>
<body background="images/bg.jpg">
<% if request.Form("user")="" or request.form("pwd")="" then
response.Write"<script language=javascript>alert('请填写完整');history.back();</script>"
response.End()
end if
user=Replace(Request.Form("user"),"'","''")
pwd=Replace(Request.Form("pwd"),"'","''")
sql="select * from user where user='"&user&"' and pwd='"&pwd&"'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof then
response.Write"<script> alert('用户名或密码错误');history.back();</script>"
response.End()
else
session("user")=rs("user")
session("pwd")=rs("pwd")
response.write"欢迎您的光临，"%>
<%=session("user")%>
<%response.redirect"usergl.asp"%>
<%end if%>
</body>
</html>
帮忙将这个页面的代码修改一下，使可达到会自动读取数据库在他注册时创建的那两个表的内容的效果。
ok.asp网页代码所在地址链接：www.animalbk.net/files/ok.asp
这个页面有错误，无法读取。
数据库地址链接：www.animalbk.net/files/huiyuan.mdb