1、交友系统第 1 页 共 41 页目 录前言 2第一章 系统设计 31.1 市场需求分析 31.2 系统设计 31.2.1 系统目标设计 31.2.2 开发思想设计 31.3.1 交友系统的开发环境 41.3.2 交友系统的可扩展性 5第二章 总体设计 52.1 系统功能分析 52.2 系统功能模块划分 72.3 系统结构设计图 7第三章 数据库设计 83.1 数据库的实现 11第四章 系统详细设计 11交友系统第 2 页 共 41 页4.1 默 认 页 面 设 计 及 代 码 分 析 1 24.2 各 界 面 的 设 计 及 代 码 分 析 1 3第五章 调试运行 25结束语 26参考文献 2
2、 7前 言在科技不断发展的今天,利用计算机进行现代化通讯已经成为我们身边必部可少的工具。我们身处在一个知识日新月异、时刻充满挑战的时代,科技的飞速,知识不断创新的社会。所以利用新的通讯方式增进同学见友谊,增进朋友之间的了解是时代所要求的。作为当代大学生,应有长远的目光和随机应变的能力,应走在时间的前面,掌握最新的社会动态、最先进科学技术,以调整自己的知识结构和能力结构,去适应社会的发展。新世纪需要具有丰富现代科学知识的人;需要能够独立解决问题、完成工作的人;需要能独当一面、时常挑战自己极限的人;需要有创新意识的人。我们在不断努力中学习做一个与时代并进的人。在进入实习的阶段中越来越觉
3、得友谊的增进是必须的。俗话说人在社会,多一个朋友是条路,而且各种通讯方式的变更更是五花八门。因此我想做一个校友录系统来增加一种通讯方式以方便我院学生的联系。让我院学生感受到虽然身处异地,却随时可以鼠标一点重新让你有重归校园的亲切感。我现在用文字形式将我做此系统的过程及其功能介绍展现给大家。由于是初次编写,缺少经验,可能有许多不完备或出错的地方,诚恳希望老师们不吝指正。关键词: 校友录系统、窗体、控件、数据库设计者:张美艳交友系统第 3 页 共 41 页二七年五月二十九号第一章 系统设计1.1 市场需求分析随着社会的发展,同学之间之间的学术交流,以及同学之间的相互联系 ,等这些都必须利用计算机,
4、因此用电子信息技术来交流已经成为社会发展的趋势 。 在 交 流 中 大 家 可 以 重 新 一 起 回 忆 往 事 。 有 新 鲜 事 大 家 可 以 一起 交 流 , 有 疑 问 可 以 通 过 留 言 方 式 来 获 取 校 友 提 供 的 信 息 。 这 样 既 增 进了 同 学 之 间 的 友 谊 同 时 也 得 到 了 自 己 想 要 获 取 的 信 息 。计 算 机 技 术 的 迅 速 发 展 带 动 其 它 技 术 的 发 展 , 自 然 也 推 动 着 信 息 技术 高 度 发 展 快 速 前 进 。 信 息 、 信 息 技 术 和 信 息 化 的 重 要 性 日 益 被 人
5、们 所认 识 , 高 科 技 电 子 通 讯 也 日 益 被 大 众 所 接 受 , 所 以 现 代 化 通 讯 方 式 是 今后 发 展 的 趋 势 , , 所以建 立 一 套 符 合 实 际 的 、 简 便 快 捷 的 、 易 于 掌 握 的信 息 系 统 势 在 必 行 。1.2 系统设计1.2.1 系统目标设计通过此系统可以轻松浏览自己或与自己好友的详细情况,注册会员后还可轻松添加、修改、删除好友信息。1.2.2 开发设计思想本 系 统 的 开 发 设 计 思 想 : 系 统 应 符 合 规 定 , 满 足 大 家 日 常 通 讯 的 工 作 需 要 , 并 达 到 操 作 过 程中
6、的 直 观 、 方 便 、 实 用 、 安 全 等 要 求 ; 系 统 采 用 模 块 化 程 序 设 计 方 法 , 既 便 于 系 统 功 能 的 各 种 组 合 和 修 改 ,又 便 于 未 参 与 开 发 的 技 术 维 护 人 员 的 补 充 和 维 护 ;系统应具备数据库维护功能,及时根据用户需求进行数据的添加,删除、修改、等操作。系 统 中 还 应 具 备 有 信 息 查 询 功 能 , 以 便 使 管 理 人 员 方 便 、 及 时 地 了交友系统第 4 页 共 41 页解 各 类 有 关 情 况 , 使 系 统 真 正 地 帮 助 并 提 高 管 理 员 的 管 理 水 平
7、, 使 管 理方 便 、 快 捷 、 准 确 、 无 误 。1.3 校友录系统的开发环境及其可扩展性1.3.1 校友录系统的开发环境( 1) 硬 件 环 境 :主 机 : 电 脑 486DX/100, 推 荐 Pentium200 以 上 ;内 存 : 最 低 要 求 8MB, 最 好 在 32M 内 上 ;硬 盘 : 程 序 需 用 硬 盘 容 量 约 2M, 由 数 据 所 需 空 间 使 用 情 况 而 定 ;显 示 器 : 标 准 VGA 彩 色 ( 黑 白 ) 显 示 器 ; 1024768;( 2) 软 件 配 置 :操 作 系 统 : windowsXP系 统 开 发 软 件 :
8、 Dreamweaver MX 数 据 库 开 发 软 件 : Access2000操 作 环 境 : Asp+Access , IIS4.01.ASP:20 世纪末,随着计算机科学的发展,数据库技术在 Internet 中的应用越来越广泛,为广大网络用户提供了更加周到和人性化的服务。个性化已逐渐成为当今 Web 应用的潮流。本文研究了一种基于数据关联规则网上论坛系统,论坛也称为 BBS,BBS 是 BULLETIN BOARD SYSTEM 的缩写,意即电子公告板,一种在 INTERNET 上常用的用于信息服务的 web 系统,他的主要服务是用来帮助浏览者相互沟通,吸引用户、服务用户的。2.
9、IIS:WE 务器是 Web 应用程序的心脏。IIS(Internet Information Server)是微软推出的 Windows NT Option Pack 的主要成员,作为 Win2000server 的扩展,自推出以来已经有了很大发展,其体系结构是当今市场上最受关注的 Web 服务器之一。新推出的 IIS4.0 版本增强了系统安全性,具有服务器端脚本开发调试,内容管理和站点分析,崩溃防护,内置 JAVA 虚拟机及全面支持 ASP 等强大功能。IIS 与 ASP 相结合:交友系统第 5 页 共 41 页在过去,客户机/服务器结构的设计与 Web 的相关技术几乎处于平行线上,两者相
10、互独立并无法作出集成性的设计。现在我们利用 IIS+ASP 构成三层式Web 结构(如图 2.1 所示)的中间一层,将客户机/服务器结构与 Web 密切结合,完成前后端两者的集成输出功能,使得 Web 站点的开发更方便,实现的功能更强大。利用 IIS+ASP 技术来集成 Web 前后端所带来的强大效益可归结为以下几个方面:(1)减少构建和维护成本(2)加快联机过程 (3)软件集中在服务器端开发管理(4)端可使用任何浏览器(IE、Netscape)(5)端可存取任何数据库 (SQL、Access)(6)用任何脚本语言开发 (VBScript、JavaScript、PERL)交友系统第 6 页 共
11、 41 页ASP 的内部特点:ASP 提供了 6 个功能强大的内部对象,每个对象具有各自的属性(Property)、方法( Method),有的还拥有数据集合(Collection)与事件(Event ),它们共同完成 Web 中的一些重要工作。这 6 个对象及其功能描述如表 2.1 所示。表 2.1 ASP 内部 6 大对象及其功能对象名称 功能描述Request 从客户端取得信息Response 将信息送给客户端Server 提供一些 Web 服务器工具Session 储存在一个 Session 内的用户信息,该信息仅可被该用户访问Application 在一个 ASP-Applicati
12、on 中让不同的客户端共享信息ObjectContext 配合 Microsoft Transaction 服务器进行分布式事务处理合理地运用这些对象可以使原本复杂,烦琐的工作变得简捷而条理清晰。我们可以用以下的语法直接使用这些对象:对象/属性/ 方法 /数据集合3GLOBAL 文件每一个以 Active Server Pages 为基础的应用程序都拥有一个 Global.asa文件(ASA 后缀名其实是 Active Server Application 的缩写),它位于每一个应用程序的基点目录之下。当 Active Server Pages 做下面两个动作时,Server 便会去读 Glo
13、bal.asa 文件:(1)Web Server 启动之后,一个应用程序目录中任一个 ASP 文件被提出第一个 HTTP 请求(Request)时。(2)不具有任何 Session 的客户端向 Server 请求一个 ASP 文件时。前面已经提到 Application 和 Session 这两个 ASP 的内部对象。交友系统第 7 页 共 41 页Application 对象内的信息供所有正在执行该应用程序的用户分享,它创建于Web Server 启动后一个应用程序中任一 ASP 文件被提出第一个 HTTP 请求时,结束于 Server 端停止运行。而 Session 对象仅属于一位用户,维
14、持一个用户端的信息,其他用户无法访问,它创建于一个不具有 Session 的用户向 Server 请求一个 ASP 文件时,结束于该 Session 到期(即用户端超过某时间段没有向Server 提出要求或刷新 Web 页面)或 Abandon 语句的调用。可见,Global.asa文件的调用与 Application 与 Session 这两个对象密切相关。事实上我们通常在 Global。asa 文件中写入以下内容:(1) Application 或 Session 的开始事件(Start-event)。(2) Application 或 Session 的结束事件 (End-event)。
15、这样,在一个 Application 或 Session 对象被创建或结束时,系统会自动完成 Global.asa 文件中写入的相应事件。值得注意的是,如果一个Application 与一个 Session 同时开始,Active Server Pages 会先处理Application 的开始事件,而如果一个 Application 与一个 Session 同时结束,Active Server Pages 则会先处理 Session 的结束事件。CGI(Common Gateway Interface,通用网关接口)也是 Internet 上一种功能强大的 Web 页面技术,其工作方式有别于
16、 ASP。我们现对二者进行比较。Active Server Pages 开发 Web 应用程序的特点:(1) 完全嵌入 HTML,与 HTML、Script 语言完美结合。(2) 无须手动编译和链接程序。(3) 面向对象,并可扩展 ActiveX Server 组件功能。(4) 使用脚本语言(JavaScript、VBScript 或 PERL)编写。(5) 存取数据库轻松容易(使用 ADO 组件)。(6) 可使用任何语言编写自己的 ActiveX Server 组件。(7) 无浏览器兼容问题。(8) 程序代码隐藏,客户端仅能看到 ASP 输出的 HTML 文件。(9) 缩短 Web 开发时间
17、。相比之下,使用 CGI 开发 Web 应用程序具有以下缺点:交友系统第 8 页 共 41 页(1) 不易与 HTML 文件集成。(2) 须使用其他较复杂的语言来开发 CGI 程序。(3) 程序开发时间较长。(4) 存取数据库不容易。(5) 每个 CGI 程序被不同用户执行时都得重新执行一次,并占去 Server 的一个端口(Port),降低 Server 效率。可见,ASP 在数据库访问、与 HTML 的集成、提高服务器的效率等诸多方面都优于 CGI,更适应 Web 应用程序开发的需要,因此本文选择了 ASP 作为个性化页面生成器的开发工具。ACCESS 数据库开发能汇集各种信息以供查询、存
18、储和检索。Access 的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于 Excel 的电子表格,可以使数据库一目了然。另外,Access 允许创建自定义报表用于打印或输出数据库中的信息。Access 也提供了数据存储库,可以使用桌面数据库文件把数据库文件置于网络文件服务器,与其他网络用户共享数据库。Access 是一种关系数据库工具,关系数据库是已开发的最通用的数据库之一。如上所述,Access 作为关系数据库开发具备了许多优点,可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。1.3.2 交友录管理系统的可扩展性由于时间的限制,且个人的水平有限,
19、在该系统中有很多未涉及的地方。辟如说:系统没有歌曲下载和信息下载功能,没有各友情网站之间的连接。今后,可对此系统在这方面加以改进,这样交友录才会越来越壮大,我们的设计才会越来越健全。还有,系统的同步更新做的并不是很完善,统计也没有具体去做。这是一个重要的环节,可以努力去开发,做好后既可以简化系统的复杂性,又可以提高系统的安全性。在这里讲这些,只是希望读者能够注意到这几点也是非常重要的,是具有交友系统第 9 页 共 41 页相当可扩展性的环节。为读者改进这个系统的做一个简单的提示。系统功能的完善有待我们共同去努力!第二章 总体设计总 体 设 计 阶 段 的 基 本 目 的 是 用 比 较 抽 象
20、 概 括 的 方 式 确 定 系 统 如 何 完成 预 定 的 任 务 , 也 就 是 说 , 应 该 确 定 系 统 的 物 理 配 置 方 案 , 并 且 进 而 确定 组 成 系 统 的 每 个 程 序 的 结 构 。 因 此 , 总 体 设 计 阶 段 主 要 由 两 个 小 阶 段组 成 。 首 先 是 系 统 设 计 , 从 数 据 流 图 出 发 设 计 完 成 系 统 功 能 的 若 干 种 合理 的 物 理 方 案 , 然 后 进 行 软 件 结 构 设 计 , 确 定 软 件 由 哪 些 模 块 组 成 以 及这 些 模 块 之 间 的 动 态 调 节 应 用 关 系 。
21、层 次 图 和 结 构 图 是 描 绘 软 件 结 构 的常 用 工 具 。2.1 系统功能分析本系统是建立在 WinXP 平台上,用 VB 语言开发设计,用 Access 来记录数据。为的是面向用户,其中包括好友注册,好友个人管理,网站会员管理等。本系统的总体功能是通过好友注册,好友登陆验证,对好友进行管理。方便用户,代替了以前的手动操作。大大为交友者和管理者双方节省了时间。 系 统 管 理 包 括 用 户 管 理 、 修 改 个 人 信 息 、 退 出 系 统 。 用 户 管 理 包 括 添 加 、 删 除 用 户 及 确 定 、 退 出 。 修 改 个 人 信 息 包 括 验 证 、 确
22、 定 、 取 消 。 交 友 录 的 运 行 包 括 管 理 员 管 理 、 好 友 留 言 信 息 预 览 、 好 友 查 询 。 管 理 员 管 理 是 通 过 对 姓 名 、 以 及 具 体 好 友 的 个 人 信 息 、 进 行 添 加 、删 除 、 修 改 、 更 新 。 交 友 留 言 信 息 预 览 是 通 过 调 用 数 据 库 里 信 息 来 实 现 。 校 友 查 询 通 过 好 友 的 姓 名 , 来 查 询 实 现 。 版 权 声 明 是 为 了 保 证 本 系 统 不 被 抄 袭 。 帮 助 即 本 系 统 的 说 明 书 。2.2 系统功能模块划分交友系统第 10
23、页 共 41 页在 系 统 功 能 分 析 的 基 础 上 , 考 虑 Visual Basic 6.0 程 序 编 制 的特 点 , 得 到 如 下 图 所 示 的 系 统 功 能 模 块 图 。(系统功能模块如上图)第 三 章 数 据 库 设 计数据库在任何系统中占有非常重要的地位,它是数据的来源。数据库的结构好坏,将直接影响到系统功能的实现。所以建库前要做好充分的准备。首先,要了解用户各个方面的需求,他们的需求主要体现在各种信息的提供、保存、更新、查询。其次,要收集基本的数据,并理清其中的关系,以备后用。根据交友管理系统的要求,通过对好友管理工作过程的内容和数据流程分析,设计如下面所示的
24、数据项和数据结构:好友注册模块网站管理模块好友个人管理模块好友注册信息好友登陆验证个人资料管理相片管理好友请求管理回复管理留言管理注册会员管理交友系统第 11 页 共 41 页 用户信息包括的数据项有:user_id(自动编号),用户名,密码和注册日期 。 用户详细注册信息包括的数据项有:lar_id(自动编号), 用户 ID,姓名,生日,年龄,学历,职业,电话,性格,星座等。 留言信息包括的数据项有:ID(自动编号) ,留言者姓名,留言内容,对方用户 ID,留言者 ID。 好友信息包括的数据项有: ID(自动编号) ,用户名,性别,地区。有了上面的数据结构、数据项和数据流程,我们就能进行下面
25、的数据库设计。3.1 概念结构设计得到上面的数据项和数据结构以后,就可以设计出满足用户的各种窗体,以及它们之间的关系,为后面的逻辑结构设计打下基础。本实例根据上面的设计规划出的实体有:用户信息实体、书类信息实体、书简介信息实体、进书表信息实体,各个实体具体的描述 E-R 图如下。用户管理信息实体的 E-R 图如下:好友信息实体的 E-R 图如下:好友简介信息实体的 E-R 图如下:用户信息实体用户名 密 码留言信息实体用户留言信息 对方 ID好友信息实体姓名 年龄 爱好 电话交友系统第 12 页 共 41 页3.2 逻辑结构设计数据库的概念结构设计完成后,现在可以将上面的数据库概念结构转化为数
26、据库的逻辑结构。我 现 在 将 用 下 面 的 一 个 表 来 表 示 交 友 系 统 数 据 库 中 一 个 表 的 设 计 。用户简单信息注册表如下:列名 数据类型 字段大小 必填字段 默认值User_id 整 型 4User_name 文 本 18 是Password 文 本 18 是用户详细注册信息表如下:列名 数据类型 字段大小 必填字段 默认值Lar_id 整 型 4User_id 整 型 4Name 文 本 10 是Sex 文 本 2 是Britherday 文 本 12 是age 整 型 4 是 0Home 文 本 30 是 0Education 文 本 10 是Job 文 本
27、 20 是Company 文 本 50 是Tel 文 本 20 是Netname 文 本 10 是Email 文 本 50 是Homepage 文 本 50 是Music 文 本 50 是Book 文 本 20 是People 文 本 30 是Interest 文 本 50 是Photo 整 型 4 是ip 文 本 14 是Star 文 本 50 是交友系统第 13 页 共 41 页用户留言信息表如下:列名 数据类型 字段大小 必填字段 默认值ID 整 型 4NetNAME 文 本 4 是Word 文 本 255 是For_id 4 4User_id 货 币 4好友信息表如下:列名 数据类型
28、字段大小 必填字段 默认值ID 整 型 4NetNAME 文 本 50 是sex 文 本 50 是home 文 本 50 是For_id 整 型 4User_id 整 型 43.3 数据库的实现经 过 前 面 的 需 求 分 析 和 概 念 结 构 设 计 以 后 。 现 在 就 可 以 在Access 数 据 库 中 创 建 数 据 表 了 。打 开 Access 软 件 , 新 建 数 据 库 命 名 为 “date.mdb”, 目 的 是 为 了方 便 用 户 理 解 。 在 其 上 通 过 表 设 计 器 分 别 新 建 用户信息表、好友信 息 表 、好 友 详 细 信息表、留言信息表
29、。在用户信息表中添字段时,必须考虑到用户名和密码的数据类型和字段大小。经过我的考虑,我定用户名和密码的数据类型为文本型即什么类型的字符都可以。定用户名的字段大小为 18 个字符,密码的字段大小为 18 个字符。同理,我考虑好了用户简单信 息 表 、 用 户 详细信息表、留言信息表,以及好友信息表中应填写的字段名,且经过考察,定下了这些字段的数据类型和交友系统第 14 页 共 41 页字段大小。在 填 写 记 录 时 , 一 定 要 谨 慎 , 和 字 段 名 必 须 相 对 应 , 且 要 符 合 字 段 名的 数 据 类 型 和 字 段 大 小 。 我 按 照 自 己 定 下 的 规 格 ,
30、 将 自 己 收 集 到 的 数 据填 写 在 了 相 应 的 表 中 。第 四 章 系 统 详 细 设 计有 了 上 面 的 系 统 分 析 和 数 据 库 分 析 , 便 可 以 利 用 ASP 进 行 系 统 的设 计 了 。 在 桌 面 建 立 “FRIEND 在 其 下 建 立 “IMAGES, 和 “DATE 下 分别 存 放 生 成 文 件 , 图 片 文 件 和 数 据 库 文 件 。4.1 主 界 面 的 设 计 及 分 析运行 ASP,新建一个虚拟目录“FRIEND” ,新建站点。建立交友系统主控界面如下图:(图 4.1.1)交友系统第 15 页 共 41 页其上有上有各种
31、类型的菜单选项,如好友注册、个人档案、相片上传、档案注册、好友登陆。以及下一级子菜单。可根据自己的需求进行选择。且工具栏上有相对应的快捷按钮,方便用户,为用户节省时间。窗体右面的类型表即书类型和书类型代号的对应表是为了提醒用户,方便用户,让用户不必强行记忆这么多东西,就是忘了也可方便查找。 4.2 各 界 面 的 设 计 及 分 析4.2.1 网 友 注 册 模 块网 友 注 册 包 括 以 下 子 模 块 : 会 员 注 册 reg.asp regsubmit.asp regok.asp register.asp ladd.asp read.asp 用 户 登 陆 验 证 default.a
32、sp login.asp your.asp各 子 模 块 联 系 如 下 :会员注册是否注册成功注册成功 重新注册填写个人详细信息添加成功档案查看交友系统第 16 页 共 41 页是 否是 否 1. 用户注册页面:reg.asp 页面示例会员登陆验证用户是否正确用户管理页 重新登陆交友系统第 17 页 共 41 页a.页面中需要用户填写的 HTML 表单元素有:名称 表单元素类型 含义 最大长度User_name Text 用户
33、登陆名称 10Password Password 用户登陆密码 10Password_two Password 确认密码 10b.页面所涉及的数据表信息:此页面仅向系统提供用户名和密码。c.页面代码分析:1 thenresponse.redirect “havereg.htm“end if%2. 注册不成功页面:regsubmit.asp 页面示例交友系统第 18 页 共 41 页a.页面中需要用户填写的 HTML 表单元素有:此页面无需填写 HTML 表单元素。b.页面所涉及的数据表信息:此页面仅向系统提供用户住册名称和密码。c.页面代码分析:第 19 页 共 41 页rs_user(“us
34、er_name“)=user_namers_user(“password“)=passwordrs_user(“date“)=daters_user.updaters_user.movelastsession(“user_id“)=rs_user(“user_id“)rs_user.close如果用户住册成功直接跳转到 regok.aspresponse.redirect “regok.asp“response.endelse%3. 用户住册成功页:regok.asp 页面示例交友系统第 20 页 共 41 页a.页面中需要用户填写的 HTML 表单元素有:此页面无需填写 HTML 表单元素。
35、b.页面所涉及的数据表信息:此页面没有涉及数据库表的信息4. 用户填写个人信息页register.asp 页面示例a.页面中需要用户填写的 HTML 表单元素有:交友系统第 21 页 共 41 页名称 表单元素类型 含义 最大长度name Text 真实姓名 10Home Text 籍贯 10company Text 所在单位 50Postalcode Text 邮编 6Tel Text 联系电话 20Fresume Text 简历 200Netname Text 网名 10Homepage Text 主页 50Email Text 邮箱 50Chartroom Text 常进的聊天室 50S
36、port Text 喜欢的运动 30Book Text 喜欢的书 50People Text 喜欢的人 30Interest Text 爱好 50Music Text 喜欢的音乐 50Adage Text 人生格言 50Character Text 性格简介 50b.页面所涉及的数据表信息:此页面为用户填写个人信息。c.页面代码分析:第 22 页 共 41 页if isnull(session(“user_id“) thenresponse.redirect “timeout.htm“end if'叛断此用户是否已经入会if session(“user_id“)=“1“ thenres
37、ponse.redirect “notreg.htm“response.endend if'判断是否已经填写档案Set rs_lar = Server.CreateObject(“ADODB.Recordset“)sql=“select * from larchives where user_id =“ dbq=“ “response.write “history.go(-1);“response.write “response.endend if交友系统第 28 页 共 41 页if InStr(LCase(password),“'“)0 then response.writ
38、e “response.write “alert('密码不合法,请重新输入!');“response.write “history.go(-1);“response.write “response.endend ifif server.HTMLEncode(user_name)0 or InStr(user_name,“】“)0 or InStr(user_name,“ “)0 then response.write “response.write “alert('数据填写有错!');“response.write “history.go(-1);“respon
39、se.write “response.endend if8.用户登陆成功显示页your.asp 页面示例交友系统第 29 页 共 41 页a.页面中需要用户填写的 HTML 表单元素有:此页面无需填写 HTML 表单元素。b.页面所涉及的数据表信息:此页面仅向系统提供登陆正确信息。本页面用到了简单用户注册信息表uaer_reg,用户详细注册表 larchives,信息表 leaveword,好友列表friend 等。c.页面代码分析:第 30 页 共 41 页if isempty(session(“user_id“) thenresponse.redirect “timeout.htm“end
40、 if'叛 断 此 用 户 是 否 已 经 注 册if session(“user_id“)=1 then response.redirect “notreg.htm“Set rs_lar = Server.CreateObject(“ADODB.Recordset“)sql=“select * from larchives where user_id =“ & session(“user_id“)rs_lar.open sql,conn,3,2'叛 断 此 用 户 是 否 已 经 提 交 档 案if rs_lar.eof and rs_lar.bof thenresp
41、onse.redirect “notregist.htm“response.endend ifSet rs_word = Server.CreateObject(“ADODB.Recordset“)sql=“select * from leaveword where for_id=“ & session(“user_id“) & “ order by id desc“rs_word.open sql,conn,1,1set rs_apply=server.createobject(“adodb.recordset“)sql=“select * from apply where for_id=“ & session(“user_id“)rs_apply.open sql,conn,3,2set rs_back=server.createobject(“adodb.recordset“)