VB+SQL學(xué)生信息管理系統(tǒng)

1、貴州師范大學(xué)職業(yè)技術(shù)學(xué)院計(jì)算機(jī)工程系畢業(yè)設(shè)計(jì)題 目： 學(xué)生信息管理系統(tǒng) 系 別：  計(jì)算機(jī)工程系 專業(yè)、 班級(jí)：  2008級(jí)計(jì)算機(jī)應(yīng)用班 姓 名：  楊 茂 科 學(xué) 號(hào)：  082113010053 指 導(dǎo) 教 師：  尹丹老師 完 成 時(shí) 間：  2011年 03月 25 日 前 言學(xué)生信息管理系統(tǒng)是一個(gè)教育單位不可缺少的部分,它的內(nèi)容對(duì)于學(xué)校的決策者和管理者來(lái)說(shuō)都至關(guān)重要,所以學(xué)生信息管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。但一直以?lái)人們使用傳統(tǒng)人工的方式管理學(xué)生學(xué)籍檔案，這種管理方式存在著許多

2、缺點(diǎn),如:效率低、保密性差,另外時(shí)間一長(zhǎng),將產(chǎn)生大量的文件和數(shù)據(jù),這對(duì)于查找、更新和維護(hù)都帶來(lái)了不少的困難。隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識(shí),它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。 作為計(jì)算機(jī)應(yīng)用的一部分,使用計(jì)算機(jī)對(duì)學(xué)生學(xué)籍信息進(jìn)行管理,具有著手工管理所無(wú)法比擬的優(yōu)點(diǎn).例如:檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長(zhǎng)、成本低等。這些優(yōu)點(diǎn)能夠極大地提高學(xué)生學(xué)籍管理的效率,也是企業(yè)的科學(xué)化、正規(guī)化管理,與世界接軌的重要條件。 因此，開(kāi)發(fā)這樣一套管理軟件成為很有必要的事情,在下面的各章中將以開(kāi)發(fā)一套學(xué)生信息管理系統(tǒng)為例,談?wù)勂溟_(kāi)發(fā)

3、過(guò)程和所涉及到的問(wèn)題及解決方法。目 錄摘 要1第一章 引 言11.1 課題介紹11.2 課題目的及意義11.3 研究方法、發(fā)展趨勢(shì)1第二章 開(kāi)發(fā)環(huán)境、工具介紹22.1 Visual Basic 6.022.1.1 Visual Basic的編程特點(diǎn)22.1.2 vb支持的數(shù)據(jù)庫(kù)系統(tǒng)32.1.3 數(shù)據(jù)庫(kù)開(kāi)發(fā)中的三大工具32.2 SQL Server 2000 簡(jiǎn)介42.2.1 SQL Server 數(shù)據(jù)庫(kù)特點(diǎn)52.3 ADO 對(duì)象概述62.3.1 利用ADO開(kāi)發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫(kù)應(yīng)用程序62.3.2 ADO組件的主要對(duì)象及其功能72.3.3 用來(lái)操控?cái)?shù)據(jù)的SQL命令72.4 VB訪問(wèn)數(shù)據(jù)庫(kù)過(guò)程8第三章

4、系統(tǒng)分析與設(shè)計(jì)93.1 系統(tǒng)功能分析93.2 系統(tǒng)結(jié)構(gòu)圖93.3 系統(tǒng)E-R圖103.4 數(shù)據(jù)庫(kù)設(shè)計(jì)11第四章 系統(tǒng)具體實(shí)現(xiàn)124.1 模塊設(shè)計(jì)124.2 登錄窗體設(shè)計(jì)144.3 主界面設(shè)計(jì)164.3.1 ImageLis194.3.2 Toolbar194.3.3 StatusBar194.3.4 菜單編輯器194.4 數(shù)據(jù)庫(kù)維護(hù)窗體設(shè)計(jì)204.5 管理員信息管理214.5.1 管理員注冊(cè)窗體設(shè)計(jì)214.5.2 密碼修改窗體設(shè)計(jì)234.6 學(xué)生基本情況更新窗體設(shè)計(jì)254.7 學(xué)生基本情況維護(hù)窗體設(shè)計(jì)294.7.1 數(shù)據(jù)環(huán)境314.7.2 DateReport1設(shè)計(jì)314.7.3 班級(jí)查找對(duì)話

5、框324.8 成績(jī)維護(hù)窗體設(shè)計(jì)334.8.1 DateReport2設(shè)計(jì)354.8.2 班級(jí)查找對(duì)話框354.9關(guān)于系統(tǒng)和系統(tǒng)幫助窗體設(shè)計(jì)37第五章 總結(jié)38結(jié)束語(yǔ)39參考文獻(xiàn)40摘 要隨著信息技術(shù)在管理上越來(lái)越深入而廣泛的應(yīng)用，管理信息系統(tǒng)的實(shí)施在技術(shù)上已逐步成熟。管理信息系統(tǒng)是一個(gè)不斷發(fā)展的新型學(xué)科，任何一個(gè)單位要生存要發(fā)展，要高效率地把內(nèi)部活動(dòng)有機(jī)地組織起來(lái)，就必須建立與自身特點(diǎn)相適應(yīng)的管理信息系統(tǒng)。本系統(tǒng)是在管理信息系統(tǒng)的理論和方法指導(dǎo)下、數(shù)據(jù)庫(kù)技術(shù)支持下完成的。本文在結(jié)構(gòu)上首先論述了畢業(yè)設(shè)計(jì)選題的背景、目的和意義，然后敘述了開(kāi)發(fā)環(huán)境、開(kāi)發(fā)平臺(tái)以及數(shù)據(jù)庫(kù)技術(shù)，接著用表格和圖片的方式介紹

6、了系統(tǒng)的整體規(guī)劃，接下來(lái)是系統(tǒng)在具體實(shí)現(xiàn)中的詳細(xì)內(nèi)容，最終本系統(tǒng)能夠完成信息的輸入、輸出,數(shù)據(jù)的修改、查詢以及打印報(bào)表等功能，本系統(tǒng)界面友好，操作簡(jiǎn)單，比較實(shí)用。關(guān)鍵詞：控件；窗體；報(bào)表；關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng)；VB。- 1 -貴州師范大學(xué)職業(yè)技術(shù)學(xué)院計(jì)算機(jī)工程系畢業(yè)設(shè)計(jì)第一章 引 言1.1 課題介紹高校學(xué)生信息的管理是一項(xiàng)既重要又繁瑣的工作。為更好的做好這項(xiàng)工作，提過(guò)工作效率，更好的為學(xué)校的發(fā)展和一線教學(xué)服務(wù)，決定：結(jié)合我校實(shí)際情況，自行研制一個(gè)學(xué)生信息管理系統(tǒng)。1.2 課題目的及意義由于現(xiàn)今的學(xué)生信息管理非常繁瑣，行政人員付出大量的工作時(shí)間，得到的效率很低。因此為提高工作效率，減輕校方人員的工

7、作負(fù)擔(dān)，決定開(kāi)發(fā)學(xué)生信息管理系統(tǒng)。計(jì)算機(jī)已經(jīng)成為我們學(xué)習(xí)和工作的得力助手：今天，計(jì)算機(jī)的價(jià)格已經(jīng)十分低廉，性能有了長(zhǎng)足的進(jìn)步。它已經(jīng)被應(yīng)用于許多領(lǐng)域，計(jì)算機(jī)之所以如此流行的原因主要有以下幾個(gè)方面： 首先，計(jì)算機(jī)可以代替人工進(jìn)行許多繁雜的勞動(dòng)；其次，計(jì)算機(jī)可以節(jié)省許多資源； 第三，計(jì)算機(jī)可以大大的提高人們的工作效率； 第四，計(jì)算機(jī)可以使敏感文檔更加安全等等。為了解決傳統(tǒng)學(xué)生信息的管理正面臨著的這些問(wèn)題，我所設(shè)計(jì)的學(xué)生信息管理系統(tǒng)也就應(yīng)運(yùn)而生了。1.3 研究方法、發(fā)展趨勢(shì)本系統(tǒng)采用功能分析法即通過(guò)說(shuō)明社會(huì)現(xiàn)象怎樣滿足一個(gè)社會(huì)系統(tǒng)的需要（即具有怎樣的功能）來(lái)解釋社會(huì)現(xiàn)象和CS模式共同完成。現(xiàn)代教育技

8、術(shù)特別是網(wǎng)絡(luò)與多媒體技術(shù)的發(fā)展，對(duì)學(xué)習(xí)活動(dòng)產(chǎn)生了具有深遠(yuǎn)意義的沖擊，人們可以選擇或者設(shè)計(jì)適合其學(xué)習(xí)特點(diǎn)的信息采集、加工與重組方式。本系統(tǒng)采用CS模式，在某些方面還不是表現(xiàn)的很好，但未來(lái)有關(guān)學(xué)生信息管理的應(yīng)該采用多層架構(gòu)的系統(tǒng)，是真正適應(yīng)教育信息化發(fā)展三大趨勢(shì)的校園網(wǎng)絡(luò)應(yīng)用系統(tǒng)，全面支持Internet功能、遠(yuǎn)程訪問(wèn)功能，采用先進(jìn)的CS和BS模式共同開(kāi)發(fā)，支持有關(guān)學(xué)校信息交流、日常教學(xué)、教務(wù)管理等的各種應(yīng)用，提供一個(gè)基于校園內(nèi)聯(lián)網(wǎng)中支持各種類型的學(xué)校應(yīng)用產(chǎn)品的服務(wù)平臺(tái)和開(kāi)發(fā)平臺(tái)，基本目標(biāo)是在學(xué)校內(nèi)部和外部建立起順暢的信息通道，讓信息技術(shù)成為推動(dòng)教育生產(chǎn)力的有力工具，提高學(xué)校的管理水平和效率，同時(shí)

9、充分利用全球的教育資源為學(xué)校的教育服務(wù)，克服目前大部分學(xué)校的校園網(wǎng)建設(shè)只起到宣傳作用的通病。第二章 開(kāi)發(fā)環(huán)境、工具介紹該軟件是在Windows XP Professional + Visual Basic 6.0 + SQL Server 2000的環(huán)境下完成的。下面就對(duì)這些開(kāi)發(fā)工具進(jìn)行介紹：2.1 Visual Basic 6.0微軟公司的Visual Basic 6.0是Windows應(yīng)用程序開(kāi)發(fā)工具，是目前最為廣泛的、易學(xué)易用的面向?qū)ο蟮拈_(kāi)發(fā)工具。Visual Basic提供了大量的控件，這些控件可用于設(shè)計(jì)界面和實(shí)現(xiàn)各種功能，減少了編程人員的工作量，也簡(jiǎn)化了界面設(shè)計(jì)過(guò)程，從而有效的提高了

10、應(yīng)用程序的運(yùn)行效率和可靠性。利用VISUAL BASIC 程序設(shè)計(jì)語(yǔ)言，可以很方便地設(shè)計(jì)出在WINDOWS環(huán)境下運(yùn)行的應(yīng)用程序。故而，實(shí)現(xiàn)本系統(tǒng)VB是一個(gè)相對(duì)較好的選擇。2.1.1 Visual Basic的編程特點(diǎn)Visual Basic語(yǔ)言的出現(xiàn)為Windows下的編程提出了一個(gè)新概念，利用Visual Basic的動(dòng)態(tài)數(shù)據(jù)交換、對(duì)象的鏈接和嵌入、動(dòng)態(tài)鏈接庫(kù)、ActiveX技術(shù)可以很方便地設(shè)計(jì)出功能強(qiáng)大的應(yīng)用程序。利用Visual Basic語(yǔ)言編程有以下幾個(gè)特點(diǎn)：1）、可視化程序設(shè)計(jì)在Visual Basic中開(kāi)發(fā)的應(yīng)用程序，不但有豐富的圖形界面，同時(shí)由用戶為開(kāi)發(fā)圖形界面添加的代碼真是少

11、而又少，因?yàn)樵谠O(shè)計(jì)圖形界面的過(guò)程中只需設(shè)置 ActiveX控件的屬性即可。2）、強(qiáng)大的數(shù)據(jù)庫(kù)和網(wǎng)絡(luò)功能隨著Visual Basic 語(yǔ)言的向前發(fā)展，它在數(shù)據(jù)庫(kù)和網(wǎng)絡(luò)方面的功能優(yōu)勢(shì)就愈加明顯，利用Visual Basic 中的ODBC開(kāi)放式的數(shù)據(jù)庫(kù)訪問(wèn)技術(shù)可以很方便地開(kāi)發(fā)出自己的數(shù)據(jù)庫(kù)應(yīng)用程序；利用 Visual Basic自帶的可視化數(shù)據(jù)管理器和報(bào)表生成器，完全可以在Visual Basic就完成數(shù)據(jù)庫(kù)的開(kāi)發(fā)工作。3）、其他特性在Visual Basic以前的版本中，由于仍然擺脫不了解釋執(zhí)行的代碼運(yùn)行機(jī)制，所以在相當(dāng)?shù)某潭壬现萍s了 Visual Basic 的發(fā)展。從Visual Basic5

12、.0版本開(kāi)始，在Visual Basic 中制作的應(yīng)用程序都改變?yōu)榫幾g執(zhí)行，使得Visual Basic的代碼效率有了很大的提高，同時(shí)執(zhí)行的速度 也加快了解30%(同Visual Basic4.0相比)。當(dāng)然在 Visual Basic中還有其它特性，例如：l 面向?qū)ο蟮木幊陶Z(yǔ)言；l 結(jié)構(gòu)化程序設(shè)計(jì)；l 事件驅(qū)動(dòng)的程序設(shè)計(jì)：在傳統(tǒng)的或“過(guò)程化”的應(yīng)用程序中，應(yīng)用程序自身控制了執(zhí)行哪一部分代碼和按何種順序執(zhí)行代碼。從第一行代碼執(zhí)行程序并按應(yīng)用程序中預(yù)定的路徑執(zhí)行，必要時(shí)才會(huì)調(diào)用過(guò)程。在事件驅(qū)動(dòng)的應(yīng)用程序中，代碼不是按預(yù)定的路徑執(zhí)行，而是在響不同的事件時(shí)執(zhí)行不同的代碼片段。事件可以由用戶操作觸發(fā)、

13、也可以由來(lái)自操作系統(tǒng)或其它應(yīng)用程序的消息觸發(fā)、甚至由應(yīng)用程序本身的消息觸發(fā)。這些事件的順序，決定了代碼執(zhí)行的順序，因此應(yīng)用程序每次運(yùn)行時(shí)所經(jīng)過(guò)的路徑都是不同的。l 支持動(dòng)態(tài)鏈接庫(kù)；l 應(yīng)用程序之間的資源共享； l 事件驅(qū)動(dòng)的程序設(shè)計(jì)；在傳統(tǒng)的或“過(guò)程化”的應(yīng)用程序中，應(yīng)用程序自身控制了執(zhí)行哪一部分代碼和按何種順序執(zhí)行代碼。從第一行代碼執(zhí)行程序并按應(yīng)用程序中預(yù)定的路徑執(zhí)行，必要時(shí)才會(huì)調(diào)用過(guò)程。在事件驅(qū)動(dòng)的應(yīng)用程序中，代碼不是按預(yù)定的路徑執(zhí)行，而是在響不同的事件時(shí)執(zhí)行不同的代碼片段。事件可以由用戶操作觸發(fā)、也可以由來(lái)自操作系統(tǒng)或其它應(yīng)用程序的消息觸發(fā)、甚至由應(yīng)用程序本身的消息觸發(fā)。這些事件的順序，

14、決定了代碼執(zhí)行的順序，因此應(yīng)用程序每次運(yùn)行時(shí)所經(jīng)過(guò)的路徑都是不同的。l 支持動(dòng)態(tài)鏈接庫(kù)；l 應(yīng)用程序之間的資源共享2.1.2 vb支持的數(shù)據(jù)庫(kù)系統(tǒng)VB支持對(duì)多格式的數(shù)據(jù)庫(kù)的訪問(wèn)和維護(hù)，無(wú)論是Access還是Foxpro中創(chuàng)建的數(shù)據(jù)庫(kù)，都可以用VB打開(kāi)，對(duì)其進(jìn)行查詢、修改和刪除等操作。事實(shí)上，VB幾乎支持對(duì)市面上所有數(shù)據(jù)庫(kù)的訪問(wèn)。VB可以訪問(wèn)的數(shù)據(jù)庫(kù)可以簡(jiǎn)單的分為三類，即：Microsoft Access格式數(shù)據(jù)庫(kù)，外部數(shù)據(jù)庫(kù)和ODBC數(shù)據(jù)庫(kù)。VB對(duì)多種數(shù)據(jù)庫(kù)格式的支持，大大的增強(qiáng)了開(kāi)發(fā)數(shù)據(jù)庫(kù)應(yīng)用程序的能力。2.1.3 數(shù)據(jù)庫(kù)開(kāi)發(fā)中的三大工具Visual Basic在數(shù)據(jù)庫(kù)應(yīng)用程序的開(kāi)發(fā)領(lǐng)域中，

15、提供包含數(shù)據(jù)管理（DataManager），數(shù)據(jù)控件（Data Control）以及數(shù)據(jù)編程對(duì)象（數(shù)據(jù)訪問(wèn)對(duì)象（DAO）、遠(yuǎn)程數(shù)據(jù)對(duì)象（RDO）和ActiveX數(shù)據(jù)對(duì)象（ADO）等功能強(qiáng)大的工具，協(xié)助設(shè)計(jì)人員輕松的連接數(shù)據(jù)庫(kù)文件，并訪問(wèn)其中的數(shù)據(jù)，在功能方面與其他一些專業(yè)數(shù)據(jù)庫(kù)軟件（如FoxPro，Micosoft Access等）不相上下。數(shù)據(jù)管理器（Data Manager）是Visual Basical已有的老成員之一，拓本盛舉有的Jet數(shù)據(jù)庫(kù)引擎（Database Engine）可以幫助VB程序元件立即維護(hù)數(shù)據(jù)庫(kù)內(nèi)容，并可通過(guò)輸入查詢或查找數(shù)據(jù)庫(kù)信息，而不必再通過(guò)其他數(shù)據(jù)庫(kù)軟件另外去設(shè)

16、計(jì)數(shù)據(jù)庫(kù)。數(shù)據(jù)控件是VB所提供的基本控件成員之一。它使得設(shè)計(jì)者省下一堆程序代碼編寫的工作，能夠輕松的設(shè)計(jì)及維護(hù)數(shù)據(jù)庫(kù)內(nèi)容。數(shù)據(jù)控件可以通過(guò)一些屬性的設(shè)置去鏈接某個(gè)數(shù)據(jù)庫(kù)文件，但是它本身并無(wú)法顯示數(shù)據(jù)庫(kù)各個(gè)記錄的內(nèi)容，必須在搭配其他具有數(shù)據(jù)感知（Data Aware）功能的控件對(duì)應(yīng)并顯示一個(gè)字段內(nèi)容，以方便地進(jìn)行記錄的瀏覽及編輯工作。VB提供的數(shù)據(jù)訪問(wèn)對(duì)象（Data Access Object；DAO）讓程序設(shè)計(jì)者擁有更大的發(fā)揮空間。借助程序代碼編寫，直接控制Jet數(shù)據(jù)庫(kù)引擎，配合數(shù)據(jù)庫(kù)控件，能夠開(kāi)發(fā)出更具彈性且高效率的數(shù)據(jù)應(yīng)用程序。RDO是處理遠(yuǎn)程數(shù)據(jù)庫(kù)的一些專門需要的對(duì)象集合。使用RDO可以

17、不用本地的查詢機(jī)就能訪問(wèn)ODBC數(shù)據(jù)源，這無(wú)疑將大大提高應(yīng)用程序的性能。ADO是VB6.0中新增的對(duì)象，它是一個(gè)更簡(jiǎn)單的對(duì)象模型，它更好的集成了其它數(shù)據(jù)訪問(wèn)技術(shù)，并且對(duì)本地和遠(yuǎn)程數(shù)據(jù)庫(kù)均有共同的界面，可以取代DAO和RDO。ADO更易于使用。我們?cè)诒鞠到y(tǒng)中利用數(shù)據(jù)管理器創(chuàng)建了數(shù)據(jù)庫(kù)及數(shù)據(jù)庫(kù)表，并采用了ADO數(shù)據(jù)訪問(wèn)技術(shù)。2.2 SQL Server 2000 簡(jiǎn)介SQL Server 2000是微軟公司最新版的大型數(shù)據(jù)庫(kù)服務(wù)器，其性能指標(biāo)在各方面都有趕超Oracle數(shù)據(jù)庫(kù)的趨勢(shì)。用它可以方便地管理數(shù)據(jù)庫(kù)和開(kāi)發(fā)應(yīng)用程序，它使用了最先進(jìn)的數(shù)據(jù)庫(kù)構(gòu)架，與Windows NT/2000平臺(tái)緊密集成，具

18、有完全的Web功能。通過(guò)對(duì)高端硬件平臺(tái)、網(wǎng)絡(luò)和存儲(chǔ)技術(shù)的支持，為WEB站和企業(yè)的應(yīng)用最大限度地提供了可擴(kuò)展性和高可靠性，能在Internet商業(yè)領(lǐng)域快速建立并應(yīng)用。此外，還增強(qiáng)了安全性，保護(hù)防火墻內(nèi)外的數(shù)據(jù)。支持基于角色的安全并擁有安全審計(jì)工具。在經(jīng)歷了SQL Server 6.5和7.0兩個(gè)版本的嘗試后，微軟公司終于開(kāi)始了大規(guī)模的業(yè)務(wù)。記得在以前各種關(guān)于SQL Server的文章，都會(huì)將其定位成中小型應(yīng)用方面，這種感覺(jué)被大家自然的延續(xù)到了2000版之中。其實(shí)這是一種誤解。在過(guò)去的很長(zhǎng)一段時(shí)間中，微軟公司聘請(qǐng)了世界上最優(yōu)秀的數(shù)據(jù)庫(kù)專家以及專門搭建了信息量可謂空前的地理信息系統(tǒng)，勵(lì)精圖治，就是為

19、了摘掉扣在自己頭上的這頂帽子。有了強(qiáng)大的性能和功能支持，再配合其一向?yàn)槿朔Q道的易用性，SQL Server可以說(shuō)成為了開(kāi)發(fā)者手中的一柄利器！ 另外，目前國(guó)內(nèi)的一些關(guān)于微軟平臺(tái)的數(shù)據(jù)庫(kù)編程教程，喜歡使用Access作為數(shù)據(jù)庫(kù)平臺(tái)的案例，并展開(kāi)相關(guān)的內(nèi)容。這其實(shí)對(duì)于開(kāi)發(fā)真正的數(shù)據(jù)庫(kù)應(yīng)用并沒(méi)有直接的幫助作用，只能使大家停留在應(yīng)用的初級(jí)階段。SQL Server 2000提供的非常傻瓜的缺省安裝和使用模式，其上手難度并不比Access大。另外，SQL Server 2000可以兼顧小、中、大規(guī)模的應(yīng)用，有著遠(yuǎn)遠(yuǎn)比Access強(qiáng)大的伸縮性。2.2.1 SQL Server 數(shù)據(jù)庫(kù)特點(diǎn)概括起來(lái)，SQL S

20、erver 2000數(shù)據(jù)庫(kù)管理系統(tǒng)具有以下主要特點(diǎn)。1）、豐富的圖形管理工具，使系統(tǒng)管理、操作更為直觀方便。SQL Server企業(yè)管理器是一個(gè)基于圖形用戶界面（GUI）的集成管理工具，利用它可以配置管理SQL Server服務(wù)器、管理數(shù)據(jù)庫(kù)和數(shù)據(jù)庫(kù)對(duì)象、備份和恢復(fù)數(shù)據(jù)、調(diào)度任務(wù)和管理警報(bào)、實(shí)現(xiàn)數(shù)據(jù)復(fù)制和轉(zhuǎn)換操作等。此外，SQL Server 2000還提供了SQL事件探查器、SQL查詢分析器、SQL Server服務(wù)管理器和多種操作向?qū)У葓D形界面管理工具，大大簡(jiǎn)化了用戶操作，從而增強(qiáng)了系統(tǒng)的易用性。2）、動(dòng)態(tài)自動(dòng)管理和優(yōu)化功能。即使SQL Server數(shù)據(jù)庫(kù)管理員不做任何設(shè)置，SQL Ser

21、ver也能夠在運(yùn)行過(guò)程中根據(jù)環(huán)境配置和用戶訪問(wèn)情況動(dòng)態(tài)自動(dòng)配置，以達(dá)到最優(yōu)性能，從而減輕管理員工作。3）、充分的Internet技術(shù)支持。Internet網(wǎng)絡(luò)發(fā)展到今天已經(jīng)成為一條重要的信息發(fā)布渠道，SQL Server增強(qiáng)了對(duì)Internet技術(shù)支持，它除保留了前期版本中的數(shù)據(jù)庫(kù)Web出版工具“Web助手”外，還增強(qiáng)了對(duì)XML和HTTP技術(shù)的支持，這使得電子商務(wù)系統(tǒng)能夠通過(guò)XML等訪問(wèn)SQL Server數(shù)據(jù)庫(kù)系統(tǒng)，也擴(kuò)展了SQL Server在數(shù)據(jù)挖掘和分析服務(wù)領(lǐng)域的應(yīng)用。4）、豐富的編程接口工具，使用戶開(kāi)發(fā)SQL Server數(shù)據(jù)庫(kù)應(yīng)用程序更加靈活。SQL Server提供了Transa

22、ct-SQL、DB-Library for C、嵌入式SQL（ESQL）等開(kāi)發(fā)工具，Transact-SQL與工業(yè)標(biāo)準(zhǔn)SQL語(yǔ)言兼容，并在其基礎(chǔ)上加以擴(kuò)充，使它更適合事務(wù)處理方面的需要。此外，SQL Server 2000還支持ODBC、OLE DB、ADO規(guī)范，可以使用ODBC、OLE DB、ADO接口訪問(wèn)SQL Server數(shù)據(jù)庫(kù)。5）、具有很好的伸縮性和可靠性。SQL Server 2000既能運(yùn)行在Windows桌面操作系統(tǒng)下，又可運(yùn)行在服務(wù)器操作系統(tǒng)（包括Windows NT和Windows 2000）下；既能運(yùn)行在單CPU計(jì)算機(jī)上，又能運(yùn)行在對(duì)稱多處理系統(tǒng)下。所以，它具有很好的伸縮

23、性，能夠滿足從桌面應(yīng)用到大型企業(yè)分布式應(yīng)用到不同層次用戶的要求。6）、簡(jiǎn)單的管理方式。SQL Server 2000與Microsoft Windows 2000有機(jī)集成，所以可以使用Windows 2000的活動(dòng)目錄（Active Directory）功能對(duì)SQL Server進(jìn)行集中管理，大大簡(jiǎn)化大型企業(yè)中的系統(tǒng)管理工作。此外，與Windows 2000的集成還使SQL Server能夠充分利用操作系統(tǒng)所提供的服務(wù)和功能（如安全管理、事件日志、性能監(jiān)視器、內(nèi)存管理和異步I/O等），從而增強(qiáng)了SQL Server數(shù)據(jù)庫(kù)系統(tǒng)的功能，并且只需要占用很少的系統(tǒng)資源。2.3 ADO 對(duì)象概述ADO對(duì)

24、象能夠存取到數(shù)據(jù)庫(kù)的內(nèi)容，首先要求數(shù)據(jù)庫(kù)的驅(qū)動(dòng)程序( ODBC驅(qū)動(dòng)程序與OLE DB驅(qū)動(dòng)程序)必須安裝上，否則，ADO對(duì)象是無(wú)法存取數(shù)據(jù)庫(kù)中內(nèi)容，其原理示意圖如下圖所示：客戶端客戶端客戶端ADO對(duì)象各種數(shù)據(jù)庫(kù)所對(duì)應(yīng)的驅(qū)動(dòng)程序各種數(shù)據(jù)庫(kù)(如Access、SQL Server以及Oracle等)請(qǐng)注意：上圖中的“各種數(shù)據(jù)庫(kù)所對(duì)應(yīng)的驅(qū)動(dòng)程序”即ODBC驅(qū)動(dòng)程序與OLE DB驅(qū)動(dòng)程序。2.3.1 利用ADO開(kāi)發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫(kù)應(yīng)用程序ADO（Active Date Objects,即ActiveX數(shù)據(jù)對(duì)象）是一個(gè)ASP內(nèi)置的ActiveX服務(wù)器組件（ActiveX Server Component）。可把它

25、與ASP結(jié)合起來(lái)，建立提供數(shù)據(jù)庫(kù)信息的網(wǎng)頁(yè)內(nèi)容，對(duì)數(shù)據(jù)庫(kù)進(jìn)行查詢、插入、更新、刪除等操作，并可以把在用戶端實(shí)現(xiàn)“網(wǎng)上實(shí)時(shí)更新顯示”的最新Web數(shù)據(jù)庫(kù)技術(shù)。要執(zhí)行ADO，服務(wù)器端必須安裝Windows NT Server 和Internet Information Server(IIS)，而客戶端只要有IE或NETSCAPE較新版本的瀏覽器即可。利用ADO開(kāi)發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫(kù)應(yīng)用程序有以下幾個(gè)優(yōu)點(diǎn)：1）、支持客戶機(jī)/服務(wù)器結(jié)構(gòu)（Client/Server）與Web系統(tǒng)開(kāi)發(fā)技術(shù)。2）、內(nèi)部有多個(gè)互相獨(dú)立的對(duì)象模型。3）、支持分批修改數(shù)據(jù)庫(kù)內(nèi)容。4）、支持多種不同的數(shù)據(jù)控制指標(biāo)形式。5）、先進(jìn)的Recor

26、dset數(shù)據(jù)高速緩存管理功能。6）、允許在程序中使用多個(gè)Recordset對(duì)象或者多個(gè)分批修改區(qū)塊傳送。7）、ADO屬于Free_threaded對(duì)象，利用它可以開(kāi)發(fā)出更有效的Web應(yīng)用程序。2.3.2 ADO組件的主要對(duì)象及其功能ADO組件又稱為數(shù)據(jù)庫(kù)訪問(wèn)組件，它提供了以下七種對(duì)象：1）、Connection對(duì)象：提供對(duì)數(shù)據(jù)庫(kù)的連接服務(wù)。2）、Command對(duì)象：定義對(duì)數(shù)據(jù)庫(kù)源操作的命令。3）、Recordset對(duì)象：由數(shù)據(jù)庫(kù)服務(wù)器所返回的記錄集。Recordset對(duì)象的LockType屬性的設(shè)置值如下表所示：常量值說(shuō)明adLockReadOnly1默認(rèn)值，只讀。無(wú)法更改數(shù)據(jù)adLockPr

27、essimistic2保守式記錄鎖定（逐條）。提供者執(zhí)行必要的操作確保成功編輯記錄，通常采用立即鎖定數(shù)據(jù)源的記錄的方式。adLockOptimistic3開(kāi)放式記錄鎖定（逐條）。提供者使用開(kāi)放式鎖定，只在調(diào)用Updata方法時(shí)鎖定記錄。adLockBatchOptimistic4開(kāi)放式批更新。用于與立即更新模式相反的批更新模式。4）、Fields對(duì)象：由數(shù)據(jù)庫(kù)服務(wù)器所返回的單一數(shù)據(jù)字段5）、Parametes對(duì)象：表示Command對(duì)象的參數(shù)。6）、Property對(duì)象：?jiǎn)为?dú)的一個(gè)Property對(duì)象，提供屬性功能。7）、Error對(duì)象：提供處理錯(cuò)誤的功能。使用ADO對(duì)象可以建立和管理數(shù)據(jù)庫(kù)的

28、連接，按數(shù)據(jù)庫(kù)服務(wù)器的要求獲得數(shù)據(jù)，執(zhí)行更新、刪除、添加數(shù)據(jù)等操作，獲取ODBC的錯(cuò)誤信息等。2.3.3 用來(lái)操控?cái)?shù)據(jù)的SQL命令SQL命令是發(fā)送給數(shù)據(jù)庫(kù)并要求數(shù)據(jù)庫(kù)操作的指令，它是專門為數(shù)據(jù)庫(kù)設(shè)計(jì)的語(yǔ)言，比一般的計(jì)算機(jī)程序語(yǔ)言簡(jiǎn)單的多。SQL命令主要分成兩部分：DDL(Data Definition Language)和DML(Data Manipulation Language),其中DDL是建立數(shù)據(jù)表及數(shù)據(jù)列的指令群，而DML則是操作數(shù)據(jù)庫(kù)記錄的指令群，如數(shù)據(jù)庫(kù)記錄的添加、更新、刪除、和查詢等。SQL命令，包括Select、Delete、Update、Insert Into、Select

29、 Into等。1）、篩選及排序記錄的Select指令基本句型一：Select 字段串列 From 數(shù)據(jù)表基本句型二：Select From Where 篩選條件基本句型三：Select From Order By字段串列Select Top：限定選取數(shù)據(jù)的條數(shù)2）、刪除數(shù)據(jù)記錄的Delete指令基本語(yǔ)法：Delete From 數(shù)據(jù)表 Where 條件式3）、更新數(shù)據(jù)記錄的Update指令基本語(yǔ)法：Update 數(shù)據(jù)表Set 表達(dá)式4）、增加數(shù)據(jù)記錄的Insert Into 指令基本句型一：Insert Into 數(shù)據(jù)表 (字段串列) Values (字段串列)基本句型二：Insert Int

30、o 數(shù)據(jù)表 (字段1,字段2,字段n) Select 5）、建立新數(shù)據(jù)表的Select Into 指令該指令與“Insert Into Select ”指令的區(qū)別是，這個(gè)指令將建立另一個(gè)新的數(shù)據(jù)表，而Insert Into是增加數(shù)據(jù)記錄到“現(xiàn)存的”數(shù)據(jù)表中。2.4 VB訪問(wèn)數(shù)據(jù)庫(kù)過(guò)程1）、定義數(shù)據(jù)庫(kù)組件Dim conn As New ADODB.Connection其中conn為連接對(duì)象Dim reco As New ADODB.Recordset 其中reco為結(jié)果集對(duì)象2）、打開(kāi)數(shù)據(jù)庫(kù)對(duì)于SQL數(shù)據(jù)庫(kù)，其連接語(yǔ)句為conn.Open "driver=sql server;serv

31、er=localhost;uid=sa;pwd=;database=student"。而對(duì)于Access數(shù)據(jù)庫(kù)，連接語(yǔ)句為conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path + "student.mdb"3）、設(shè)定SQL語(yǔ)句，使用“Execute”命令，即可開(kāi)始執(zhí)行訪問(wèn)數(shù)據(jù)庫(kù)的動(dòng)作4）、關(guān)閉結(jié)果集對(duì)象，斷開(kāi)與數(shù)據(jù)庫(kù)的連接reco.Closeconn.Close第三章 系統(tǒng)分析與設(shè)計(jì)3.1 系統(tǒng)功能分析隨著學(xué)校的規(guī)模不斷擴(kuò)大，學(xué)生數(shù)量急劇增加，有關(guān)學(xué)生的

32、各種信息量也成倍增長(zhǎng)。面對(duì)龐大的信息量就需要有一個(gè)學(xué)生信息管理系統(tǒng)來(lái)提高學(xué)生管理工作的效率。通過(guò)這樣的系統(tǒng)可以做到信息的規(guī)范管理、快速查詢、修改、增加、刪除等，從而減少管理方面的工作量。設(shè)計(jì)內(nèi)容為管理員或普通用戶登錄該系統(tǒng)進(jìn)行五個(gè)模塊操作：1）、學(xué)生基本情況更新：增加、修改、刪除、查詢（按學(xué)號(hào)）2）、學(xué)生基本情況維護(hù)：增加、修改、刪除、打印、查詢（按專業(yè)）3）、學(xué)生成績(jī)維護(hù)：添加成績(jī)、打印、查詢（按學(xué)號(hào)、專業(yè)）4）、密碼修改：修改所有用戶密碼（管理員）、修改自己密碼（普通用戶）5）、數(shù)據(jù)維護(hù)：對(duì)該系統(tǒng)數(shù)據(jù)庫(kù)進(jìn)行備份和還原3.2 系統(tǒng)結(jié)構(gòu)圖本系統(tǒng)主要包括學(xué)生基本情況更新，學(xué)生基本情況維護(hù)、學(xué)生成

33、績(jī)維護(hù)、密碼修改和數(shù)據(jù)維護(hù)5個(gè)大的模塊，各個(gè)模塊的具體功能如下圖所示：3.3 系統(tǒng)E-R圖1）、用戶（普通用戶、管理員）實(shí)體圖如下圖所示：2）、學(xué)生實(shí)體圖如下圖所示：3）、學(xué)生選課關(guān)系圖如下圖所示：3.4 數(shù)據(jù)庫(kù)設(shè)計(jì)在系統(tǒng)設(shè)計(jì)過(guò)程中，首先要建立的就是數(shù)據(jù)庫(kù)。本數(shù)據(jù)庫(kù)采用SQL Server2000來(lái)構(gòu)造，共使用了3個(gè)表，它們分別是用戶信息表（admin）、學(xué)生基本情況表（student）、學(xué)生成績(jī)表（grade）。1）、用戶信息表（admin）：表結(jié)構(gòu)如下表所示：名稱字段名稱類型長(zhǎng)度用戶IDidint4用戶名namechar6用戶密碼passwordchar6用戶類型typechar10注冊(cè)時(shí)

34、間registdatedatetime82）、學(xué)生基本情況表（student）：表結(jié)構(gòu)如下表所示：名稱字段名稱類型長(zhǎng)度學(xué)號(hào)snovarchar10姓名snamechar10性別ssexchar2班級(jí)sclassvarchar 50出生年月sbirthdaychar10政治面貌spavarchar8地址saddressvarchar50電話sphonevarchar11Emailsemailvarchar203）、學(xué)生成績(jī)表（grade）：表結(jié)構(gòu)如下表所示：名稱字段名稱類型長(zhǎng)度學(xué)號(hào)snoint2課程名cnamechar10成績(jī)gradechar2學(xué)期semesterchar8第四章 系統(tǒng)具體實(shí)現(xiàn)

35、本部分主要內(nèi)容為本系統(tǒng)的各個(gè)運(yùn)行界面以及主要界面的源代碼4.1 模塊設(shè)計(jì)添加一個(gè)模塊module1。該部分主要包括一些公共變量的定義、main過(guò)程定義以及自動(dòng)把備份的數(shù)據(jù)庫(kù)文件還原到SQL Server 2000 中的代碼設(shè)計(jì)。代碼如下：Public Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long '獲取主機(jī)名的定義Public Aname, Asor

36、t As String '狀態(tài)欄上顯示當(dāng)前用戶的名稱和用戶類型Public conn As New ADODB.Connection '新建連接對(duì)象Public reco As New ADODB.Recordset '新建記錄集對(duì)象Public reco2 As New ADODB.RecordsetPublic conn_str1, conn_str2 As String'=定義一個(gè)main過(guò)程，從main過(guò)程啟動(dòng)程序，同時(shí)連接到數(shù)據(jù)庫(kù)=Public Sub Main() reco.CursorLocation = adUseClient reco2.Cur

37、sorLocation = adUseClient conn_str1 = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=maokeyang;Data Source=" & GetPcName() conn_str2 = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=master;Data S

38、ource=" & GetPcName() DB_ADD'先調(diào)用DB_ADD來(lái)將maokeyang數(shù)據(jù)庫(kù)添加到SQL Server 2000中 conn.Open conn_str1 '連接到數(shù)據(jù)庫(kù)" frm_login.Show '登錄窗體顯示End Sub '=此函數(shù)用來(lái)獲取主機(jī)名！=Public Function GetPcName() As String Dim compname As String, retval As Long compname = Space(255) retval = GetComputerName(c

39、ompname, 255) compname = Left(compname, InStr(compname, vbNullChar) - 1) GetPcName = compnameEnd Function'=關(guān)閉記錄集=Public Sub Close_Reco() If reco.State = 1 Then reco.Close End IfEnd Sub '此過(guò)程用來(lái)在啟動(dòng)軟件的時(shí)候把maokeyang數(shù)據(jù)庫(kù)添加到SQL Server 2000 中Public Sub DB_ADD() Dim s As String On Error GoTo ErrorCheck

40、a: conn.Open conn_str2 reco.Open "select * from sysdatabases where name='maokeyang'", conn, 1, 3 '查詢是否存在maokeyang數(shù)據(jù)庫(kù) If reco.RecordCount <> 1 Then '如果maokeyang數(shù)據(jù)庫(kù)不存在，則添加maokeyang數(shù)據(jù)庫(kù)，否則不添加 mkdir_kill conn.Execute "restore database maokeyang from disk='" &

41、amp; App.Path & "backupmaokeyang'" Else reco.Close conn.Close Exit Sub End If reco.Close conn.Close Exit SubErrorCheck: MsgBox "您可能沒(méi)有啟動(dòng)SQL Server服務(wù)", , "提示" Shell "net start mssqlserver" MsgBox "啟動(dòng)成功！", , "提示" GoTo aEnd Sub'新建路徑

42、并刪除原有的數(shù)據(jù)庫(kù)Public Sub mkdir_kill() On Error Resume Next MkDir "c:program files" MkDir "c:Program FilesMicrosoft SQL Server" MkDir "C:Program FilesMicrosoft SQL ServerMSSQL" MkDir "C:Program FilesMicrosoft SQL ServerMSSQLData" Kill "C:Program FilesMicrosoft

43、SQL ServerMSSQLDatamaokeyang_Log.LDF" Kill "C:Program FilesMicrosoft SQL ServerMSSQLDatamaokeyang_Data.MDF"End Sub4.2 登錄窗體設(shè)計(jì)添加一個(gè)窗體（frm_login）。該部分主要包括用戶的驗(yàn)證以及登錄次數(shù)的限制。窗體運(yùn)行情況如下圖所示：代碼如下：Dim n As Integer 'n為限制登陸次數(shù)的變量Private Sub Form_Load() n = 4End SubPrivate Sub Command1_Click() '確

44、定按鈕 Close_Reco With reco '連接到表并產(chǎn)生記錄集 .Open "select * from admin where name='" & Trim(Text1.Text) & "' and password='" & Trim(Text2.Text) & "'", conn, 1, 1 If .RecordCount > 0 Then Aname = Trim(.Fields("name") '將成功登錄的用

45、戶名賦給Aname Asort = Trim(.Fields("type") '將成功登錄的用戶類型賦給Asort .Close Unload Me frm_main.Show '主界面顯示 Else n = n - 1 .Close .Open "select * from admin where name='" & Trim(Text1.Text) & "'", conn, 1, 1 If .RecordCount = 0 Then MsgBox ("用戶名錯(cuò)誤，請(qǐng)重新輸入

46、！您還有" & n & "次機(jī)會(huì)登陸！"), , ("錯(cuò)誤") Text1.SetFocus .Close Else MsgBox ("密碼錯(cuò)誤，請(qǐng)重新輸入！您還有" & n & "次機(jī)會(huì)登陸！"), , ("錯(cuò)誤") .Close Text2.SetFocus End If End If If n = 0 Then Close_Reco Unload Me End If End WithEnd SubPrivate Sub Command2_Click

47、() '取消按鈕If MsgBox("你真的不登錄學(xué)生信息管理系統(tǒng)嗎?", vbQuestion + vbYesNo, "退出系統(tǒng)提示信息") = vbYes ThenEndEnd IfEnd Sub '=只有當(dāng)用戶名和密碼框都不為空時(shí)“登錄”按鈕才可用=Private Sub Text2_Change() '密碼文本框 If Text1.Text <> "" And Text2.Text <> "" Then Command1.Enabled = True Comm

48、and1.Default = True Else Command1.Enabled = False End IfEnd SubPrivate Sub Text1_Change() '用戶名文本框 If Text2.Text <> "" And Text1.Text <> "" Then Command1.Enabled = True Command1.Default = True Else Command1.Enabled = False End IfEnd Sub4.3 主界面設(shè)計(jì)添加一個(gè)窗體（frm_main）。該部分

49、主要添加ImageList 、StatusBar、Toolbar控件和菜單編輯器。以用戶名為楊茂科、密碼為123登錄，窗體運(yùn)行情況如下圖所示：代碼如下：Private Sub a1_Click()frm_beifen.ShowEnd SubPrivate Sub b1_Click()frm_regist.ShowEnd SubPrivate Sub b2_Click()frm_modify.ShowEnd SubPrivate Sub c1_Click()frm_qkbgx.ShowEnd SubPrivate Sub c2_Click()frm_qkbwh.ShowEnd SubPrivat

50、e Sub c3_Click()frm_cjbwh.ShowEnd SubPrivate Sub d1_Click()frm_about.ShowEnd SubPrivate Sub d2_Click()frm_help.ShowEnd SubPrivate Sub e_Click()Unload Mefrm_login.ShowEnd SubPrivate Sub f_Click()EndEnd SubPrivate Sub Form_Load()StatusBar1.Panels(1).Text = "用戶：" & Aname '狀態(tài)欄第一格顯示用戶名S

51、tatusBar1.Panels(2).Text = "類型：" & Asort '狀態(tài)欄第二格顯示用戶類型End SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.Key Case "one" frm_qkbgx.Show 1 '情況表更新窗體顯示 Case "two" frm_qkbwh.Show 1 '情況表維護(hù)窗體顯示 Case "three" f

52、rm_cjbwh.Show 1 '成績(jī)表維護(hù)窗體顯示 Case "four" frm_modify.Show 1 '密碼修改窗體顯示 Case "five" frm_beifen.Show 1 '數(shù)據(jù)庫(kù)維護(hù)窗體顯示End SelectEnd Sub4.3.1 ImageLis在主界面上添加一個(gè)圖像列表控件，在屬性頁(yè)設(shè)置插入5張圖片。4.3.2 Toolbar在主窗體上添加一個(gè)工具欄控件，在屬性頁(yè)上將圖像列表從無(wú)設(shè)置到ImageList1，添加5個(gè)按鈕，按鈕屬性如下表所示：索引12345標(biāo)題情況表更新情況表維護(hù)成績(jī)表維護(hù)密碼修改數(shù)據(jù)

53、備份關(guān)鍵字onetwothreefourfive圖像123454.3.3 StatusBar在主窗體上添加一個(gè)狀態(tài)欄控件，在狀態(tài)欄上添加5個(gè)格子，后三個(gè)格子分別設(shè)置為日期、時(shí)間、文本4.3.4 菜單編輯器在主窗體上添加一個(gè)菜單編輯器，菜單結(jié)構(gòu)、屬性如下表所示：菜單結(jié)構(gòu)標(biāo)題名稱標(biāo)題名稱文件a情況表維護(hù)c 2數(shù)據(jù)庫(kù)維護(hù)a 1成績(jī)表維護(hù)c 3管理員信息b幫助d注冊(cè)b 1關(guān)于系統(tǒng)d 1修改密碼b 2系統(tǒng)幫助d 2數(shù)據(jù)維護(hù)c重新登錄e情況表更新c 1退出f4.4 數(shù)據(jù)庫(kù)維護(hù)窗體設(shè)計(jì)添加一個(gè)窗體（frm_beifen）、一個(gè)CommonDialog控件。該部分主要包括數(shù)據(jù)庫(kù)的備份與還原。窗體運(yùn)行情況如下圖

54、所示：代碼如下：Private Sub Command1_Click() '備份按鈕Dim backUpFileName As String '變量聲明CommonDialog1.DialogTitle = "備份文件" '設(shè)置對(duì)話框的標(biāo)題CommonDialog1.Filter = "*.*"CommonDialog1.ShowSave '設(shè)置對(duì)話框的按鈕類型為保存backUpFileName = CommonDialog1.FileName '將保存的文件名賦給變量If CommonDialog1.FileNa

55、me = "" ThenMsgBox ("文件名不能為空,請(qǐng)輸入文件名 ")CommonDialog1.ShowSaveElse conn.Execute ("backup database library to disk='" & backUpFileName & "'") '執(zhí)行備份語(yǔ)句 MsgBox ("備份成功")End IfEnd SubPrivate Sub Command2_Click() '還原按鈕conn.Closeconn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=master;Data Source=" & GetPcName() '借助master數(shù)據(jù)庫(kù)來(lái)恢復(fù)CommonDialog1.DialogTitle = "還原的文件名"CommonDialog1.Filter = &quo