【導(dǎo)讀】全面提供學(xué)習(xí)資料，做到課前預(yù)習(xí)、課后復(fù)習(xí)，取得良好的學(xué)習(xí)效果，通過(guò)INTERNET實(shí)現(xiàn)學(xué)生學(xué)習(xí)、教師授課，提高學(xué)習(xí)效率。智能編排、規(guī)劃，方便學(xué)生上網(wǎng)下載、查詢，問(wèn)題求解，及問(wèn)題解答。要求學(xué)生完成網(wǎng)上自學(xué)和網(wǎng)上考試功能的開發(fā)和設(shè)計(jì)，系統(tǒng)調(diào)試，以及論文的撰寫工作。成果形式為網(wǎng)站、相關(guān)文檔和論文。PC機(jī)，MicrosoftWindows操作系統(tǒng)?，F(xiàn)代信息技術(shù)和通訊技術(shù)的飛速發(fā)展，是現(xiàn)。代教育技術(shù)發(fā)展的重要載體之一。學(xué)手段的嶄新局面，使教育技術(shù)從早期的視聽教學(xué)發(fā)展到目前的多媒體網(wǎng)絡(luò)化教學(xué)，教育信息化已成為教育改革的一個(gè)大趨勢(shì)。目前，隨著以多媒體網(wǎng)絡(luò)為代表的現(xiàn)代信。利用現(xiàn)代教育媒體進(jìn)行自主學(xué)習(xí)，因此，學(xué)習(xí)者的需求是現(xiàn)代教育技術(shù)關(guān)注的中心，形式主導(dǎo)教學(xué)．通過(guò)設(shè)計(jì)主持、示范和評(píng)價(jià)履行教師主導(dǎo)教學(xué)的職責(zé)。設(shè)計(jì)網(wǎng)絡(luò)教學(xué)系統(tǒng)是一個(gè)復(fù)雜的系統(tǒng)工程，首先要建立系統(tǒng)的數(shù)學(xué)模型和系統(tǒng)流程，

　　

【正文】 數(shù)據(jù)類型 說(shuō)明 department 文本 表 42 網(wǎng)絡(luò)教學(xué)系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) mL. V1voluefthsapdrinc,MwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D17 表 exam_datebase 字段名稱 數(shù)據(jù)類型 說(shuō)明 Id 自動(dòng)編號(hào) Subject 文本 科目 Type 文本 題型 Question 備注 問(wèn)題 Text1 備注 選項(xiàng) Text2 備注 Text3 備注 Text4 備注 表 43 其它表的也是依照上面所列的方法制得，就不在累述 mL. V1voluefthsapdrinc,MthwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D18 5 網(wǎng)站的具體設(shè)計(jì) 上一部分我們從整體給出了網(wǎng)絡(luò)教學(xué)系統(tǒng)的模塊劃分和 網(wǎng)上自學(xué)和網(wǎng)上考試兩部分?jǐn)?shù)據(jù)庫(kù)的大體架構(gòu)。下面，將要說(shuō)明具體結(jié)構(gòu)和實(shí)現(xiàn)時(shí)的關(guān)鍵思想、算法。 網(wǎng)上自學(xué) 這一模塊主要提供 優(yōu)秀文章閱覽、課件瀏覽和 學(xué)習(xí)資料的下載。學(xué)習(xí)資料包括多媒體課件、教員教案等 。 一、 下面給出主頁(yè)面 （圖 51）及主要連接： 主頁(yè)面： 圖 51 主要連接： （ 1）課件下載 a href= target=_blank課件下載 /a：連接學(xué)生下載頁(yè)面，需要權(quán)限，本校學(xué)生和老師 網(wǎng)絡(luò)教學(xué)系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) mL. V1voluefthsapdrinc,MwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D19 a href= target=_blank下載管理 /a：連接下載文件管理，需要權(quán)限，本校老師和管理員 （ 2）教案瀏覽 a href=教案瀏覽 / target=_blank教案瀏覽 /a：連接學(xué)生瀏 覽頁(yè)面，有權(quán)限 a href=教案瀏覽 / target=_blank教案管理 /a：連接教案錄入頁(yè)面，有權(quán)限者是管理員 （ 3）優(yōu)秀文章 a href=文章 / target=_blank優(yōu)秀文章 /a ：連接文章瀏覽頁(yè)面，無(wú)權(quán)限 a href=文章 / target=_blank文章管理 /a：連接文章錄入頁(yè)面，有權(quán)限者是管理員 二、教案瀏覽和優(yōu)秀文章的設(shè)計(jì)方法 教案瀏覽： 登陸頁(yè) 面如下： 圖 52 本系統(tǒng)通過(guò) Microsoft Access 建立數(shù)據(jù)庫(kù)，并運(yùn)用 ASP 技術(shù)和 SQL 語(yǔ)言對(duì)數(shù)據(jù)庫(kù)進(jìn)行調(diào)用和操作。在這里我們提供部分的 SQL 語(yǔ)言和代碼 ，其它的有權(quán)限的登陸頁(yè)面的設(shè)計(jì)方法與下面要介紹的大體相同，就不再介紹。 （ 1） ，應(yīng)用表單，通過(guò) form method=POST action= 將學(xué)號(hào)和密碼提交到 驗(yàn)證 （ 2） 主要代碼： !include file= // 存有連接數(shù)據(jù)庫(kù)語(yǔ)句的文件 % //獲取 的 form 中提交的數(shù)據(jù) userid=request(userid) pwd=request(pwd) mL. V1voluefthsapdrinc,MthwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D20 //循環(huán)查找符合上兩句條件的記錄 sql=select * from cadre_info where userid=amp。useridamp。 and pwd=39。amp。pwdamp。39。 set rs=() sql,conn,3,2 //若此記錄不存在，跳轉(zhuǎn)回 if then ?temp=error //若存在，即用戶合法時(shí)，用 Cookies 保存用戶信息，并進(jìn)入 頁(yè)面 (logok)=yes (userid)=userid (username)=username (pwd)=pwd (department)=department (office)=office (duties)=duties (POST)=post (rank)=rank %網(wǎng)絡(luò)教學(xué)系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) mL. V1voluefthsapdrinc,MwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D21 （ 3）當(dāng)檢驗(yàn)用戶有權(quán)限登陸后，即顯示教案目錄，教案目錄用來(lái)連接到教案內(nèi)容 顯示頁(yè)面： 圖 53 主要代碼： //首先連接數(shù)據(jù)庫(kù) % set conn=() provider=provider=。 DBPath =data source= amp。 (./datamlx/) provider amp。 DBPath % //然后在表 jiaoan 中循環(huán)查詢所有記錄并存于 recordset 組件對(duì)象 rs 中 % sql=select * from jiaoan set rs=() sql,conn,3,2 //① 用 %=rs(title)%和 %=rs(intime)%語(yǔ)句在頁(yè)面中顯 示所有教案標(biāo)題和發(fā)布時(shí)間信息 ② 通過(guò) a href=?id=%=rs(id)%%=rs(title)%(%=rs(id)%)/a連接到 頁(yè)面來(lái)顯示教案內(nèi)容，并傳送 id 號(hào) a href=?id=%=rs(id)%%=rs(title)%(%=rs(id)%)/a/td td align=center%=rs(intime)%/td /tr mL. V1voluefthsapdrinc,MthwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D22 % If Then Exit For Next % （ 4）顯示教案內(nèi)容 //用 id=amp。request(id)從 中得到被選中的教案相應(yīng)的 id 號(hào)，并在表 jiaoan中查詢滿足此 id 號(hào)的記錄 % sql=select * from jiaoan where id=amp。request(id) set rs=() sql,conn,3,2 //若找到相應(yīng)的記錄創(chuàng)建文件組件、并打開讀取 % set FSObject=() set readFile= ((rs(title))) while not ( amp。br) wend % （ 5）教案管理，主體設(shè)計(jì)方法與教案瀏覽相同，下面給出主要不同之處 ①在驗(yàn)證登陸人信息時(shí)，由語(yǔ)句“ if rs(Rank)管理員 then ”控制權(quán)限是管理員 ②在目錄顯示時(shí)增加了添加、編輯、刪除 網(wǎng)絡(luò)教學(xué)系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) mL. V1voluefthsapdrinc,MwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D23 圖 54 ① 添加，應(yīng)用表單，通過(guò)語(yǔ)句 form method=POST action=將所添加的內(nèi)容提交 處理。 中 ，在打開的 jiaoan 表中添加rs(title)=title 和兩項(xiàng)內(nèi)容 rs(intime)=Date()，如下： rs(title)=title rs(intime)=Date() 然后建立以 title 為文件名的新文件 set fso=() set ts=((title)) ② 編輯 以可修改方式打開文件并顯示 Set ts=((File),1) 若要保存 if aktion=save then 新建一個(gè)同名空白文件，將原來(lái)的文件內(nèi)容覆蓋 set ts=((File),1) 將表單提交的內(nèi)容存入新建的文件，以達(dá)到保存效果 (FileContent) set ts=((File),1) form action=39。?file=%=File%amp。aktion=save39。 id=FORM1 method=post name=FORM1 mL. V1voluefthsapdrinc,MthwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D24 textarea name=FileContent cols=39。13039。 rows=39。3039。 % () %//在表單中打開的文件 /textarea ③刪除比較簡(jiǎn)單，不再描述 優(yōu)秀文章 優(yōu)秀文章的設(shè)計(jì)方法和教案瀏覽的設(shè)計(jì)方法大同小異，不再說(shuō)明 網(wǎng)上考試 主要由在線考試和在線自測(cè)兩個(gè)子系統(tǒng)組成。 學(xué)生如果想對(duì)自己這段時(shí)間內(nèi)學(xué)習(xí)的效果做一個(gè)檢查，可以選擇測(cè)試選項(xiàng)，客戶端會(huì)向服務(wù)器端發(fā)出請(qǐng)求，當(dāng)服務(wù)器收到請(qǐng)求后，隨機(jī)從習(xí)題數(shù)據(jù)庫(kù)中抽取習(xí)題，然后發(fā)送給客戶端，在客戶端顯示，學(xué)生對(duì)試題進(jìn)行解答后再把答案發(fā)送給服務(wù)器端程序，服務(wù)器端程序再?gòu)臄?shù)據(jù)庫(kù)中檢查答案是否正確，如果不正確，把正確的答案?jìng)鹘o學(xué)生。網(wǎng)絡(luò)考 試系統(tǒng)結(jié)構(gòu)圖 （圖 53） 如下：網(wǎng)絡(luò)教學(xué)系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn) mL. V1voluefthsapdrinc,MwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D25 在線自測(cè)系統(tǒng)沒有設(shè)置權(quán)限，學(xué)生登陸后即可進(jìn)行自測(cè)考試，考試結(jié)束后，即可提交試卷，系統(tǒng)會(huì)自動(dòng)給出正確答案和所得分?jǐn)?shù)，試題和答案均由管理員進(jìn)行管理。包含 21 個(gè)文件和一個(gè)數(shù)據(jù) 庫(kù) 文件名 功能說(shuō)明 第一單元考試頁(yè)面 第一單元考試結(jié)果頁(yè)面 下面提供部分代碼： 鏈接數(shù)據(jù)庫(kù)抽取試題 % Set conn = () driver={Microsoft Access Driver (*.mdb)}。dbq=amp。 (datayuan/) //提取試題 sql=select * from test1 set rs=(sql) font size= color=greenbcenter所選習(xí)題章節(jié)：第font size= color=red1/font章 /center/font % //鏈接數(shù)據(jù)庫(kù)批改試卷給出成績(jī) % name=session(user) dim score Set conn = () driver={Microsoft Access Driver (*.mdb)}。dbq=amp。 (datayuan/) sql=select ans from test1 Set rs = ( sql ) ycorrect=0 考生 DB 考試界面 出題、判卷接口 圖 55 mL. V1voluefthsapdrinc,MthwgSqkAybTx0(B):25%/C96ρ8437GNⅱ ) and70glOmLsoutifpewr,(I/3Kj:5~8D26 rsCount=0 //給出正確答案并評(píng)分 正確答案： Do while not rs(ans) rsCount=rsCount + 1 if (rsCount)=rs(ans) then ycorrect=ycorrect + 1 end if loop br 你的答案： score=int(ycorrect/rscount*100) for i=1 to 1 (i) next br 你的成績(jī)： amp。score if score = 60 then 你不及格！ amp。br if score = 60 and score = 80 then 及格 amp。br if score = 80 and score = 100 then 優(yōu)秀！ % 在線考試