利用 ASP 技术开发邮政远程教学系统的选课、退课功能的设计与程序实现 摘要 结合远程 教学系统开发的经历，介绍了如何利用 ASP 技术实现网上选课、退课功能。关键词 ASP；远程教学；选课；退课；Oracle 1 引言 ASP 是“Active Server Pages”的简写，即 “动态服务器网页”,是一种被广泛用于创建动态网页的功能强大的服务器端脚本语言。笔 者参与的是邮政远程教学系统项目开发，本系统采用 Windows NT4.0 Server，WEB 服务采 用 IIS4.0/5.0，与后台数据库采用 ODBC 连接，使用 ASP 技术实现系统的动态页面效果。 该系统主要针对邮政职工的在职远程学习、远程技术讨论和交流，并为业务管理提供支撑 服务。远程教学网站将开设许多业务课、技术课供学员学习，因此学员可以自由的选择一 些课程来学习。下面主要介绍本系统网上选课、退课的流程设计及如何利用 ASP 技术实现 功能。 2 远程教学系统概述现代远程教育是随着现代信息技术的发展而产生的一种新型教 育方式，是构筑知识经济时代人们终身学习体系的主要手段。远程教学是邮政继续教育的 一个有效途径。邮政远程教学系统可以及时把邮政新技术、新业务放在网上交流探讨，网 上学员可以随时随地学习、提高，一定程度上可以减轻脱产短期培训给企业造成费用支出 的压力。本系统总体上定位为“基于 Web 的开放式多媒体远程教学系统” 。这一类远程教 学系统主要为窄带、非实时的应用系统，它采用 WEB 服务器和数据库服务器作为远程教 育网的服务器，用户（学员）在接入因特网的计算机上，通过浏览器连到教学系统的 WEB 服务器上，完成教学内容的浏览、课件下载、实时答疑等各项学习活动。同样，教师也通 过浏览器以教师身份登录到 WEB 服务器上实施教学和答疑。系统采用目前流行的 Web 应 用的三层 B/S 瘦客户体系结构，即数据层、功能层、表示层。 3 学员学习流程首先学员通 过网络浏览远程教学网页，根据自己的需要选择不同的专业、课程，在学员将学习课程所 需要的费用交纳后即可以通过该网站进行学员注册，学员输入个人的相关信息并注册成功 后就成为了远程教育网的正式学员，从而可以将自己所选择的课程课件下载学习（为降低 费用推荐课件下载，网下学习） 。为了解决学员在学习过程中遇到的问题，教学网安排老师 在网上进行辅导，学员可以通过发 E-mail 询问，也可以登录教学网站的交流室与其他学生 或辅导老师进行讨论，或访问课程问题集锦，发表自己的问题、查看问题的答案。在学员 学习完成后，如顺利通过相应考试即可结业，并且可以通过远程教育网查询成绩。 3 选课、 退课功能概要设计目标：为登录远程教学系统的学员提供选择学习课程的功能，要根据学 员的交费情况判断课程是否可选。输入：本人资金余额（来自帐户信息表） ，可选课程清单 （来自学员课程信息表） 。加工： 学员类型、权限，禁止非法客户操作。 帐户表中 查出本人帐户资金余额，若为零则禁止。 从学员选课表中，查出并显示该学员已选课 程。 列出目前网站可供该学员选择的课程(该学员的已选课程出外)，以及每门课程的 具体信息，包括课程开课时间、任课教师、学时、费用及简单的内容介绍。 接收用户 选课、退课操作，如开课时间未到，学员可以把已选课程退掉，及退课。也可将新课程选 中，即选课。根据员的操作，系统随时计算、显示该学员的资金余额，并随时刷新该学员 已选课程列表和可选课程列表。 选课操作过程中，计算学员资金余额-所选课程费 用的值，该值小于零，则选择无效、操作失败；若大于等于零，经用户确认后保存，同 时把该值记入账户信息表，形成新的资金余额；退课操作完成之前，计算学员资金余额 +所退课程费用的值，并把该值记入账户信息表，形成新的资金余额。 在学员选课 表中添加（选课）或注销记录（退课） ，资金余额写入帐户信息表，资金增减明细写入资金 明细表。输出：选课结果（学员选课表） ，费用明细（资金明细表） ，资金余额（帐户信息 表）的更新。 4 选课、退课功能程序实现 选课、退课功能的实现主要采用了 ORACLE 数据库访问的 ADO 技术，ADO 是 ASP 技术的核心之一，它集中体现了 ASP 技术丰富而 灵活的数据库访问功能。 将学员已选课程列表显示、可选课程列表显示与选课操作的 处理写成了一个应用程序 choicelesson.asp，这样通过多次调用应用程序本身，可以随时刷新这两个课程列表及资金余额显示。 将学员已选课程列表显示、可选课程列表显示与 退课操作的处理写成了一个应用程序 cancellesson.asp，这样通过多次调用应用程序本身， 可以随时刷新这两个课程列表及资金余额显示。下面以选课功能的源程序为例：选课功能 部分源代码 choicelesson摘要 结合远程教学系统开发的经历，介绍了如何利用 ASP 技术实现网上选课、退课功能。关键词 ASP；远程教学；选课；退课；Oracle 1 引言 ASP 是“Active Server Pages”的简写，即“动态服务器网页”,是一种被广泛用于创建动态 网页的功能强大的服务器端脚本语言。笔者参与的是邮政远程教学系统项目开发，本系统 采用 Windows NT4.0 Server，WEB 服务采用 IIS4.0/5.0，与后台数据库采用 ODBC 连接， 使用 ASP 技术实现系统的动态页面效果。该系统主要针对邮政职工的在职远程学习、远程 技术讨论和交流，并为业务管理提供支撑服务。远程教学网站将开设许多业务课、技术课 供学员学习，因此学员可以自由的选择一些课程来学习。下面主要介绍本系统网上选课、 退课的流程设计及如何利用 ASP 技术实现功能。 2 远程教学系统概述 现代远程教育是随着现代信息技术的发展而产生的一种新型教育方式，是构筑知识经济时 代人们终身学习体系的主要手段。远程教学是邮政继续教育的一个有效途径。邮政远程教 学系统可以及时把邮政新技术、新业务放在网上交流探讨，网上学员可以随时随地学习、 提高，一定程度上可以减轻脱产短期培训给企业造成费用支出的压力。 本系统总体上定位为“基于 Web 的开放式多媒体远程教学系统” 。这一类远程教学系统主 要为窄带、非实时的应用系统，它采用 WEB 服务器和数据库服务器作为远程教育网的服 务器，用户（学员）在接入因特网的计算机上，通过浏览器连到教学系统的 WEB 服务器 上，完成教学内容的浏览、课件下载、实时答疑等各项学习活动。同样，教师也通过浏览 器以教师身份登录到 WEB 服务器上实施教学和答疑。系统采用目前流行的 Web 应用的三 层 B/S 瘦客户体系结构，即数据层、功能层、表示层。 3 学员学习流程 首先学员通过网络浏览远程教学网页，根据自己的需要选择不同的专业、课程，在学员将 学习课程所需要的费用交纳后即可以通过该网站进行学员注册，学员输入个人的相关信息 并注册成功后就成为了远程教育网的正式学员，从而可以将自己所选择的课程课件下载学 习（为降低费用推荐课件下载，网下学习） 。为了解决学员在学习过程中遇到的问题，教学 网安排老师在网上进行辅导，学员可以通过发 E-mail 询问，也可以登录教学网站的交流室 与其他学生或辅导老师进行讨论，或访问课程问题集锦，发表自己的问题、查看问题的答 案。在学员学习完成后，如顺利通过相应考试即可结业，并且可以通过远程教育网查询成 绩。 3 选课、退课功能概要设计 目标：为登录远程教学系统的学员提供选择学习课程的功能，要根据学员的交费情况判断 课程是否可选。 输入：本人资金余额（来自帐户信息表） ，可选课程清单（来自学员课程信息表） 。 加工： 学员类型、权限，禁止非法客户操作。 帐户表中查出本人帐户资金余额，若为零则禁止。 从学员选课表中，查出并显示该学员已选课程。 列出目前网站可供该学员选择的课程(该学员的已选课程出外)，以及每门课 程的具体信息，包括课程开课时间、任课教师、学时、费用及简单的内容介绍。 接收用户选课、退课操作，如开课时间未到，学员可以把已选课程退掉，及 退课。也可将新课程选中，即选课。根据员的操作，系统随时计算、显示该学员的资金余 额，并随时刷新该学员已选课程列表和可选课程列表。 选课操作过程中，计算学员资金余额-所选课程费用的值，该值小于零， 则选择无效、操作失败；若大于等于零，经用户确认后保存，同时把该值记入账户信息表， 形成新的资金余额；退课操作完成之前，计算学员资金余额+所退课程费用的值，并 把该值记入账户信息表，形成新的资金余额。 在学员选课表中添加（选课）或注销记录（退课） ，资金余额写入帐户信息表， 资金增减明细写入资金明细表。 输出：选课结果（学员选课表） ，费用明细（资金明细表） ，资金余额（帐户信息表）的更 新。 4 选课、退课功能程序实现 选课、退课功能的实现主要采用了 ORACLE 数据库访问的 ADO 技术，ADO 是 ASP 技 术的核心之一，它集中体现了 ASP 技术丰富而灵活的数据库访问功能。 将学员已选课程列表显示、可选课程列表显示与选课操作的处理写成了一个应用程序 choicelesson.asp，这样通过多次调用应用程序本身，可以随时刷新这两个课程列表及资金 余额显示。 将学员已选课程列表显示、可选课程列表显示与退课操作的处理写成了一个应用程序 cancellesson.asp，这样通过多次调用应用程序本身，可以随时刷新这两个课程列表及资金 余额显示。 下面以选课功能的源程序为例： 选课功能部分源代码 choicelesson.asp： 姓名：“你的资金余额为：“（选课操作）“response.write “已选的课程列表：“response.write “response.write “课程编号课程名学 时学分费用开课时间结课时间选课时间 “ do while not rs.eofloopresponse.write “end ifresponse.write “可选的课程列表：“ /判断用户是否选过课if rs.eof then sql2=“select * from lesson a ,teacher_lesson b “_&“where a.lesson_id=b.lesson_id and b.class_no=“&classno&“set rs2=cn.execute(sql2)/判断是否有允许选的课程if rs2.eof then response.write “无“elseresponse.write “response.write “_&“课程编号课程名学时学分“_&“费用开课时间截课时间操作“ do while not rs2.eofresponse.write “_&rs2(“lesson_id“)&“_&rs2(“lesson_name“)&“_&rs2(“period“)&“_&rs2(“credit“)&“_&rs2(“lesson_fee“)&“_&rs2(“start_time“)&“_&rs2(“end_time“)&“fy=cint(rs2(“lesson_fee“)fy1=su-cint(rs2(“lesson_fee“)if fy1“else /资金足可以选此课，带着数据链接到本程序文件，即回到前面用户提交选课操作的处理response.write “end if rs2.movenextloopresponse.write “end if/用户已经选过课else sql1=“select b.* from teacher_lesson a,lesson b where a.class_no=