【正文】 例如： On Error Resume Next 39。如果程序出錯(cuò)，轉(zhuǎn)移去執(zhí)行下一條 [11] 系統(tǒng)運(yùn)行與維護(hù) 經(jīng)過一系列測(cè)試之后，系統(tǒng)投入使用。由于系統(tǒng)內(nèi)部因素與外部環(huán)境的不斷變化，影響著系統(tǒng)的運(yùn)行，同時(shí)需要系統(tǒng)不斷的適應(yīng)這些變化，從而不斷的完善系統(tǒng)，以提高系統(tǒng)運(yùn)行的效率和服務(wù)水平，因此需要相關(guān)管理人員進(jìn)行長(zhǎng)期的系統(tǒng)維護(hù)工作。 本系統(tǒng)的日常維護(hù)由學(xué)生社會(huì)實(shí)踐信息管理系統(tǒng)的專人負(fù)責(zé)，如果出現(xiàn)一些不能解決的問題，則由開發(fā)者來負(fù)責(zé)。 大學(xué)本科畢業(yè)設(shè)計(jì)說明書 25 7 結(jié)束語(yǔ) 概述 學(xué)生社會(huì)實(shí)踐信息管理系統(tǒng)是一個(gè)典型的信 息管理系統(tǒng) (MIS)，其開發(fā)主要包括后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù) ,即要求建立起數(shù)據(jù)一致性和完善性強(qiáng)，數(shù)據(jù)安全性好的庫(kù)，以及前端應(yīng)用程序的開發(fā)，即要求應(yīng)用程序功能完善，易使用等特點(diǎn)，經(jīng)過考慮，我使用 Dreamweaver、 VBScript 和 Asp 的開發(fā)環(huán)境 [1214]，建立系統(tǒng)應(yīng)用原形，并對(duì)初始原形系統(tǒng)進(jìn)行需求迭代，不斷修改、更正，直到形成用戶滿意的可行系統(tǒng)。 為建立的學(xué)生社會(huì)實(shí)踐信息管理系統(tǒng)，對(duì)求職者、企業(yè)、管理員進(jìn)行了全面的管理，使信息通過查詢，大大縮短了獲取信息的時(shí)間，提高了工作效率。 系統(tǒng)的功能 經(jīng)過兩個(gè)多月的設(shè)計(jì)和開發(fā)，基本開發(fā)完畢。本系統(tǒng)涵蓋了學(xué)生社會(huì)實(shí)踐信息管理系統(tǒng)的大部分業(yè)務(wù)，由個(gè)人信息、崗位信息等組成，其系統(tǒng)功能基本符合用戶需求。 系統(tǒng)的特點(diǎn) 1）查詢?nèi)?，?duì)任何時(shí)間和字段都可以查詢，從而對(duì)管理進(jìn)行監(jiān)督。 2）界面友好，輸入信息方便， 許多 信息由系統(tǒng)自動(dòng)生成，實(shí)現(xiàn)智能化。 3）系統(tǒng)可擴(kuò)充性好，本系統(tǒng)在很多方面還需要完善。 4）系統(tǒng)安全性好，可以進(jìn)行網(wǎng)站關(guān)閉，這樣可以立即處理問題避免有些數(shù)據(jù)丟失。 5）擁有良好的用戶權(quán)限和密碼限制，以防止人為的破壞和盜取數(shù)據(jù)資源。 系統(tǒng)存在問題 1）由于本人自行編碼及測(cè)試，有些問題可能考慮的不全面。 2）由于時(shí)間的關(guān)系，輸出的信息還不完善。 3）系統(tǒng)的抗錯(cuò)、容錯(cuò)性不高、頁(yè)面靈活性不夠緊密，在這方面還有待加強(qiáng)。 大學(xué)本科畢業(yè)設(shè)計(jì)說明書 26 將來需要完善 1）網(wǎng)絡(luò)化：數(shù)據(jù)遠(yuǎn)程訪問能夠自動(dòng)采取一定的加鎖策略；增加瀏覽網(wǎng)頁(yè)和實(shí)現(xiàn)收發(fā)郵件的功能；今后還能對(duì)本系統(tǒng)可以進(jìn)行模塊化處理及管理。 2）多媒體化：系統(tǒng)能夠支持語(yǔ)音輸入。 系統(tǒng)開發(fā)的體會(huì) 回首最大的感受 = 收獲 + 喜悅，短短的 畢業(yè)設(shè)計(jì) 給我留下的不僅僅是回憶，因?yàn)?它使我受到了一次用專業(yè)知識(shí)、專業(yè)技能分析和解決問題 的全面系統(tǒng)鍛煉， 提高 了我自身的價(jià)值。鞏固和運(yùn)用我所學(xué)的理論知識(shí)，培養(yǎng)了我分析問題與解決問題的初步能力和創(chuàng)新意識(shí)；增強(qiáng)了我實(shí)際動(dòng)手能力，從而為我在畢業(yè)后，更快地適應(yīng)計(jì)算機(jī)及其應(yīng)用方面的工作奠定了良好的基礎(chǔ)。 該項(xiàng)目上有一些不完善和有待改進(jìn)之處，特別是在網(wǎng)站信息的安全性上需要進(jìn)一步加強(qiáng)。因此，有必要在這方面做進(jìn)一步的加強(qiáng)。我們可以通過信息加密，將用戶的信息資料，進(jìn)行加密 [15]，這樣即使有人得到了數(shù)據(jù)庫(kù)，如果沒有解密算法，就不能查看到數(shù)據(jù)庫(kù)中的用戶信息。還可以通過身份認(rèn)證 ,買賣雙方要進(jìn)行交易，必須可靠地確認(rèn)雙方 的身份。另外由于 Windows NT 的 IIS 和Windows 98 及 ASP 本身存在的漏洞與 BUG，本次設(shè)計(jì)沒有對(duì)此多加考慮，所以無意的操作或刻意的入侵都可能對(duì)本次設(shè)計(jì)的結(jié)果造成意想不到的后果。所以再以后的設(shè)計(jì)中，我會(huì)更加注重這方面的問題。 當(dāng)然，在開發(fā)過程中，我也看到了自己的欠缺， 深刻的認(rèn)識(shí) 到系統(tǒng)開發(fā)的不簡(jiǎn)單， 它需要設(shè)計(jì)者具有全面的專業(yè)知識(shí)，縝密的思維，嚴(yán)謹(jǐn)?shù)墓ぷ鲬B(tài)度以及較高的分析問題和解決問題的能力。深感計(jì)算機(jī)知識(shí)的浩如煙海，設(shè)計(jì)過程中單靠課堂上 學(xué)習(xí) 的知識(shí) 是遠(yuǎn)遠(yuǎn)不夠的，還需要 在有空的時(shí)候?qū)W習(xí) 更多的計(jì)算機(jī)等 方面知識(shí)。參考文獻(xiàn) 27 參考文獻(xiàn) [1] 謝希仁編著 .計(jì)算機(jī)網(wǎng)絡(luò) [M]. 第五版 ,電子工業(yè)出版社， 1989. [2] 湯代祿、韓建俊 編著 . ASP案例開發(fā)集錦 [M].電子工業(yè)出版社， 2021. [3] 明日科技編著 . ASP開發(fā)典型模塊大全 .人民郵電出版社 .2021 [4] 陳明編著 . 軟件工程學(xué)教程 .科技出版社 [M]， 2021. [5] 薩師煊、王珊 . 數(shù)據(jù)庫(kù)系統(tǒng)概論 [M] .第三版 , 高等教育出版社 ,2021. [6] 張杰、任偉、吳林華編著 . ASP典型模塊設(shè)計(jì) . 清華大學(xué)出版社 ,2021 [7] 羅布 、 西 曼 編著 . ACCESS數(shù)據(jù)庫(kù)管理與開發(fā) . 清華大學(xué)出版社 ,2021. [8] 卞藝杰 ,陳京民 .電子商務(wù)導(dǎo)論 .北京 :中國(guó)水利水電出版社 ,2021:1~2. [9] 汪曉平 ,鐘軍 .ASP網(wǎng)絡(luò)開發(fā)技術(shù) .北京 :人民郵電出版社 ,2021:1~4. [10] 胡標(biāo) .ASP網(wǎng)絡(luò)編程技術(shù)與實(shí)例 .北京 :人民郵電出版社 ,2021:30~90. [11] 張景峰 ,蘇英如 ,金桂蘭 .ASP程序設(shè)計(jì)教程 .北京 :中國(guó)水利水電出版社 ,2021:16~18. [12] 楊威 . .北京 :人民郵電出版社 ,2021:125~155. [13] 石志國(guó) ,王志良 ,薛為民 .ASP精解案例教程 .北京 :清華大學(xué)出版社 ,2021:43~89. [14] 李春葆 ,曾平 .Access數(shù)據(jù)庫(kù)程序設(shè)計(jì) .北京 :清華大學(xué)出版社 ,2021:1~16. [15] 劉甫迎 ,王道學(xué) ,黨晉蓉 .數(shù)據(jù)庫(kù)原理及應(yīng)用實(shí)用教程 .北京 :清華大學(xué)出版社 ,2021:1~4. [16] 張景坤等編著 ,ASP項(xiàng)目開發(fā)全程實(shí)錄 北京 :清華大學(xué)出版社， :254 福建農(nóng)林大學(xué)本科畢業(yè)設(shè)計(jì)說明書 28 致 謝 在本次畢業(yè)設(shè)計(jì)中，指導(dǎo)老師――趙艷萍無論在理論上還是在實(shí)踐中，都給予我很大的幫助，為我提供了許多 不可多得的寶貴意見。 正是有了老師的支持和幫助，才讓我們?cè)谠O(shè)計(jì)中勇于知難而上，讓我們?cè)谠O(shè)計(jì)中遇到問題的時(shí)候能夠科學(xué)合理的進(jìn)行分析，找出真正的癥結(jié)所在。 為此，我由衷的對(duì)老師的悉心指導(dǎo)表示深深的感謝 ! 同時(shí)也感謝所有關(guān)心和支持我的朋友們！ 福建農(nóng)林大學(xué)本科畢業(yè)設(shè)計(jì)說明書 29 附錄 附錄 A: 企業(yè)發(fā)布 /更新招聘信息 主要代碼如下 : % Dim Rs,Rs2,i,ThisYear,ThisMonth,ThisDay,selYear,selMonth,selDay Dim JobType,Position_b,Position_s,JobName,Quantity,Salary Dim ValidityYear,ValidityMonth,ValidityDay,Province,City,County Dim Qualification,WorkExp,Sex,AgeBegin,AgeEnd,JobNote Dim ValidityDate Dim strDate,strYear,strMonth,strDay Dim JobQuantity,JobFlag Dim IsLock Dim contProvince,contCity,contCounty Set Rs = () ‘創(chuàng)建記錄集 rs Set Rs2 = ( )‘創(chuàng)建記錄集 rs2 JobQuantity = (select count(RecruitId) as JobQuantity from RecruitTbl where ComId = amp。 Session(ComId)) //通過公司 ID 號(hào)統(tǒng)計(jì)面試人數(shù) JobQuantity = JobQuantity(JobQuantity) ‘根據(jù)給定的字段查詢結(jié)果 If Cint(JobQuantity) = Cint((3 , Session(MemberType))) Then’ 判斷會(huì)員類型是哪種 JobFlag = False Else JobFlag = True End If select * from CompanyTbl where ComId = amp。 Session(ComId) , Conn , 1 , 1 If And JobFlag = True And IsLock = 0 Then ‘ 判斷是否開通及有沒有被鎖 JobType = (Trim((JobType))) ‘職位類型如全職兼職 Position_b = (Trim((Position_b)))’職位類別 職能如計(jì)算機(jī) Position_s = (Trim((Position_s)))’職位 如軟件測(cè)試 JobName = (Trim((JobName)))’職位名稱 Quantity = (Trim((Quantity)))’招聘人數(shù) Salary = (Trim((Salary)))’工資 ValidityYear = (Trim((ValidityYear)))’截止日期 ValidityMonth = (Trim((ValidityMonth))) ValidityDay = (Trim((ValidityDay))) Province = (Trim((Province)))’工作地點(diǎn) City = (Trim((City))) County = (Trim((County))) Qualification = (Trim((Qualification)))’學(xué)歷 WorkExp = (Trim((WorkExp)))’工作經(jīng)驗(yàn) Sex = (Trim((Sex)))’性別 AgeBegin = (Trim((AgeBegin)))’年齡范圍 AgeEnd = (Trim((AgeEnd))) JobNote = (Trim((JobNote)))’具體要求 福建農(nóng)林大學(xué)本科畢業(yè)設(shè)計(jì)說明書 30 If JobType = Or IsNull(JobType) Then 請(qǐng)選擇職位類 型 , End If If Position_b = Or IsNull(Position_b) Or Position_s = Or IsNull(Position_s) Then 請(qǐng)選擇職位 類別 , End If If JobName = Or IsNull(JobName) Then 請(qǐng)輸入職位名 稱 , End If If Quantity = Or IsNull(Quantity) Or Not IsNumeric(Quantity) Then 請(qǐng) 輸入招聘 人數(shù)， 只能輸入數(shù)字 ， 0 表示若 干人 , End If If Salary = Or IsNull(Salary) Or Not IsNumeric(Salary) Then 請(qǐng) 輸入薪資待 遇，只 能輸入數(shù)字 ， 0 表示面議 , End If strDate = Date() strYear = Year(strDate) strMonth = Month(strDate) strDay = Day(strDate) If ValidityYear strYear Then 截止日期不能是過去時(shí) 間 , End If If ValidityYear = strYear And ValidityMonth strMonth Then 截止日期不能是過去時(shí)間 , End If If ValidityYear = strYear And ValidityMonth = strMonth And ValidityDay strDay Then 截止日期不能是過去時(shí)間 , End If If Province = Or IsNull(Province) Or City = Or IsNull(City) Then 請(qǐng)選擇工作地區(qū) , End If If Qualification = Or IsNull(Qualification) Then 請(qǐng)選擇學(xué)歷要求 , End If If WorkExp = Or IsNull(WorkExp) Then 請(qǐng)選擇工作經(jīng)驗(yàn) , End If If Sex = Or IsNull(Sex) Then 請(qǐng)選擇性別要求 , End If If AgeBegin 不限 And AgeEnd 不限 And AgeBegin AgeEnd Then 年齡要求中，開始年齡不能大于結(jié)束年齡 , End If If JobNote = Or IsNull(JobNote) Then 請(qǐng)輸入具體說明 , End If ValidityDate = ValidityYear amp。 amp。 ValidityMonth amp。 amp。 ValidityDay If Not IsDate(ValidityDate) Then 輸入的日期不是有效日期 , End If select * from RecruitTbl where (RecruitId is null) , Conn , 3