【正文】 ype=submit name=tijiao value=提交 input type=reset name=reset value=重置/p/td /tr/table/form界面設(shè)置比較簡(jiǎn)單，簡(jiǎn)單來說就是一個(gè)文本框，用來填寫留問題的學(xué)生的學(xué)號(hào)，另一個(gè)是一個(gè)文本域，用來填寫問題。問題提交的時(shí)候同樣要進(jìn)行檢查，兩個(gè)文本都不能是空白的。所使用的函數(shù)與上面用到的 checkdata()類似。檢查完畢后轉(zhuǎn)入另一個(gè)執(zhí)行頁面，其主要代碼為：%num=trim((xh))sq=trim((question)) select * from question,1,3rs(S_num)=numrs(SQ)=sq % script language=vbscriptMsgBox 提交成功 = /script濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 31實(shí)現(xiàn)的主要功能是將提交上來的學(xué)號(hào)和問題寫進(jìn)數(shù)據(jù)庫中，然后返回一開始的輔導(dǎo)答疑界面。教學(xué)團(tuán)隊(duì)的界面如下：圖 隨便上傳了一張文件中的圖片用作例子，效果如上圖。下邊左側(cè)圖片上端顯示的是team 表中的 T_name 信息。下面是圖片信息，右端則是顯示的介紹性質(zhì)的文字。其中圖片顯示的相關(guān)代碼如下：! Include File= %id=(id)=image/* select T_img from team where T_id=amp。id,1,3if not then (rs(T_img).getchunk(7500000))end if%濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 32作品展示的界面如下：圖 圖 flash展示部分以上是展示了部分學(xué)生的圖片作品，在網(wǎng)頁的最下方則展示的是部分學(xué)生的 flash 作品。濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 336結(jié)束語本網(wǎng)站此次主要解決的問題是通過網(wǎng)絡(luò)教學(xué)平臺(tái)實(shí)現(xiàn)網(wǎng)上教學(xué)，完成教學(xué)內(nèi)容之后還有一些習(xí)題可供學(xué)生進(jìn)行練習(xí)，并且這些習(xí)題之后也都有相應(yīng)的答案。此外，系統(tǒng)還提供了一些拓展學(xué)習(xí)，使學(xué)生在學(xué)習(xí)完課內(nèi)知識(shí)的同時(shí)可以額外學(xué)習(xí)一些其他的知識(shí)，拓寬知識(shí)面。學(xué)生也可以在注冊(cè)之后登錄網(wǎng)站，登錄之后可以直接在輔導(dǎo)答疑里面查看自己提出的問題而不必一個(gè)個(gè)查找。實(shí)驗(yàn)實(shí)踐里面則是顯示需要學(xué)生完成的實(shí)驗(yàn)的相關(guān)內(nèi)容及要求，以及實(shí)現(xiàn)學(xué)生作品上傳的功能。很多是內(nèi)容都是存儲(chǔ)在數(shù)據(jù)庫里，因此在網(wǎng)站的后臺(tái)建設(shè)中，便于管理，實(shí)現(xiàn)網(wǎng)站的動(dòng)態(tài)更新，可以直接登錄網(wǎng)站的后臺(tái)進(jìn)行數(shù)據(jù)的修改、添加以及刪除等操作。由于此次設(shè)計(jì)是本人第一次制作使用多樣工具，結(jié)構(gòu)比較復(fù)雜的網(wǎng)站。在很多方面的知識(shí)、經(jīng)驗(yàn)都還有所欠缺。此外，在網(wǎng)站的開發(fā)過程中，時(shí)間也比較倉促，所以網(wǎng)站必然存在很多缺陷以及不足之處。首先從網(wǎng)站的外觀來說，顏色比較簡(jiǎn)單，各項(xiàng)內(nèi)容看起來也比較單調(diào)，在美學(xué)方面下的功夫還很不夠。應(yīng)該盡量讓整個(gè)網(wǎng)站看起來充實(shí)，搭配再合理一些，使其有視覺沖擊感?？傊?，在這方面的進(jìn)步空間還很大。在整體設(shè)計(jì)上，還有很多欠缺的地方，不得不承認(rèn)規(guī)劃是一件相當(dāng)重要的事情，方方面面的東西都要考慮到。這次由于個(gè)人原因，導(dǎo)致時(shí)間上太過倉促，很多內(nèi)容都是一邊做一邊想的。有時(shí)候做到后面的部分才想起來原來前面的也可以這樣做，可以更好一點(diǎn)。在輔導(dǎo)答疑頁面，無答案的那些后面還可以添加一個(gè)回答，這樣，不必老師從后臺(tái)方面登錄來回答問題了。知道答案的學(xué)生完全可以回答的。諸如此類的問題還有很多。其次，是數(shù)據(jù)庫的設(shè)計(jì)，應(yīng)該可以分為幾個(gè)數(shù)據(jù)庫，而不是把所有的數(shù)據(jù)表集中在同一個(gè)數(shù)據(jù)庫中，雖然在調(diào)用這些數(shù)據(jù)表的時(shí)候只用一個(gè)連接數(shù)據(jù)庫的文件即可，但是過多的數(shù)據(jù)表堆集在一起，容易產(chǎn)生混亂。數(shù)據(jù)表的結(jié)構(gòu)也可以再詳細(xì)一些，比如學(xué)生提問題的那些流言，可以加上問題編號(hào)以及留言的時(shí)間等字段。數(shù)據(jù)表的設(shè)計(jì)最好能夠更規(guī)范一些。再其次，顯示教師資料的頁面，可以將教師照片另存在一個(gè)文件夾中，把照片的路徑存在教師表里面。顯示圖片的時(shí)候能通過路徑顯示照片而不是從數(shù)據(jù)庫里面讀取照片信息再顯示，因?yàn)榇嫒÷窂奖却嫒≌掌鼮榭煽恳恍Ｕ掌诖嫒霐?shù)據(jù)庫中的時(shí)候，并不是直接將照片存入的，而是先將照片信息轉(zhuǎn)換成二進(jìn)制數(shù)據(jù)存入數(shù)據(jù)庫，讀取的時(shí)候，再將這些二進(jìn)制數(shù)據(jù)還原成一張完整的圖片。這樣的過程并不是很安全，不能保證每一張圖片都順利顯示在瀏覽器中。最后就是對(duì) ASP+Dreamweaver 制作網(wǎng)頁的模式運(yùn)用還不夠成熟，而且只能應(yīng)用一些簡(jiǎn)單的 CSS+DIV 布局方式，這樣的效果還遠(yuǎn)遠(yuǎn)達(dá)不到設(shè)想的結(jié)果。濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 34在這次的畢業(yè)設(shè)計(jì)中我深深感覺到自己的淺薄，我們?cè)谡n堂上學(xué)到的知識(shí)真的太少了。想要學(xué)習(xí)更多的知識(shí)就要不怕枯燥，努力鉆研，努力學(xué)習(xí)。目前我們學(xué)到的僅僅是皮毛而已。老師只是交給我們一把鑰匙，我們也僅僅是才剛邁進(jìn)一小步。我們要走的路還很長(zhǎng)。但無論如何，這次的畢業(yè)設(shè)計(jì)都使我收獲很多，受益匪淺。濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 35參考文獻(xiàn)[1] 趙輝 等編著. ASP+Dreamweaver 8 組建動(dòng)態(tài)網(wǎng)站 [M] ．北京：電子工業(yè)出版社. 2022[2] 張新偉編著 ． 網(wǎng)頁經(jīng)典配色藝術(shù) [M]．北京：電子工業(yè)出版社．2022[3] 覽眾 張曉景編著. DIV+CSS 網(wǎng)頁布局商業(yè)案例精粹 [M]．北京：[4] 蓋天宇、孫明麗、鄒天思編著． ASP 程序開發(fā)范例寶典 [M] ．北京：人民郵電出版社．2022[5] 本書編委會(huì)編著. 網(wǎng)頁制作 [M]．北京：電子工業(yè)出版社．2022[6] 潘曉南主編. 動(dòng)態(tài)網(wǎng)頁設(shè)計(jì)基礎(chǔ) [M]．北京：[7] 神龍工作室主編. ASP 網(wǎng)絡(luò)編程從入門到精通 [M]．北京：[8] 劉瑞新主編. ASP 動(dòng)態(tài)網(wǎng)站開發(fā)畢業(yè)設(shè)計(jì)指導(dǎo)及實(shí)例 [M]．北京：[9] 邵麗萍 王馨迪 陸軍等編. ASP 動(dòng)態(tài)網(wǎng)頁設(shè)計(jì) [M]．北京：[10] 張旭東 汪杰編著. ASP 網(wǎng)絡(luò)開發(fā)實(shí)用工程案例 [M]．北京：[11] 倪洪球編著. Dreamweaver 8+ASP 動(dòng)態(tài)網(wǎng)站開發(fā)實(shí)例精講 [M]．北京：[12] 張芳芳 侯俊杰編著. CSS web 開發(fā)學(xué)習(xí)實(shí)錄 [M]．北京：[13] 郝榮福 張國權(quán)編著. 網(wǎng)頁創(chuàng)意與設(shè)計(jì) 50例 [M]．北京：[14] 崔教?hào)| 于長(zhǎng)銳 崔麗麗編著. 數(shù)據(jù)庫技術(shù)與應(yīng)用——面向業(yè)務(wù)分析的 Access [M]．北京：清華[15] 閆靜等編著. Dreamweaver 與 ASP動(dòng)態(tài)網(wǎng)頁基礎(chǔ)與范例 [M]．北京：[16] 龍馬工作室編著. ASP+Access 組建動(dòng)態(tài)網(wǎng)站實(shí)例精講 [M]．北京：[17] 龐婭娟 孫麗麗 呂繼迪編著. ASP 網(wǎng)絡(luò)編程自學(xué)手冊(cè) [M]．北京：[18] 鄧文達(dá) 龔勇編著. 美工神話 Dreamweaver+photoshop+flash 網(wǎng)頁設(shè)計(jì)與美化 [M]．北京：人民[19] 梁立燕 梁芳編著. 網(wǎng)頁設(shè)計(jì)與制作 [M]．北京：[20] 解勇編著. 網(wǎng)頁設(shè)計(jì)視覺形態(tài) [M]．沈陽：[21] 騰飛科技 何秀芳編著. 網(wǎng)頁制作與網(wǎng)站建設(shè)從入門到精通 [M]．北京：[22] 張杰 王誠主編. 網(wǎng)頁與網(wǎng)站設(shè)計(jì) [M]．北京：濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 36附錄附錄 1：數(shù)據(jù)庫連接文件 % set =()set rs=()connstr=DBQ=+(database/)+。DefaultDir=。DRIVER={Microsoft Access Driver (*.mdb)}。 connstr %附錄 2：文件上傳處理文件 script runat=server language=vbscript dim upfile_5xsoft_stream class upload_5xsoft dim form,file,version private sub class_initialize dim istart,ifilenamestart,ifilenameend,iend,vbenter,iformstart,iformend,thefile dim strdiv,mformname,mformvalue,mfilename,mfilesize,mfilepath,idivlen,mstr version= if 1 then exit sub set form=createobject() set file=createobject() set upfile_5xsoft_stream=createobject() =3 =1 () 濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 37vbenter=chr(13)amp。chr(10) idivlen=instring(1,vbenter)+1 strdiv=substring(1,idivlen) iformstart=idivlen iformend=instring(iformstart,strdiv)1 while iformstart iformend istart=instring(iformstart,name=) iend=instring(istart+6,) mformname=substring(istart+6,iendistart6) ifilenamestart=instring(iend+1,filename=) if ifilenamestart0 and ifilenamestartiformend then ifilenameend=instring(ifilenamestart+10,) mfilename=substring(ifilenamestart+10,ifilenameendifilenamestart10) istart=instring(ifilenameend+1,vbenteramp。vbenter) iend=instring(istart+4,vbenteramp。strdiv) if iendistart then mfilesize=iendistart4 else mfilesize=0 end if set thefile=new fileinfo =getfilename(mfilename) =getfilepath(mfilename) =mfilesize =istart+4 =formname mformname,thefile else istart=instring(iend+1,vbenteramp。vbenter) iend=instring(istart+4,vbenteramp。strdiv) if iendistart then mformvalue=substring(istart+4,iendistart4) else mformvalue= 濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 38end if mformname,mformvalue end if iformstart=iformend+idivlen iformend=instring(iformstart,strdiv)1 wend end sub private function substring(thestart,thelen) dim i,c,stemp =thestart1 stemp= for i=1 to thelen if then exit for c=ascb((1)) if c 127 then if then exit for stemp=stempamp。chr(ascw(chrb(ascb((1)))amp。chrb(c))) i=i+1 else stemp=stempamp。chr(c) end if next substring=stemp end function private function instring(thestart,varstr) dim i,j,bt,thelen,str instring=0 str=tobyte(varstr) thelen=lenb(str) for i=thestart to if i then exit function =i1 濰 坊 學(xué) 院 本 科 畢 業(yè) 設(shè) 計(jì) 39if ascb((1))=ascb(midb(str,1)) then instring=i for j=2 to thelen if then instring=0 exit for end if if ascb((1))ascb(midb(str,j,1)) then instring=0 exit for end if next if instring0 then exit function end if next end function private sub class_terminate set form=nothing set file=nothing