【導(dǎo)讀】沖突，并且調(diào)課后沒有及時通知老師和班級同學(xué)。們提出利用網(wǎng)絡(luò)來管理實驗室的上機情況。比較盛行的數(shù)據(jù)庫開發(fā)技術(shù)。Asp在數(shù)據(jù)庫間的異構(gòu)連接，輕松地存取各種數(shù)。此外，asp易學(xué)易用，短期內(nèi)即可掌握，使編程難度降低。網(wǎng)絡(luò)數(shù)據(jù)庫，可以同html語言相互嵌套；而且可以適合于各種瀏覽器。使用asp開發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫，并配合動態(tài)網(wǎng)頁技術(shù)，適應(yīng)于基于web程序的發(fā)展，也是開發(fā)本系統(tǒng)的理想技術(shù)。1．2課題研究背景························································································5

　　

【正文】 連接并釋放 Connection 對象實例占用的空間。 Set Conn=Nothing 讀取、插入、更新、刪除與篩選表的記錄 讀取： Set RS=(“”) (Source,LockType,CommandType) 插入：本系統(tǒng)的開發(fā)采用 SQL 語句的 INSERT 指令去新增記錄，其語句如下： INSERT INTO 表名稱（字段 1，字段 2，字段 3） VALUES（數(shù)據(jù) 1，數(shù)據(jù) 2，數(shù)據(jù)3） 更新：本系統(tǒng)的開發(fā)采用 SQL 語句的 UPDATE 指令去更新記錄，其語法如下： UPDAGE 表名稱 SET 字段 1=數(shù)據(jù) 1，字段 =數(shù)據(jù) 2 WHERE 條件 刪除：本系統(tǒng)的開發(fā)采用 SQL 語句的 DELETE 指令去刪除記錄，其語法如下： DELETE*FROM 表名稱 WHERE 條件 篩選：本系統(tǒng)的開發(fā)采用 SQL 語句中的 SELECT 指令，其語法如下： SELECT 篩選條件 FROM 表名稱 [WHERE 搜索子句 ] [ORDER BY 排序 子句 [ASC、 DESC]] 5. 6 操作說明 一以管理員身份登錄 幾項操作供選擇 數(shù)據(jù)錄入更新 班級課程信息表輸入 班級課程信息表更新 實驗室上機信息表輸入 實驗室上機信息表更新 bbs 管理 回復(fù)普通用戶留言 刪除普通用戶留言 修改普通用戶留言 修改管理員自身登陸密碼 二 以普通用戶身份登陸 幾項操作供選擇 查詢信息 查詢班級上課信息 查詢實驗室上機信息 bbs 留言 在 bbs 留言本上留言給管理員 6 系統(tǒng)評價 系統(tǒng)的特點 網(wǎng)上實驗室管理系統(tǒng)的開發(fā)使用 frontpage和 asp，后臺數(shù)據(jù)庫使用access，因為 frontpage是一個很容易可以上手的軟件，使用起來比較方便，用戶瀏覽也非常方便，使用即見即所得的方式，即方便了編程人員，也方便了用戶。而對于后臺數(shù)據(jù)庫 access來說，也是一個較為優(yōu)秀的后臺數(shù)據(jù)庫。它的使用非常方便。在本系統(tǒng)中，信息的選擇多采用下拉式菜單來表示。 數(shù)據(jù)根據(jù)菜單選擇從數(shù)據(jù)庫里調(diào)用，非常有針對性，很好的體現(xiàn)了動態(tài)互動的特點。經(jīng)過這個星期來的試運行表明本系統(tǒng)具有以下特點： (1).實用性； (2).實時性 (3).容錯性 (4).可移植性。 本系統(tǒng)的最大特點就是實時性比較強，當(dāng)用戶輸入某條記錄后立刻可以在本地或服務(wù)器上瀏覽到。為了增強系統(tǒng)的安全性，只有管理員才可以更改里面的數(shù)據(jù)，所以把登錄數(shù)據(jù)庫的工作放到了程序的運行中。本系統(tǒng)經(jīng)過了大量的實際數(shù)據(jù)測試后，基本上實現(xiàn)了用戶的需求，具有實時性，容錯性等特點，保證單層數(shù)據(jù)庫的正常運行。 由于所做 前期工作不是很充分，在一定程度上還很些缺陷，比如頁面的易瀏覽性，還需要很多的改進(jìn)。 幾個星期的設(shè)計生活馬上就要結(jié)束了，在這幾個星期中我感到自己的收獲很大，深深地體會到了學(xué)習(xí)的樂趣和編程的艱辛。這次設(shè)計最大的收獲是技術(shù)上的提高、軟件功能結(jié)構(gòu)設(shè)計思考的完善、功能實現(xiàn)策略思考的成熟。以前自己做一些軟件的開發(fā)和課程設(shè)計，常常是迫不及待地編寫代碼，恨不得立刻做好。當(dāng)隨著接觸程序數(shù)量增多，內(nèi)容增大，質(zhì)量提高，這種編程方式越來越難，發(fā)現(xiàn)考慮的太不周到，很多地方無法改動，只能全部進(jìn)行返工。這次編程時， 幸虧得到老師和同學(xué)的及時幫助，我才能按時完成任務(wù)。由此可見，軟件設(shè)計的前期工作有多么的重要。 以前在大二學(xué)習(xí)軟件工程這門課程時，我并沒有多重視它，只覺得講的都是思路，沒有實際的編程語言，就忽視了這門課程?，F(xiàn)在我才明白過來軟件工程中的系統(tǒng)分析和詳細(xì)模塊分析是軟件開發(fā)前的一個至關(guān)重要的步驟。這次親身體驗到了軟件工程這門課程的重要性，對我以后的編程生涯有很大的幫助。 這次我要感謝我們系，教研室的領(lǐng)導(dǎo)及我的指導(dǎo)老師，沒有他們的嚴(yán)格要求和指導(dǎo)我就不能比較好的完成這個設(shè)計。雖然這是我第一次進(jìn)行比較詳細(xì)的設(shè)計，但還是比較 正規(guī)的，設(shè)計之前要做開題報告，開題報告后通過后才能展開設(shè)計。在開題報告時，我已經(jīng)對本系統(tǒng)做了初步的詳細(xì)設(shè)計，這對我以為進(jìn)行軟件開發(fā)時是十分有用的。在編寫代碼前我完成了系統(tǒng)的結(jié)構(gòu)設(shè)計，數(shù)據(jù)庫等工作，這樣在以后編碼中就可以事半功倍了。雖然這次設(shè)計我還是沒能對這個系統(tǒng)進(jìn)行比較深刻的研究，但是卻讓我建立了對軟件設(shè)計的正確概念。 這次我做的課題是 ” 網(wǎng)上實驗室管理系統(tǒng) ” ，使用 asp技術(shù)實現(xiàn)。因為在做設(shè)計之前我就學(xué)習(xí)過 asp相關(guān)知識，所以上手比較容易。但是設(shè)計的過程并不輕松，因為我的課題難度較大，一個功能實現(xiàn)的調(diào)試好幾天 ，但是調(diào)試成功后的感覺非常好。設(shè)計的艱辛讓我感覺到以前學(xué)的太少，掌握的僅僅是皮毛，編程非常的吃力。最后在王老師的指導(dǎo)和自己的努力下，問題都迎刃而解。我也發(fā)現(xiàn)，設(shè)計一定要認(rèn)真，不小心造成的錯誤需要好幾天解決。通過設(shè)計我對 html語言更加熟悉，對 asp腳本語言也有了系統(tǒng)的了解，尤其是 asp腳本對數(shù)據(jù)庫的操作。 通過交流我感覺到，無論什么軟件的編程，學(xué)習(xí)過程是一樣的，都要經(jīng)過不斷的實踐積累，不是一蹴而就的。回想這幾個星期是艱苦的，也是有收獲的。不僅系統(tǒng)的學(xué)習(xí)了 asp技術(shù)，最重要的是樹立了正確的觀念，積累了經(jīng)驗。 參考資料 [1] 李存斌 樊建平 ASP 高級編程及其項目應(yīng)用開發(fā) 北京 :中國水利水電出版社 ,2020 [2] 劉韜 駱娟 何旭洪 數(shù)據(jù)庫系統(tǒng)開發(fā)實例導(dǎo)航 北京 :人民郵電出版社 ,2020 [3] 汪曉平，吳勇強，張宏林 . ASP 網(wǎng)絡(luò)開發(fā)技術(shù) . 北京 . 人民郵電出版社 . 2020 [4] 徐罕，吳玉新 . 網(wǎng)站 ASP 后臺解決方案 . 北京 . 人民郵電出版社 . 2020 [5] 陸昌輝 吳曉華 SQL Server 2020 開發(fā)人員指南 宇航出版社 北京希望電子出版社 2020 致謝 首先，我要感謝我的畢業(yè)設(shè)計指導(dǎo)老師 —王霞老師表示衷心的感謝。在我設(shè)計期間，王老師給予我熱情地指導(dǎo)，使我受益非淺。另外還要感謝姜宏岸老師，姜老師給我提供了一個很好的編程場所，讓我能夠順利地按期完成任務(wù)。此外，我還要感謝學(xué)校，為我和同學(xué)們提供了一個比較有利的設(shè)計實驗室環(huán)境，使我們有非常多的時間去學(xué)習(xí)，開發(fā)課題。 幾個星期以來，我身處畢業(yè)設(shè)計這樣一個熱情和團結(jié)向上的環(huán)境中，通過與同學(xué)們的交流使我學(xué)到了很多東西。對此我要向張翠等同學(xué)表示感謝，感謝他們在我遇到困難的時候給予 及時的幫助。 此外，還有很多關(guān)心我設(shè)計的老師和同學(xué)們，在這里我要向他們說一聲謝謝。 附錄（主要 /代 表性程序與結(jié)果） 插入實驗室課程后臺處理程序 % set Conn=() driver={Microsoft Access Driver (*.mdb)}。dbq= amp。 () % html head style ! A:link, A:visited{textdecoration:none。color:008040} A:hover{textdecoration:underline。color:ff0000} titleaddclass/title /style %language=vbscript % % clas = ((yecla)) lday = ((date)) ime = ((ime)) week = ((week)) teacher = ((yetea)) pc = ((yepc)) course = ((course)) set rs=() sql = select * from lab where =39。amp。pcamp。39。 and =39。amp。imeamp。39。and =39。amp。weekamp。39。 set rs=(sql) if then set aa=() sqlstr=insert into lab(day,ime,eek,yecla,yetea,yepc,course) values(39。amp。ldayamp。39。,39。amp。imeamp。39。,39。amp。weekamp。39。,39。amp。clasamp。39。,39。amp。teacheramp。39。,39。amp。pcamp。39。,39。amp。courseamp。39。) set aa=(sqlstr) set conn = nothing script language = 39。javascript39。alert(39。添加實驗室課程信息直接成功 ， 請返回 39。)。 =39。39。/script else set b=() sql1=delete from lsb sql1,conn set a1=() sql=select * from class where =39。empty39。 and =39。amp。clasamp。39。 and =39。amp。imeamp。39。 order by , sql,conn do while not sqlstr=insert into lsb(yecla,day,ime,eek,yepc) values(39。amp。a1(clas)amp。39。,39。amp。a1(day)amp。39。,39。amp。a1(ime)amp。39。,39。amp。a1(week)amp。39。,39。amp。a1(pc)amp。39。) sqlstr,conn loop set a2=() sql=select * from lsb sql,conn do while not set a3=() sql=select * from lab where =39。amp。a2(yepc)amp。39。 and =39。amp。a2(ime)amp。39。 and =39。amp。a2(eek)amp。39。 sql,conn if not then sql=delete from lsb where =39。amp。a2(ime)amp。39。 and =39。amp。a2(eek)amp。39。 and =39。amp。a2(yepc)amp。39。 sql,conn end if loop % /head body p align=centerfont color=800000 face=幼圓 size=3您安排的課程有沖突 ， 請選擇下列實驗室為空的時間進(jìn)行插入 ， 謝謝 ！ /font/p table border=1 width=414 align=center tr td width=102 align=center日期 /td td width=102 align=center周次 /td td width=103 align=center星期 /td td width=103 align=center節(jié)次 /td /tr % set a4=() sql=select * from lsb sql,conn do while not % tr td width=102 align=center%=a4(day)%/td td width=102 align=center%=a4(ime)%/td td width=103 align=center%=a4(eek)%/td td width=103 align=center%=a4(yepc)%/td % loop set rs = nothing end if % ! function MM_reloadPage(init) { //reloads the window if Nav4 resized if (init==true) with (navigator) {if ((appName==Netscape)amp。amp。(parseInt(appVersion)==4)) { =innerWidth。 =innerHeight。 onresize=MM_reloadPage。 }} else if (innerWidth!= || innerHeight!=) ()。 } MM_reloadPage(true)。 // p /p p align=centera href=img border=0 src=images/ width=36 height=35/a/p p /p p /p p /p p /p p /p p /p p align=center /p /body 管理員登錄后臺程序 % set Conn=() driver={Microsoft Access Driver (*.mdb)}。dbq= amp。 () % % username = ((username)) password = ((password)) If username = OR password = Then br錯誤類型 ： 用戶名或者密碼為空 br a href=br返回 /abrbrtable width=100% border=0 cellspacing=0 cellpadding=0trtdimg src=images/ border=0/td /tr/table End If Set Rs = () Sql=Select * From admin where =39。 amp。usernameamp。 39。 and =39。 amp。passwordamp。 39。 Sql,Conn,1,1 if not then else br錯誤類型 ： 用戶名或者密碼不對 ， 登陸失敗 br a href=br返回 /abrbrtable width=100% border=0 cellspacing=0 cellpadding=0trtdimg src=images/ border0/td /tr/table End If Set Rs = Nothing % e, Calvin said. Cirocco glanced at him, got a glimpse of his brown eyes before he turned back to his work. That was my thought. A real big fusion ramscoop. The machinery is in the hub, electromagic field generators to funnel the interstellar hydrogen into the center, where it gets burned. Gaby shrugged. Ma kes sense. But what about doc king? Well, leaving the thing would be easy enough. just drop out a hole in the bottom and get escape velocity for free, plus some to fool around with. But there ought to he some sort of dingus that would telescope out to the center of r