运行ASP，新建一个虚拟目录“FRIEND”，新建站点。
建立交友系统主控界面如下图：
（图4.1.1）
其上有上有各种类型的菜单选项，如好友注册、个人档案、相片上传、档案注册、好友登陆。以及下一级子菜单。可根据自己的需求进行选择。且工具栏上有相对应的快捷按钮，方便用户，为用户节省时间。
窗体右面的类型表即书类型和书类型代号的对应表是为了提醒用户，方便用户，让用户不必强行记忆这么多东西，就是忘了也可方便查找。
§4.2 各界面的设计及分析
§4.2.1 网友注册模块
网友注册包括以下子模块：
会员注册
reg.asp
regsubmit.asp
regok.asp
register.asp
ladd.asp
read.asp
用户登陆验证
default.asp
login.asp
your.asp
各子模块联系如下：
用户注册页面：
reg.asp页面示例
a.页面中需要用户填写的HTML表单元素有：
名称 表单元素类型 含义 最大长度
User_name Text 用户登陆名称 10
Password Password 用户登陆密码 10
Password_two Password 确认密码 10
b.页面所涉及的数据表信息：
此页面仅向系统提供用户名和密码。
c.页面代码分析：
<%
if session("user_id")<>1 then
response.redirect "havereg.htm"
end if
%>
注册不成功页面：
regsubmit.asp页面示例
a.页面中需要用户填写的HTML表单元素有：
此页面无需填写HTML表单元素。
b.页面所涉及的数据表信息：
此页面仅向系统提供用户住册名称和密码。
c.页面代码分析：
<!--#include file="conn.asp"-->
<%取得提交表单的用户名，密码。
user_name =left(request("user_name"),10)
password =left(request("password"),10)
如果密码为空终止程序执行。
if password="" then
response.write "数据有错！"
response.end
end if
Set rs_user = Server.CreateObject("ADODB.Recordset")
sql="select * from user_reg where user_name like '" & user_name & "'"
rs_user.open sql,conn,3,2
if rs_user.eof and rs_user.bof then
rs_user.addnew
rs_user("user_name")=user_name
rs_user("password")=password
rs_user("date")=date
rs_user.update
rs_user.movelast
session("user_id")=rs_user("user_id")
rs_user.close
如果用户住册成功直接跳转到regok.asp
response.redirect "regok.asp"
response.end
else
%>
用户住册成功页：
regok.asp页面示例a.页面中需要用户填写的HTML表单元素有：
此页面无需填写HTML表单元素。
b.页面所涉及的数据表信息：
此页面没有涉及数据库表的信息
用户填写个人信息页
register.asp页面示例
a.页面中需要用户填写的HTML表单元素有：
名称 表单元素类型 含义 最大长度
name Text 真实姓名 10
Home Text 籍贯 10
company Text 所在单位 50
Postalcode Text 邮编 6
Tel Text 联系电话 20
Fresume Text 简历 200
Netname Text
首页 上一页 1 2 3 4 5 6 7 下一页 尾页 4/8/8
ASP交友系统设计(四)由毕业论文网（www.huoyuandh.com）会员上传。
