学生信息管理系统分析与设计.doc

学生信息管理系统分析与设计

———————————————————————————————— 作者：
———————————————————————————————— 日期：

2

个人收集整理 勿做商业用途

沈阳航空航天大学北方科技学院
课程设计说明书

课程名称 电子商务系统分析与设计

教 学 部 经管教学部
专 业
班 级
学 号
学 生 姓 名
指 导 教 师
成 绩

3

沈阳航空航天大学北方科技学院
课程设计任务书
课程设计题目 学生信息管理系统分析与设计　 　　　
教 学 部 经管部 专业信息管理与信息系统（电子商务方向）　
班级 学号 姓名 　
课程设计时间: 2011年 06 月 28 日 至2011 年07 月 16 日
（一）课程设计目的
本课程是针对《管理信息系统》、《数据库原理》等课程而开设的。该课程在继承软件工程和信息系统分析与设计的思想、方法、技术和工具的基础上,从系统化的思想及结构化开发方法入手,全面体现电子商务系统特色、规划方法、系统分析及设计，并依据电子商务自身的特点，着重针对网站、支付系统及安全系统进行分析设计。
（二）课程设计内容及要求
利用系统开发工具（例如ASP、JSP等）、数据库采用SQL server2000开发一个实用的中小型网上管理信息系统.
1.合理的进度安排，按照系统开发的流程及方法，踏实地开展课程设计工作.
2.总体结构设计首先要在需求分析的基础上确定应用系统的模块结构,并根据模块的设计原则进行分析和综合.模块划分时应尽可能使每一个模块的功能简单、明确.
3。界面设计风格要求统一、布局合理；程序设计中要有适当注释,便于阅读。
4。课程设计过程中，根据选题的具体需求，在开发各环节中撰写相关的技术文档，最后要求提交各环节详细的报告文档及完整源程序，主要包括：需求分析、功能需求、数据库设计（逻辑设计、物理设计）、应用系统设计、编码和调试过程分析，课程设计总结。
5。开发出可以运行的管理信息系统，学生对设计成果进行现场演示，并进行答辩。
（三）主要参考书
[1] 薛华成编，《管理信息系统》，北京： 清华大学出版社 2006年7月
[2] 王珊编,《数据库系统概论》，高等教育出版社 ,2006年5月
[3] ASP+SQL Server典型网站建设案例 顼宇峰 清华大学出版社 2006年
[4] ASP+SQL Server网站开发实例精讲 龙马工作室 人民邮电出版社 2007年
[5] 从零开始—-SQL Server2005中文版基础培训教程 宋晓峰 人民邮电出版社 2007年
（四）评语

（五）成绩

指导教师 2011 年 06 月 28 日
负责教师 年 月 日

目 录

前言 6
1 可行性分析 7
1。1 开发工具的介绍 7
1.1。1 ASP的特点 7
1。1.2 Access 9
1。2 IIS简介 9
1.2 可行性报告 10
1。2。1 开发必要性 10
1.2.2 技术可行性 10
1。2。3 经济可行性 10
2 系统分析 11
2。1 系统需求分析 11
2.2 功能需求分析 11
2。3 组织结构分析 11
2。4 业务流程分析 12
2.5 数据与数据分析 12
2。5。1 数据分析 12
3 系统设计 13
3。1 系统总体结构设计 13
3。2 子系统/ 模块划分 13
3。2。1 网站前台总体模块设计 13
3.2。2 网站后台总体模块设计 13
3。3 代码设计 13
3.4 数据结构设计 14
3。4。1 E-R图设计(概念结构设计） 14
3。4.2 建立关系数据库表 14
4 系统实现 16
4.1 管理员登录页面设计 16
4。2 后台界面设计 16
4.3 学生信息模块程序设计 17
4.3.1 学生信息添加 17
4。3。2 学生学籍管理 17
4.3.3 管理员管理 18
课程设计总结 19
参考文献 20
附录Ⅰ 添加代码 21
附录Ⅱ 删除代码 24
附录Ⅲ 修改代码 27

前言

当今时代是飞速发展的信息时代,在各行各业中离不开信息处理，这正是计算机被广泛应用于信息管理系统的环境。计算机的最大好处在于利用它能够进行信息管理.使用计算机进行信息控制，不仅提高了工作效率,而且大大的提高了其安全性.尤其对于复杂的信息管理,计算机能够充分发挥它的优越性。 管理信息系统是进行信息的采集,存储，加工，维护和使用的系统,它是随着管理科学和技术科学的发展而形成的。学生信息管理系统是一个教育单位不可缺少的部分，它的内容对于学校的决策者和管理者来说都至关重要，所以学生信息管理系统应该能够为用户提供充足的信息和快捷的查询手段，对学生来说可以轻松的查阅自己在校的成绩以及信息等.但是一直以来人们都是靠传统人工的方式管理学生信息，这种管理方式存在着许多缺点，如:效率低,保密性差,另外时间一长，将产生大量的文件和数据，这对于查找,更新和维护都带来了不少的困难. 随着科学技术的不断提高,计算机科学日渐成熟，其强大的功能已为人们深刻认识，它已进入人类社会的各个领域并发挥着越来越重要的作用。作为计算机应用的一部分，使用计算机对学生信息进行管理，有着手工管理所无法比拟的优点。例如：检索迅速,查找方便，可靠性高，存储量大，保密性好，寿命长，成本低等。这些优点能够极大地提高学生成绩管理的效率,也是企业的科学化，正规化管理,与世界接轨的重要条件。因此,开发这样的一套信息管理系统成为很有必要的事情. 学生信息管理系统提供了强大的学生信息管理管理功能，方便系统管理员对学生信息的添加,修改,删除,查询等操作。文档为个人收集整理，来源于网络本文为互联网收集，请勿用作商业用途

1 可行性分析
1。1 开发工具的介绍
1。1。1 ASP的特点
ASP是一种未经编译的开放式的应用软件，是微软公司推出的一种用以取代CGI（公共网关接口即Common Gateway Interface)的技术，它实质上是一种服务器端脚本环境。ASP被包含在IIS 3.0及其更高版本之中。通过ASP，用户可以结合HTML网页、ASP指令和ActiveX组件建立动态、交互且高效的Web服务器应用程序。ASP的出现使用户不必担心客户端不能正确运行所编写的代码，因为所有的程序将在服务器端执行，包括所有内嵌的普通HTML中的脚本程序。客户端只要使用可执行HTML代码的浏览器，即可浏览通过ASP设计出来的页面内容。当程序执行完毕后，服务器仅将执行的结果返回给客户端浏览器，这样也就减轻了客户端浏览器的负担，大大提高了交互的速度。
ASP并不是一种纯粹的编程语言,它所用的语言是大多数人都非常熟悉的两种脚本语言,即VBScript和JavaScript语言。在一个ASP应用程序中可以用其中一种脚本语言，也可以结合这两种语言使用。另外ASP还能与任何ActiveX Scripting语言相兼容。
ASP使用的ActiveX技术是基于开放设计环境的，用户可以使用Visual Basic、Java、Visual C++、GOBOL等编程语言将自己定义和制作的组件加入其中，是自己的动态网页具有无限的扩充能力，这是传统的CGI等程序所远远不及的地方。另外，ASP可利用ADO（Active Data Object，微软公司的一种数据访问模型)方便地访问数据库，从而使得开发基于WWW的应用系统成为可能。
ASP的编辑环境要求非常简单，任何一种文本编辑器都可以编写ASP应用程序。
使用ASP开发网页应用程序具有以下一些特点:
（1）完全内嵌，与HTML和Script语言充分结合。
（2)无需编译，容易编写，可在服务器端直接运行，且Web程序开发时间短。
(3）无浏览器兼容问题。
（4)程序代码隐藏，在客户端只能看到由ASP输出的动态HTML文件.
（5）使用任何文本编辑器都可以进行编辑设计。
(6）可使用任何语言编写自己的ActiveX Server组件。
（7）使用ADO组件轻松存取数据。
（8）面向对象，并可扩展的ActiveX Server组件。
一个以ASP为基础的应用程序包含了Web服务器的虚拟目录(Virtual Directory）以及虚拟目录下的所有文件夹与执行文件。虚拟目录主要是为了保护服务器端站点的内容和资料，避免受到网络黑客的恶意破坏和攻击而产生的。在提供WWW服务的服务器端，虚拟目录的作用是不让客户端用户知道一些目录与重要文件的真实路径,也就是说每一个绝对路径（即真实路径）都已经隐藏起来，这些可以供网络客户访问的Internet资源都会以服务器的文档根目录（Document Root）作为相对路径的基点（Base）,或者另取一个从表面上看来毫无关系的别名(Alias Name）来隐藏真实目录名称。这些相对目录就称为虚拟目录，相对路径和绝对路径是相对立的。
另外,每个ASP Web应用程序都拥有一个Global.asa文件，后缀名asa是Active Server Application的缩写。
（1） ASP文件的存取方式
使用任何一种文本编辑器都可编写ASP应用程序，编写的程序要以后缀名。asp保存，不可以保存为。html形式。如果是以。html形式保存的话，服务器端将不编译文件中所有的包含ASP语法的语句。
将文件保存为后缀名.asp的形式是为了告诉提供ASP服务的服务器，这是一个ASP应用程序，必须在给客户端送出文件之前把它编译一遍。将.asp后缀名的文件编写存储完毕之后，就可以把它放在自己的Web服务器上执行,这样就能够在浏览器端看到ASP页面的输出效果了。
(2) ASP文件的结构特点
到目前为止，我们已经知道ASP能够和HTML、Script语言完美结合。在这之前一直都称开发的项目为应用程序，或许有些人认为ASP文件是一个已经被编译过的文件，但ASP文件是一个文本文件，可以用任何一种编辑器打开它,并对它进行适当的编辑修改。
一般情况下一个ASP包含以下几个部分：
(1）普通的HTML文件。
（2）客户端的Script程序代码，放置于〈Script>和〈/Script〉标签之内.
（3）服务器端的ASP Script程序代码,放置于<％ 。 。 。 %>标签之内。
（4)Server Side Include语句，即使用#Include的语法在本页面嵌入其他的Web页面.ASP的服务器会将其原封不动的发送到客户端，由客户端的浏览器进行处理。目前在ASP中可以使用的脚本语言主要是VBScript和Jscript，其中系统默认的脚本语言为VBScript。不过任何一个可以和ActiveX Script标准兼容的脚本语言引擎都可以很好地应用于ASP之中.

1.1.2 Access
Access是一个数据库管理系统,它之所以被集成到Office中而不是Visual  Studio中,是因为它与其它的数据库管理系统（如SQL Server 2000）相比更加简单易学，一个普通的计算机用户即可掌握并使用它。而且最重要的一点是,Access的功能足够强大，足以应付一般的数据管理及处理需要。
Access可以实现建立数据库、报表，以及对数据库、报表的修改、查询等功能。
Access随着Windows操作系统和Offices办公自动化应用软件的普及， Access各个版本变得与其他Office成员集成得越来越紧密。Office2000的所有成员和VisualBasic6。0现在共享的是同样的VisualBasicforApplications（VBA)版本6。0。Access2000最后采纳了Office2000VBA编辑器(也叫做集成开发环境或者IDE)用于编写VBA代码来自动操作Access应用。不论好坏，Access2000还共享了Office2000新的超文本标记语言（HTML）帮助系统.Access最主要用的是创建数据库，并建立相应的软件的连接。如ODBC的连接。
1.2 IIS简介
IIS是Windows NT提供的Internet服务的核心，Windows NT的安装光盘上带有IIS。IIS是微软公司为企业和部门发布信息而设计的，一般用于大型的站点。
IIS 5。1 是新一代的Web服务器软件，它包括许多新的特征：
(1) ASP3。0解释工具和ASP调试工具。
（2） 功能强大的Microsoft Management Console、Microsoft Transaction
Server等管理工具。
(3) 对多Web站点（虚拟主机）支持。
（4) 对Web站点内容完全控制。
（5） 使用SSL3进行更加安全的客户验证。
(6) Microsoft Index Server微软高性能索引器。
（7） HTTP1。1和HTTP重定向支持.
(8) 用来进行站点评估的Site Analyst。

1。2 可行性报告
1.2.1 开发必要性
人们对于新闻信息的迫切需求日益增加，而传统手段无法满足人们对新闻信息庞杂的需求程度.
现如今人们的日常的生活已经离不开网络,而人们对于电视和报纸的需求量却逐年减少,更有一部分人每天生活的环境就是在电脑和网络的包围之中，开发网上新闻管理系统是顺应时代和顺应潮流的选择。
时代的生活节奏越来越快,很少有人能够安安稳稳的坐在那里读一份报纸,紧张而快节奏的生活也使得人们无法习惯于电视加报纸的生活。每年的互联网用户都在剧增，是否该建立网上新闻管理系统的答案已经很明显.
1。2.2 技术可行性
开发风险分析:
一般的网站开发风险包括以下几种情况:网站不能按期完工；某些开发商为了谈成这个项目虽然报价低但在网站开发过程中会在技术和设计上打折扣，不能达到预期的效果；网站和当初开发商承诺的效果不一致.
资源分析：
根据系统设计目的衡量系统从技术上是否完备,一般可从软、硬件环境和性能要求、技术人员水平和数量等方面考虑。从软硬件环境看，目前网络上的可租用的网络空间是很多的，同时性价比也相当不错。从网络环境上分析，网站的运营质量也取决于用户所在网络的网络状况。
1。2。3 经济可行性
现在，网络的覆盖面已经达到一个恐怖的地步而计算机的价格已经十分低廉,性能却有了长足的进步。而本系统的开发,为新闻的管理与发布带来了一个质的飞跃，其具体体现主要表现有以下几个方面:第一，本系统的运行可以代替人工进行许多繁杂的劳动;第二，本系统的运行可以节省许多资源;第三,本系统可以使敏感信息更加安全,第四，本系统可以利用现代网络技术对于新闻的发布与更新进行即使的解决。

33

2 系统分析
2。1 系统需求分析
具体内容：
如果我国各个学校管理水平还停留在纸介质的基础上,已不能适应时代的发展，因为它浪费了许多人力和物力，在当今的信息时代这种管理方法必然被计算机为基础的信息管理所取代。学生信息管理系统的开发,适合任何一个大中小学校的管理.

2.2 功能需求分析
该学生信息管理系统归纳起来有四点：
1．学生信息的插入。可以插入不同地区的学生的姓名、个人联系方法、所在院系、班级及相关情况。实现了信息的动态管理.
2．学生信息的查询。学生的信息使管理员可以通过多种方式（年级、班级、姓名、学号、所在系等等）的查询，就可以直接查看自己需要的学生的相关信息。实现了信息的动态管理。
3．学生信息的修改。管理人员可以随时对转入、转出的学生进行修改,比如学号、所在系等等实现了信息的动态管理。
4．学生信息的删除.管理人员可以随时对转入、转出的学生进行删除，比如学号、所在系等等实现了信息的动态管理.
好处为：
1． 可以存储怕有的学生档案，安全、高效；
2． 只需一到二名档案录入员即可操作系统，节省大量人力;
3． 可以迅速查找到所需要的信息.
2.3 组织结构分析
由于系统的局限性，以及使用者的单一性，所以系统只有后台操作,即描述的是管理员与数据库的相互关系.

2.4 业务流程分析

学生信息管理系统
学生资料管理
添加资料

修改资料

删除资料

查询资料

登录

2.5 数据与数据分析
学生信息管理系统离不开数据库系统的支持。由于数据库独立于程序而存在，具有较好的安全性，不论是新闻的信息，还是管理员信息都需要存放在数据库中。本系统的数据库采用Microsoft公司的大型数据库系统SQL Server 2000。
2。5。1 数据分析
在登录到本学生信息网站的后台时，其中涉及到两个表，其中一个是登录表，一个是学生信息表。他们之间的联系就是，当你输入登录表中的信息时，你可以添加、修改、删除学生学籍和成绩表中的记录。

3 系统设计
数据库是整个学生信息管理系统的核心部分。只有通过数据库的调用才能进行学生信息更新处理、插入资料、删除资料和查询资料，方便管理进行管理，减少管理员的工作量以及更多的人力。

3.1 系统总体结构设计
系统模块设计分为前台和后台。它们分别实现不同的功能，前台主要是针对学生查询核实自己的信息，后台针对的是网站管理员。前台和后台的相互连接，使得整个学生管理管理系统具有良好的动态性。
3。2 子系统/ 模块划分
这部分主要是为了后台管理员更加方便的对网站和学生信息进行管理.对学生管理增加了学生信息管理和学生成绩管理。
3。2。1 网站前台总体模块设计
（1）学生信息查询模块：将学生信息加以分类使学生和老师可以容易的找到自己想要得到的信息.
（2）学生成绩查询模块：学生在这里可以非常方便的查询到自己的成绩，可以更快的了解自己的的成绩事宜。
3.2.2 网站后台总体模块设计
（1）管理员管理模块：对进入后台的管理员进行管理.
（2）学籍管理模块：管理员可以对学生信息分类进行修改、添加、删除等操作。
（3）成绩管理模块：对学生考试的成绩进行分类添加、管理、分类。
3.3 代码设计
利用Dreamweaver8表格的形式设计好整体结构，以及基本的样式,然后利用该软件的特性，把已经利用SQL Server完成的数据库，与之静态网页相互联系起来。形成了ASP的网页,也就是所谓的动态页面。
3。4 数据结构设计
学生登录
3.4.1 E—R图设计（概念结构设计)

修改密码
成绩查询
学籍查询

图 3-1学生前台登录图
管理员登录

系统管理
查询系统
成绩管理
学籍管理

图 3—2管理员管理图
3。4。2 建立关系数据库表
管理员列表如下：
列名
数据类型
字段大小
必填字段
说明
yh
文本
50
否
用户名
mm
文本
50
否
密码
ID
自动编号
50
是
ID
学生信息：
列名
数据类型
字段大小
必填字段
说明
ID
自动编号
50
是
ID
姓名
文本
50
是
姓名
学号
文本
50
是
学号
政治面貌
文本
50
是
政治面貌
性别
文本
50
是
性别
身份证号
文本
50
是
身份证号
族别
文本
50
是
族别
入学时间
文本
50
是
入学时间
联系方式
文本
50
是
联系方式
学籍状态
文本
50
是
学籍状态
籍贯
文本
50
是
籍贯
家庭住址
文本
50
是
家庭住址

4 系统实现
4.1 管理员登录页面设计

图 4—1 后台登录页面
4。2 后台界面设计

图 4—2后台页面
4。3 学生信息模块程序设计
4.3.1 学生信息添加

图 4-3添加学生信息图
4。3。2 学生学籍管理

图 4-4学生管理图
4。3.3 管理员管理

图 4—5管理员管理图

课程设计总结

经过1个多月的努力，这套学生信息管理系统的构思、设计、上机运行调试已圆满结束.在此期间，我查阅了许多资料，也得到了老师和同学们得大力支持与帮助，我诚心的感谢他们！
刚开始设计这套系统的时候我遇到的许多难题。最主要的是不知如何入手，在指导老师的帮助下我对设计有了一个大概的了解.可是在具体编程的时候又遇到了不少的难题，有时一个很简单的内容不知为何就不能运行,有时一天才解决一个小小的问题。效率真是慢极了，不过在老师和同学的帮助及自己的努力的下,终于克服了重重困难,完成了这次课设.再问题解决时，那种胜利的喜悦又是无法用语音来形容的。也就是在这种不断出现的问题的灰心和不断解决问题的喜悦中,这套学生信息管理系统终于问世了。
通过这套系统的制作，我体会到了ASP的优.学以致用，是学习的目的,也是学习的最好的方法。它使我对面向用户有了更新的认识,使我懂得了只有越为用户着想,才会越受到欢迎。它也告诉我以后做事一定要有系统化、结构化、思路一定要严密。任何的计划,只有严密的思考加上反复的推敲才会更完善。也相信在以后的生活中，在解决问题方面我会更加勇敢积极地面对.
最后,我再次感谢帮助过我的老师和同学们,尤其是我的老师，他使我走入了ASP的大门，这次设计只是一个开始，以后我更加的努力，争取设计出更多、更好、更实用的软件和系统为大家提供服务.希望这套学生信息管理系统能真正发挥他的作用，为用户带来方便.

参考文献

［1］ 刘韬、骆娟 ASP+ACCESS组建动态网站［M]。 人民邮电出版社， 2005。06
[2] 袁枚、林志英、刘劲,网络数据库应用教程［M］. 人民邮电出版社, 2002。06
［3］ 尚俊杰 网络程序设计—ASP[M］， 2004。02
[4］ 史秀章 ACCESS应用技术教程[M], 2006.11
[5] 勒学辉， 数据库原理与应用［M］, 北京： 电子工业出版社, 2009
［6］ Nelson,《Microsoft SQL Server 2000 Collection 》[M],China Railway Publishing House.published: March 2009

附录Ⅰ 添加代码
〈％@LANGUAGE="VBSCRIPT" CODEPAGE="936"%〉
<!—-＃include file=”Connections/conn。asp” ——>
<%
' *** Edit Operations： declare variables

Dim MM_editAction
Dim MM_abortEdit
Dim MM_editQuery
Dim MM_editCmd

Dim MM_editConnection
Dim MM_editTable
Dim MM_editRedirectUrl
Dim MM_editColumn
Dim MM_recordId

Dim MM_fieldsStr
Dim MM_columnsStr
Dim MM_fields
Dim MM_columns
Dim MM_typeArray
Dim MM_formVal
Dim MM_delim
Dim MM_altVal
Dim MM_emptyVal
Dim MM_i

MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME”)）
If (Request。QueryString 〈〉 "") Then
MM_editAction = MM_editAction & ”？” & Server.HTMLEncode（Request。QueryString)
End If

' boolean to abort record edit
MM_abortEdit = false

' query string to execute
MM_editQuery = "”
％〉
<％
' ＊*＊ Insert Record： set variables

If (CStr(Request("MM_insert”)） = ”form1"） Then

MM_editConnection = MM_conn_STRING
MM_editTable = ”dbo。shangping"
MM_editRedirectUrl = "manage。asp"
MM_fieldsStr = "spname｜value｜yuanjia|value|xianjia|value"
MM_columnsStr = "spname｜’,none，’’｜yuanjia|’，none,’'｜xianjia｜’，none,’'"

' create the MM_fields and MM_columns arrays
MM_fields = Split（MM_fieldsStr, ”|"）
MM_columns = Split(MM_columnsStr, "|”)

’ set the form values
For MM_i = LBound(MM_fields） To UBound(MM_fields) Step 2
MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i)）)
Next

’ append the query string to the redirect URL
If （MM_editRedirectUrl <> ”" And Request。QueryString 〈> ""） Then
If (InStr(1， MM_editRedirectUrl， ”？", vbTextCompare） = 0 And Request.QueryString 〈〉 ””） Then
MM_editRedirectUrl = MM_editRedirectUrl & ”?" & Request。QueryString
Else
MM_editRedirectUrl = MM_editRedirectUrl & ”&” & Request.QueryString
End If
End If

End If
％〉
<%
' ＊*＊ Insert Record: construct a sql insert statement and execute it

Dim MM_tableValues
Dim MM_dbValues

If （CStr（Request("MM_insert”)） 〈〉 ””) Then

’ create the sql insert statement
MM_tableValues = ""
MM_dbValues = ""
For MM_i = LBound（MM_fields) To UBound（MM_fields） Step 2
MM_formVal = MM_fields(MM_i+1）
MM_typeArray = Split(MM_columns(MM_i+1）,","）
MM_delim = MM_typeArray(0)
If (MM_delim = ”none") Then MM_delim = ””
MM_altVal = MM_typeArray(1)
If （MM_altVal = ”none”） Then MM_altVal = ”"
MM_emptyVal = MM_typeArray（2）
If （MM_emptyVal = ”none") Then MM_emptyVal = "”
If （MM_formVal = ""） Then
MM_formVal = MM_emptyVal
Else
If (MM_altVal 〈> ”"） Then
MM_formVal = MM_altVal
ElseIf （MM_delim = "'"） Then ’ escape quotes
MM_formVal = ”'" & Replace(MM_formVal,”'”,”'’”) ＆ ”’"
Else
MM_formVal = MM_delim + MM_formVal + MM_delim
End If
End If
If （MM_i <〉 LBound（MM_fields)) Then
MM_tableValues = MM_tableValues ＆ ","
MM_dbValues = MM_dbValues ＆ ",”
End If
MM_tableValues = MM_tableValues ＆ MM_columns（MM_i）
MM_dbValues = MM_dbValues & MM_formVal
Next
MM_editQuery = "insert into ” & MM_editTable & ” （" ＆ MM_tableValues ＆ ") values (" & MM_dbValues ＆ ”)”

If （Not MM_abortEdit） Then
' execute the insert
Set MM_editCmd = Server.CreateObject（”ADODB。Command")
MM_editCmd。ActiveConnection = MM_editConnection
MM_editCmd。CommandText = MM_editQuery
MM_editCmd。Execute
MM_editCmd.ActiveConnection.Close

If （MM_editRedirectUrl <> "”) Then
Response.Redirect(MM_editRedirectUrl）
End If
End If

End If
%〉

附录Ⅱ 删除代码
〈%＠LANGUAGE=”VBSCRIPT" CODEPAGE="936"%>
〈!——＃include file="Connections/conn。asp” -—>
<％
’ *＊＊ Edit Operations: declare variables
Dim MM_editAction
Dim MM_abortEdit
Dim MM_editQuery
Dim MM_editCmd
Dim MM_editConnection
Dim MM_editTable
Dim MM_editRedirectUrl
Dim MM_editColumn
Dim MM_recordId
Dim MM_fieldsStr
Dim MM_columnsStr
Dim MM_fields
Dim MM_columns
Dim MM_typeArray
Dim MM_formVal
Dim MM_delim
Dim MM_altVal
Dim MM_emptyVal
Dim MM_i
MM_editAction = CStr(Request。ServerVariables("SCRIPT_NAME"）)
If (Request.QueryString 〈> "") Then
MM_editAction = MM_editAction ＆ "?" & Server.HTMLEncode(Request.QueryString）
End If
’ boolean to abort record edit
MM_abortEdit = false
' query string to execute
MM_editQuery = "”
%>
<%
' **＊ Delete Record: declare variables
if (CStr（Req