基于ASP的遠(yuǎn)程教學(xué)選課、退課功能的設(shè)計(jì)與實(shí)現(xiàn)

1、基于ASP的遠(yuǎn)程教學(xué)選課、退課功能的設(shè)計(jì)與實(shí)現(xiàn)摘要結(jié)合遠(yuǎn)程教學(xué)系統(tǒng)開發(fā)的經(jīng)歷，介紹了如何利用ASP技術(shù)實(shí)現(xiàn)網(wǎng)上選課、退課功能。關(guān)鍵詞ASP；遠(yuǎn)程教學(xué)；選課；退課；rale1引言ASP是“AtiveServerPages的簡(jiǎn)寫，即“動(dòng)態(tài)效勞器網(wǎng)頁(yè),是一種被廣泛用于創(chuàng)立動(dòng)態(tài)網(wǎng)頁(yè)的功能強(qiáng)大的效勞器端腳本語(yǔ)言。筆者參與的是郵政遠(yuǎn)程教學(xué)系統(tǒng)工程開發(fā)，本系統(tǒng)采用indsNT4.0Server，EB效勞采用IIS4.0/5.0，與后臺(tái)數(shù)據(jù)庫(kù)采用DB連接，使用ASP技術(shù)實(shí)現(xiàn)系統(tǒng)的動(dòng)態(tài)頁(yè)面效果。該系統(tǒng)主要針對(duì)郵政職工的在職遠(yuǎn)程學(xué)習(xí)、遠(yuǎn)程技術(shù)討論和交流，并為業(yè)務(wù)管理提供支撐效勞。遠(yuǎn)程教學(xué)網(wǎng)站將開設(shè)許多業(yè)務(wù)課、技術(shù)

2、課供學(xué)員學(xué)習(xí)，因此學(xué)員可以自由的選擇一些課程來學(xué)習(xí)。下面主要介紹本系統(tǒng)網(wǎng)上選課、退課的流程設(shè)計(jì)及如何利用ASP技術(shù)實(shí)現(xiàn)功能。2遠(yuǎn)程教學(xué)系統(tǒng)概述現(xiàn)代遠(yuǎn)程教育是隨著現(xiàn)代信息技術(shù)的開展而產(chǎn)生的一種新型教育方式，是構(gòu)筑知識(shí)經(jīng)濟(jì)時(shí)代人們終身學(xué)習(xí)體系的主要手段。遠(yuǎn)程教學(xué)是郵政繼續(xù)教育的一個(gè)有效途徑。郵政遠(yuǎn)程教學(xué)系統(tǒng)可以及時(shí)把郵政新技術(shù)、新業(yè)務(wù)放在網(wǎng)上交流討論，網(wǎng)上學(xué)員可以隨時(shí)隨地學(xué)習(xí)、進(jìn)步，一定程度上可以減輕脫產(chǎn)短期培訓(xùn)給企業(yè)造成費(fèi)用支出的壓力。本系統(tǒng)總體上定位為“基于eb的開放式多媒體遠(yuǎn)程教學(xué)系統(tǒng)。這一類遠(yuǎn)程教學(xué)系統(tǒng)主要為窄帶、非實(shí)時(shí)的應(yīng)用系統(tǒng)，它采用EB效勞器和數(shù)據(jù)庫(kù)效勞器作為遠(yuǎn)程教育網(wǎng)的效勞器，用戶

3、學(xué)員在接入因特網(wǎng)的計(jì)算機(jī)上，通過閱讀器連到教學(xué)系統(tǒng)的EB效勞器上，完成教學(xué)內(nèi)容的閱讀、課件下載、實(shí)時(shí)答疑等各項(xiàng)學(xué)習(xí)活動(dòng)。同樣，老師也通過閱讀器以老師身份登錄到EB效勞器上施行教學(xué)和答疑。系統(tǒng)采用目前流行的eb應(yīng)用的三層B/S瘦客戶體系構(gòu)造，即數(shù)據(jù)層、功能層、表示層。3學(xué)員學(xué)習(xí)流程首先學(xué)員通過網(wǎng)絡(luò)閱讀遠(yuǎn)程教學(xué)網(wǎng)頁(yè)，根據(jù)自己的需要選擇不同的專業(yè)、課程，在學(xué)員將學(xué)習(xí)課程所需要的費(fèi)用交納后即可以通過該網(wǎng)站進(jìn)展學(xué)員注冊(cè)，學(xué)員輸入個(gè)人的相關(guān)信息并注冊(cè)成功后就成為了遠(yuǎn)程教育網(wǎng)的正式學(xué)員，從而可以將自己所選擇的課程課件下載學(xué)習(xí)為降低費(fèi)用推薦課件下載，網(wǎng)下學(xué)習(xí)。為理解決學(xué)員在學(xué)習(xí)過程中遇到的問題，教學(xué)網(wǎng)安排老師

4、在網(wǎng)上進(jìn)展輔導(dǎo)，學(xué)員可以通過發(fā)E-ail詢問，也可以登錄教學(xué)網(wǎng)站的交流室與其他學(xué)生或輔導(dǎo)老師進(jìn)展討論，或訪問課程問題集錦，發(fā)表自己的問題、查看問題的答案。在學(xué)員學(xué)習(xí)完成后，如順利通過相應(yīng)考試即可結(jié)業(yè)，并且可以通過遠(yuǎn)程教育網(wǎng)查詢成績(jī)。3選課、退課功能概要設(shè)計(jì)目的：為登錄遠(yuǎn)程教學(xué)系統(tǒng)的學(xué)員提供選擇學(xué)習(xí)課程的功能，要根據(jù)學(xué)員的交費(fèi)情況判斷課程是否可眩輸入：本人資金余額來自帳戶信息表，可選課程清單來自學(xué)員課程信息表。加工：學(xué)員類型、權(quán)限，制止非法客戶操作。帳戶表中查出本人帳戶資金余額，假設(shè)為零那么制止。從學(xué)員選課表中，查出并顯示該學(xué)員已選課程。列出目前網(wǎng)站可供該學(xué)員選擇的課程(該學(xué)員的已選課程出外)，

5、以及每門課程的詳細(xì)信息，包括課程開課時(shí)間、任課老師、學(xué)時(shí)、費(fèi)用及簡(jiǎn)單的內(nèi)容介紹。接收用戶選課、退課操作，如開課時(shí)間未到，學(xué)員可以把已選課程退掉，及退課。也可將新課程選中，即選課。根據(jù)員的操作，系統(tǒng)隨時(shí)計(jì)算、顯示該學(xué)員的資金余額，并隨時(shí)刷新該學(xué)員已選課程列表和可選課程列表。選課操作過程中，計(jì)算學(xué)員資金余額-所選課程費(fèi)用的值，該值小于零，那么選擇無效、操作失?。患僭O(shè)大于等于零，經(jīng)用戶確認(rèn)后保存，同時(shí)把該值記入賬戶信息表，形成新的資金余額；退課操作完成之前，計(jì)算學(xué)員資金余額+所退課程費(fèi)用的值，并把該值記入賬戶信息表，形成新的資金余額。在學(xué)員選課表中添加選課或注銷記錄退課，資金余額寫入帳戶信息表，資金

6、增減明細(xì)寫入資金明細(xì)表。輸出：選課結(jié)果學(xué)員選課表，費(fèi)用明細(xì)資金明細(xì)表，資金余額帳戶信息表的更新。4選課、退課功能程序?qū)崿F(xiàn)選課、退課功能的實(shí)現(xiàn)主要采用了RALE數(shù)據(jù)庫(kù)訪問的AD技術(shù)，AD是ASP技術(shù)的核心之一，它集中表達(dá)了ASP技術(shù)豐富而靈敏的數(shù)據(jù)庫(kù)訪問功能。將學(xué)員已選課程列表顯示、可選課程列表顯示與選課操作的處理寫成了一個(gè)應(yīng)用程序hielessn.asp，這樣通過屢次調(diào)用應(yīng)用程序本身，可以隨時(shí)刷新這兩個(gè)課程列表及資金余額顯示。將學(xué)員已選課程列表顯示、可選課程列表顯示與退課操作的處理寫成了一個(gè)應(yīng)用程序anellessn.asp，這樣通過屢次調(diào)用應(yīng)用程序本身，可以隨時(shí)刷新這兩個(gè)課程列表及資金余額顯

7、示。下面以選課功能的源程序?yàn)槔哼x課功能局部源代碼hielessn.asp：%id=str(sessin(id)setn=server.reatebjet(addb.nnetin)nstr=appliatin(lenn)n.pennstrna=request.kies(usernae)sqls=seletsuplus,lass_nfraunthereaunt_n=sessin(id)setrss=n.exeute(sqls)取出用戶的余額su=int(rss(suplus)lassn=tri(rss(lass_n)以下是用戶提交選課操作的處理ifrequest(h)=yythen先判斷用戶的資

8、金剩余情況ifsuint(request(suplus)thenrespnse.redirethielessn.aspendif再判斷用戶是否選過此課sql=seletunt(*)frfstudent_lessnhereaunt_n=_idandlessn_id=request(lessnid)setrs=n.exeute(sql)rnu=int(rs(0)rs.lsesetrs=nthing假如用戶沒有選過此課，那么可以選課ifrnu=0thenye=int(request(suplus)向選課表寫入一條記錄sql=insertintfstudent_lessn_(aunt_n,lessn_

9、id,pleted,lessn_nae,seleted_tie)values(_id,request(lessnid),n,request(lessnnae),sysdate)修改資金余額轉(zhuǎn)貼于論文聯(lián)盟.ll.sql1=updateauntsetsuplus=yehereaunt_n=id寫用戶的費(fèi)用明細(xì)流水sql2=insertintfee_(aunt_n,ney,preate_tie,suplus,reark)values(_id,request(lessnfee),sysdate,ye,選課)n.exeutesql2n.exeutesqln.exeutesql1endif顯示學(xué)員的新選課

10、表及新的可選課程列表，即刷新頁(yè)面顯示respnse.redirethielessn.aspelse如用戶未提交選課sqls=seletsuplusfraunthereaunt_n=idsetrss=n.exeute(sqls)su=int(rss(suplus)顯示用戶已選課程列表sql=seleta.seleted_tie,b.*frfstudent_lessna,lessnb_herea.lessn_id=b.lessn_idanda.aunt_n=sessin(id)setrs=n.exeute(sql)respnse.riteh3fntlr=#006699姓名：narespnse.ri

11、te你的資金余額為：su元!/fntfntlr=#339933選課操作/h3/h3respnse.ritepfntlr=#009966已選的課程列表：/fntrespnse.ritetableellspaing=0ellPadding=0brderlr=#009966brder=1align=enterbrderlrlight=009966brderlrdark=#FFFFFFrespnse.ritetralign=enterbglr=#td課程編號(hào)/tdtd課程名/tdtd學(xué)時(shí)/tdtd學(xué)分/tdtd費(fèi)用/tdtd開課時(shí)間/tdtd結(jié)課時(shí)間/tdtd選課時(shí)間/td/trdhilentrs.e

12、flprespnse.rite/table/pendifrespnse.ritepfntlr=#009966可選的課程列表：/fntifrs.efthensql2=selet*frlessna,teaher_lessnb_herea.lessn_id=b.lessn_idandb.lass_n=lassnsetrs2=n.exeute(sql2)ifrs2.efthenrespnse.ritefntlr=red無/fntbrelserespnse.ritetableellspaing=0ellPadding=0brderlr=bluebrder=1align=enterbrderlrlight=bluebrderlrdark=#FFFFFFrespnse.ritetralign=enterbglr=#_td課程編號(hào)/tdtd課程名/tdtd學(xué)時(shí)/tdtd學(xué)分/td_td費(fèi)用/tdtd開課時(shí)間/tdtd截課時(shí)間/tdtd操作/td/trdhilentrs2.efrespnse.ritetralign=entertd_rs2(lessn_id)/