

版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、<p> 課 程 設(shè) 計(jì) 報(bào) 告</p><p> (2010 ~2011年度第 2 學(xué)期)</p><p> 專(zhuān)業(yè)計(jì)算機(jī)科學(xué)與技術(shù)</p><p> 課程數(shù)據(jù)庫(kù)系統(tǒng)原理 </p><p> 班級(jí)10級(jí)專(zhuān)升本一班</p><p><b> 目錄</b></p>
2、<p> 目 錄 …………………………………………………………………………… 1</p><p> 摘 要 …………………………………………………………………………… 1</p><p> 第一章 概 述 ……………………………………………………………….……………1</p><p> 1.來(lái)源
3、 ……………………………………………………………………………. 1</p><p> 2.本課題的目的、內(nèi)容………………………………………………………………1</p><p> 第二章 開(kāi)發(fā)工具的選擇及系統(tǒng)的要求……………………………………………………...2</p><p> 1.開(kāi)發(fā)工具的選擇……………………………………………………………………2<
4、;/p><p> 2.系統(tǒng)配置……………………………………………………………………………5</p><p> 3.軟件配置……………………………………………………………………………5</p><p> 4.硬件配置……………………………………………………………………………6</p><p> 第三章 系統(tǒng)調(diào)研及可行性分析……………………
5、………………………………………...7</p><p> 1.系統(tǒng)調(diào)研……………………………………………………………………………7</p><p> 2.可行性分析概述…………………………………………………………………....7</p><p> 3.技術(shù)可行性分析……………………………………………………………………8</p><p>
6、 第四章 系統(tǒng)分析………………………………………………………………………………9</p><p> 1.系統(tǒng)需求分析………………………………………………………………………9</p><p> 2.數(shù)據(jù)流圖……………………………………………………………………………9</p><p> 第五章 系統(tǒng)總體設(shè)計(jì)……………………………………………………………………
7、….11</p><p> 1.系統(tǒng)流程…………………………………………………………………………..11</p><p> 2.流程功能分解圖…………………………………………………………………..12</p><p> 第六章 數(shù)據(jù)庫(kù)設(shè)計(jì)………………………………………………………………………….13</p><p> 1.E-R圖設(shè)
8、計(jì)………………………………………………………………………..13</p><p> 2.數(shù)據(jù)表概述………………………………………………………………………..13</p><p> 第七章 主界面設(shè)計(jì)與分析………………………………………………………………….20</p><p> 第八章 結(jié)論………………………………………………………………………………….2
9、6</p><p> 參考文獻(xiàn) ………………………………………………………………………………………27</p><p> 附 錄 ………………………………………………………………………………………28</p><p><b> 摘要</b></p><p> 隨著計(jì)算機(jī)技術(shù)的飛速發(fā)展,計(jì)算機(jī)在企業(yè)管理中應(yīng)用
10、的普及,利用計(jì)算機(jī)實(shí)現(xiàn)車(chē)輛管理勢(shì)在必行。本系統(tǒng)結(jié)合公司實(shí)際的車(chē)輛管理制度,經(jīng)過(guò)實(shí)際的需求分析,采用功能強(qiáng)大的Visual Basic6.0作為開(kāi)發(fā)工具而開(kāi)發(fā)出來(lái)的單機(jī)版人事管理系統(tǒng)。</p><p> 整個(gè)系統(tǒng)從符合操作簡(jiǎn)便、界面友好、靈活、實(shí)用、安全的要求出發(fā),完成車(chē)輛管理的全過(guò)程,包括新進(jìn)司機(jī)加入時(shí)人事檔案的建立、維修、事故、等一系列信息、員工信息查詢、車(chē)輛查詢、事故處理、事故記錄、老員工修改等管理工作。經(jīng)
11、過(guò)實(shí)際使用證明,本文所設(shè)計(jì)的車(chē)輛管理系統(tǒng)可以可以有效管理企業(yè)每臺(tái)汽車(chē)的使用狀況,帶動(dòng)企業(yè)進(jìn)入車(chē)輛管理信息化、科學(xué)化、同時(shí)也可以節(jié)省人力、物力、財(cái)力、提高工作效率,使企業(yè)車(chē)輛管理更加科學(xué)、更加規(guī)范。</p><p> 關(guān)鍵詞: 車(chē)輛管理;信息系統(tǒng);控件;窗體</p><p><b> 第一章 概述</b></p><p><b>
12、; 1、來(lái)源</b></p><p> 隨著我國(guó)經(jīng)濟(jì)的快速發(fā)展,汽車(chē)已成為人們不可缺少的交通工具。對(duì)于擁有大量車(chē)輛的運(yùn)輸企業(yè)來(lái)說(shuō),車(chē)輛的管理成為日常事務(wù)中的一項(xiàng)重要工作。但一直以來(lái)人們使用傳統(tǒng)人工的方式進(jìn)行車(chē)輛管理,這種管理方式存在著許多缺點(diǎn),如:效率低、實(shí)時(shí)性差等,另外時(shí)間一長(zhǎng),將產(chǎn)生大量的文件和數(shù)據(jù),這對(duì)于查找、更新和維護(hù)都帶來(lái)了不少的困難。隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的
13、功能已為人們深刻認(rèn)識(shí),它已進(jìn)入人類(lèi)社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來(lái)越重要的作用。利用計(jì)算機(jī)可以集中管理車(chē)輛的運(yùn)營(yíng)、維修、事故、等一系列信息,可以有效管理企業(yè)每臺(tái)汽車(chē)的使用狀況,帶動(dòng)企業(yè)進(jìn)入車(chē)輛管理信息化、科學(xué)化、同時(shí)也可以節(jié)省人力、物力、財(cái)力、提高工作效率,使企業(yè)車(chē)輛管理更加科學(xué)、更加規(guī)范。</p><p> 2、本課題的目的、內(nèi)容</p><p><b> (1)目的:</
14、b></p><p> 目前市面上流行的運(yùn)輸管理系統(tǒng)不少。但是,對(duì)于企、事業(yè)單位的運(yùn)輸管理系統(tǒng)來(lái)說(shuō),不需要大型的數(shù)據(jù)庫(kù)系統(tǒng)。只需要一個(gè)操作方便,功能實(shí)用,能滿足本中心對(duì)數(shù)據(jù)的管理及需求的系統(tǒng)。我們的目標(biāo)就是在于開(kāi)發(fā)一個(gè)功能實(shí)用、操作方便,簡(jiǎn)單明了的運(yùn)輸管理系統(tǒng)。</p><p><b> (2)內(nèi)容</b></p><p> 能夠錄
15、入司機(jī)的基本資料,在操作上能夠完成諸如添加、修改、刪除、按各種條件進(jìn)行查詢、新用戶的設(shè)置及密碼修改等方面的工作,基本滿足人事日常業(yè)務(wù)的需要。</p><p> 第二章 開(kāi)發(fā)工具的選擇及系統(tǒng)的要求</p><p> 1.開(kāi)發(fā)系統(tǒng)工具的選擇</p><p> 現(xiàn)在,市場(chǎng)上可以選購(gòu)的應(yīng)用開(kāi)發(fā)產(chǎn)品很多,流行的也有數(shù)十種。目前在我國(guó)市場(chǎng)上最為流行、使用最多、最為先進(jìn)的
16、可用作企業(yè)級(jí)開(kāi)發(fā)工具的產(chǎn)品有:</p><p> Microsoft公司的Visual Basic</p><p> Microsoft公司的Visual C</p><p> Borland公司的Delphi </p><p><b> Java等等</b></p><p> 在目前市
17、場(chǎng)上這些眾多的程序開(kāi)發(fā)工具中,有些強(qiáng)調(diào)程語(yǔ)言的彈性與執(zhí)行效率;有些則偏重于可視化程序開(kāi)發(fā)工具所帶來(lái)的便利性與效率的得高,各有各的優(yōu)點(diǎn)和特色,也滿足了不同用戶的需求。然而,語(yǔ)言的彈性和工具的便利性是密不可分的,只有便利的工具,卻沒(méi)有彈性的語(yǔ)言作支持,許多特殊化的處理動(dòng)作必需要耗費(fèi)數(shù)倍的工夫來(lái)處理,使得原來(lái)所標(biāo)榜的效率提高的優(yōu)點(diǎn)失去了作用;相反,如果只強(qiáng)調(diào)程續(xù)語(yǔ)言的彈性,卻沒(méi)有便利的工具作配合,會(huì)使一些即使非常簡(jiǎn)單的界面處理動(dòng)作,也會(huì)嚴(yán)重地
18、浪費(fèi)程序設(shè)計(jì)師的寶貴時(shí)間。</p><p> 作為數(shù)據(jù)庫(kù)系統(tǒng)的開(kāi)發(fā),Visual Basic是一個(gè)非常理想選擇。數(shù)據(jù)庫(kù)是MIS中的重要支持技術(shù),在MIS開(kāi)發(fā)過(guò)程中,如何選擇數(shù)據(jù)庫(kù)管理是一個(gè)重要的問(wèn)題,目前,數(shù)據(jù)庫(kù)產(chǎn)品較多,每種產(chǎn)品都具有各自的特點(diǎn)和適用范圍,因此,在選擇數(shù)據(jù)庫(kù)時(shí),應(yīng)考慮數(shù)據(jù)庫(kù)應(yīng)用的特點(diǎn)及適用范圍,本系統(tǒng)選用的數(shù)據(jù)庫(kù)語(yǔ)言Visual Basic語(yǔ)言,該開(kāi)發(fā)工具具有很多長(zhǎng)處:</p>
19、<p> Visual Basic是一種可視化的、面對(duì)對(duì)象和條用事件驅(qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì),可用于開(kāi)發(fā)Windows環(huán)境下的種類(lèi)應(yīng)用程序。它簡(jiǎn)單易學(xué)、效率高,且功能強(qiáng)大,可以與Windows的專(zhuān)業(yè)開(kāi)發(fā)工具SDK相媲美,而且程序開(kāi)發(fā)人員不必具有C/C++編程基礎(chǔ)。在Visual Basic環(huán)境下,利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具,使用Windows內(nèi)部的應(yīng)用程序接口(API)函數(shù),以及動(dòng)態(tài)鏈接庫(kù)(DLL)
20、、動(dòng)態(tài)數(shù)據(jù)交換(DDE)、對(duì)象的鏈接與嵌入(OLE)、開(kāi)放式數(shù)據(jù)訪問(wèn)(ODBC)等技術(shù),可以高效、快速地開(kāi)發(fā)出Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)。</p><p> 總的來(lái)說(shuō),Visual Basic具有以下特點(diǎn):</p><p><b> 可視化編程:</b></p><p> 用傳統(tǒng)程序設(shè)計(jì)語(yǔ)言設(shè)計(jì)程序時(shí),都是通
21、過(guò)編寫(xiě)程序代碼來(lái)設(shè)計(jì)用戶界面,在設(shè)計(jì)過(guò)程中看不到界面的實(shí)際顯示效果,必須編譯后運(yùn)行程序才能觀察。如果對(duì)界面的效果不滿意,還要回到程序中修改。有時(shí)候,這種編程-編譯-修改的操作可能要反復(fù)多次,大大影響了軟件開(kāi)發(fā)效率。Visual Basic提供了可視化設(shè)計(jì)工具,把Windows界面設(shè)計(jì)的復(fù)雜性“封裝”起來(lái),開(kāi)發(fā)人員不必為界面設(shè)計(jì)而編寫(xiě)大量程序代碼。只需要按設(shè)計(jì)要求的屏幕布局,用系統(tǒng)提供的工具,在屏幕上畫(huà)出各種“部件”,即圖形對(duì)象,并設(shè)置這
22、些圖形對(duì)象的屬性。Visual Basic自動(dòng)產(chǎn)生界面設(shè)計(jì)代碼,程序設(shè)計(jì)人員只需要編寫(xiě)實(shí)現(xiàn)程序功能的那部分代碼,從而可以大大提高程序設(shè)計(jì)的效率。</p><p><b> 面向?qū)ο蟮某绦蛟O(shè)計(jì)</b></p><p> 4.0版以后的Visual Basic支持面向?qū)ο蟮某绦蛟O(shè)計(jì),但它與一般的面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言(C++)不完全相同。在一般的面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言中
23、,對(duì)象由程序代碼和數(shù)據(jù)組成,是抽象的概念;而Visual Basic則是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法(OOP),把程序和數(shù)據(jù)封裝起來(lái)作為一個(gè)對(duì)象,并為每個(gè)對(duì)象賦予應(yīng)有的屬性,使對(duì)象成為實(shí)在的東西。在設(shè)計(jì)對(duì)象時(shí),不必編寫(xiě)建立和描述每個(gè)對(duì)象的程序代碼,而是用工具畫(huà)在界面上,Visual Basic自動(dòng)生成對(duì)象的程序代碼并封裝起來(lái)。每個(gè)對(duì)象以圖形方式顯示在界面上,都是可視的。</p><p><b> 結(jié)構(gòu)化
24、程序設(shè)計(jì)語(yǔ)言</b></p><p> Visual Basic是在BASIC語(yǔ)言的基礎(chǔ)上發(fā)展起來(lái)的,具有高級(jí)程序設(shè)計(jì)語(yǔ)言的語(yǔ)句結(jié)構(gòu),接近于自然語(yǔ)言和人類(lèi)的邏輯思維方式。Visual Basic語(yǔ)句簡(jiǎn)單易懂,其編輯器支持彩色代碼,可自動(dòng)進(jìn)行語(yǔ)法錯(cuò)誤檢查,同時(shí)具有功能強(qiáng)大且使用靈活的調(diào)試器和編譯器。</p><p> Visual Basic是解釋型語(yǔ)言,在輸入代碼的同時(shí),解
25、釋系統(tǒng)將高級(jí)語(yǔ)言分解翻譯成計(jì)算機(jī)可以識(shí)別的機(jī)器指令,并判斷每個(gè)語(yǔ)句的語(yǔ)法錯(cuò)誤。在設(shè)計(jì)Visual Basic程序的過(guò)程中,隨時(shí)可以運(yùn)行程序,而在整個(gè)程序設(shè)計(jì)好之后,可以編譯生成可執(zhí)行文件(.EXE),脫離Visual Basic環(huán)境,直接在Windows環(huán)境下運(yùn)行。</p><p><b> 事件驅(qū)動(dòng)編程機(jī)制</b></p><p> Visual Basic通過(guò)
26、事件來(lái)執(zhí)行對(duì)象的操作。一個(gè)對(duì)象可能會(huì)產(chǎn)生多個(gè)事件,每個(gè)事件都可以通過(guò)一段程序來(lái)響應(yīng)。例如,命令按鈕是一個(gè)對(duì)象,當(dāng)用戶單擊該按鈕時(shí),將產(chǎn)生一個(gè)“單擊”(CLICK)事件,而在產(chǎn)生該事件時(shí)將執(zhí)行一段程序,用來(lái)實(shí)現(xiàn)指定的操作。</p><p> 在用Visual Basic設(shè)計(jì)大型應(yīng)用軟件時(shí),不必建立具有明顯開(kāi)始和結(jié)束的程序,而是編寫(xiě)若干個(gè)微小的子程序,即過(guò)程。這些過(guò)程分別面向不同的對(duì)象,由用戶操作引發(fā)某個(gè)事件來(lái)驅(qū)動(dòng)
27、完成某種特定的功能,或者由事件驅(qū)動(dòng)程序調(diào)用通用過(guò)程來(lái)執(zhí)行指定的操作,這樣可以方便編程人員,提高效率。</p><p><b> 訪問(wèn)數(shù)據(jù)庫(kù)</b></p><p> Visual Basic具有強(qiáng)大的數(shù)據(jù)庫(kù)管理功能,利用數(shù)據(jù)控件和數(shù)據(jù)庫(kù)管理窗口,可以直接建立或處理Microsoft Access格式的數(shù)據(jù)庫(kù),并提供了強(qiáng)大的數(shù)據(jù)存儲(chǔ)和檢索功能。同時(shí),Visual B
28、asic還能直接編輯和訪問(wèn)其他外部數(shù)據(jù)庫(kù),如DBASE,F(xiàn)oxPro,Paradox等,這些數(shù)據(jù)庫(kù)格式都可以用Visual Basic編輯和處理。</p><p> Visual Basic提供開(kāi)放式數(shù)據(jù)連接,即ODBC功能,可通過(guò)直接訪問(wèn)或建立連接的方式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫(kù),如SQL Server,Oracle等。在應(yīng)用程序中,可以使用結(jié)構(gòu)化查詢語(yǔ)言SQL數(shù)據(jù)標(biāo)準(zhǔn),直接訪問(wèn)服務(wù)器上的數(shù)據(jù)庫(kù),并提供了簡(jiǎn)
29、單的面向?qū)ο蟮膸?kù)操作指令和多用戶數(shù)據(jù)庫(kù)訪問(wèn)的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的SQL的編程技術(shù),為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供了SQL網(wǎng)絡(luò)接口,以便在分布式環(huán)境中快速而有效地實(shí)現(xiàn)客戶/服務(wù)器(client/server)方案。</p><p> 動(dòng)態(tài)數(shù)據(jù)交換(DDE)</p><p> 利用動(dòng)態(tài)數(shù)據(jù)交換(Dynamic Data Exchange)技術(shù),可以把一種應(yīng)用程序中的數(shù)據(jù)動(dòng)態(tài)地鏈接到另一種應(yīng)用程
30、序中,使兩種完全不同的應(yīng)用程序建立起一條動(dòng)態(tài)數(shù)據(jù)鏈路。當(dāng)原始數(shù)據(jù)變化時(shí),可以自動(dòng)更新鏈接的數(shù)據(jù)。Visual Basic提供了動(dòng)態(tài)數(shù)據(jù)交換的編程技術(shù),可以在應(yīng)用程序中與其他Windows應(yīng)用程序建立動(dòng)態(tài)數(shù)據(jù)交換,在不同的應(yīng)用程序之間進(jìn)行通信。</p><p> 對(duì)象的鏈接與嵌入(OLE)</p><p> 對(duì)象的鏈接與嵌入(OLE)將每個(gè)應(yīng)用程序都看作是一個(gè)對(duì)象(object),將不同
31、的對(duì)象鏈接(link)起來(lái),再嵌入(embed)某個(gè)應(yīng)用程序中,從而可以得到具有聲音、影像、圖像、動(dòng)畫(huà)、文字等各種信息的集合式的文件。OLE技術(shù)是Microsoft公司對(duì)象技術(shù)的戰(zhàn)略,它把多個(gè)應(yīng)用程序合為一體,將每個(gè)應(yīng)用程序看作是一個(gè)對(duì)象進(jìn)行鏈接和嵌入,是一種應(yīng)用程序一體化的技術(shù)。利用OLE技術(shù),可以方便地建立復(fù)合式文檔(compound document),這種文檔由來(lái)自多個(gè)不同應(yīng)用程序的對(duì)象組成,文檔中的每個(gè)對(duì)象都與原來(lái)的應(yīng)用程序相
32、聯(lián)系,并可執(zhí)行與原來(lái)應(yīng)用程序完全相同的操作。</p><p> 動(dòng)態(tài)鏈接庫(kù)(DLL)</p><p> Visual Basic是一種高級(jí)程序設(shè)計(jì)語(yǔ)言,不具備低級(jí)語(yǔ)言的功能,對(duì)訪問(wèn)機(jī)器硬件的操作不太容易實(shí)現(xiàn)。但它可以通過(guò)動(dòng)態(tài)鏈接庫(kù)技術(shù)將C/C++或匯編語(yǔ)言編寫(xiě)的程序加入到Visual Basic應(yīng)用程序中,可以像調(diào)用內(nèi)部函數(shù)一樣調(diào)用其他語(yǔ)言編寫(xiě)的函數(shù)。此外,通過(guò)動(dòng)態(tài)鏈接庫(kù),還可以調(diào)用W
33、indows應(yīng)用程序接口(API)函數(shù),實(shí)現(xiàn)SDK所具有的功能</p><p> 本系統(tǒng)的操作系統(tǒng)采用SQL 2000 Server,它是一個(gè)后臺(tái)數(shù)據(jù)庫(kù)管理系統(tǒng),它功能強(qiáng)大操作簡(jiǎn)便,日益為廣大數(shù)據(jù)庫(kù)用戶所喜愛(ài)。越來(lái)越多的開(kāi)發(fā)工具提供了與SQL Server的接口。SQL Server 是一個(gè)關(guān)系數(shù)據(jù)庫(kù)管理系統(tǒng),它最初是由Microsoft、Sybase 和Ashton-Tate三家公司共同開(kāi)發(fā)的。于1988 年
34、推出了第一個(gè)OS/2 版本,在Windows NT 推出后,Microsoft與Sybase 在SQL Server 的開(kāi)發(fā)上就分道揚(yáng)鑣了,Microsoft 將SQL Server 移植到Windows NT系統(tǒng)上,專(zhuān)注于開(kāi)發(fā)推廣SQL Server 的Windows NT 版本。</p><p> SQL Server 2000 是Microsoft公司推出的SQL Server 數(shù)據(jù)庫(kù)管理系統(tǒng)的最新版本,
35、該版本繼承了SQL Server 7.0 版本的優(yōu)點(diǎn),同時(shí)又比它增加了許多更先進(jìn)的功能、具有使用方便、可伸縮性好與相關(guān)軟件集成程度高等優(yōu)點(diǎn)??煽缭綇倪\(yùn)行Microsoft Windows 98 的膝上型電腦到運(yùn)行Microsoft Windows 2000 的大型多處理器的服務(wù)器等多種平臺(tái)使用。MSSQL Server不但可以應(yīng)用于大中型數(shù)據(jù)庫(kù)管理中,建立分布式關(guān)系數(shù)據(jù)庫(kù),并且也可以開(kāi)發(fā)桌面數(shù)據(jù)庫(kù)。事實(shí)上,SQL Server數(shù)據(jù)庫(kù)處理
36、的基本結(jié)構(gòu),采取關(guān)系型數(shù)據(jù)庫(kù)模式,盡管如此,相信大家都可以輕易的發(fā)現(xiàn),在SQL Server的數(shù)據(jù)庫(kù)處理方式,則是使用面向?qū)ο蟮牟僮鞣绞脚c精神,也就是說(shuō),SQL Server的所有功能,都可以基于系統(tǒng)已經(jīng)建立好的一些對(duì)象來(lái)達(dá)成,是相當(dāng)OO(面向?qū)ο螅┑囊粋€(gè)系統(tǒng)結(jié)構(gòu)。</p><p> SQL Server 企業(yè)管理器是 SQL Server 的主要管理工具,它提供了一個(gè)遵從 MMC 標(biāo)準(zhǔn)的用戶界面,使用戶得以:
37、 </p><p> ·定義 SQL Server 實(shí)例組。</p><p> ·將個(gè)別服務(wù)器注冊(cè)到組中。</p><p> ·為每個(gè)已注冊(cè)的服務(wù)器配置所有 SQL Server 選項(xiàng)。</p><p> ·在每個(gè)已注冊(cè)的服務(wù)器中創(chuàng)建并管理所有 SQL Server 數(shù)據(jù)庫(kù)、對(duì)象、登錄、用戶和權(quán)
38、限。</p><p> ·在每個(gè)已注冊(cè)的服務(wù)器上定義并執(zhí)行所有 SQL Server 管理任務(wù)。</p><p> ·通過(guò)喚醒調(diào)用 SQL 查詢分析器,交互地設(shè)計(jì)并測(cè)試 SQL 語(yǔ)句、批處理和腳本。</p><p> ·喚醒調(diào)用為 SQL Server 定義的各種向?qū)А?lt;/p><p><b>
39、 系統(tǒng)配置</b></p><p> 根據(jù)用戶對(duì)系統(tǒng)的穩(wěn)定性要求、系統(tǒng)的容量以及用戶的維護(hù)水平,確定了運(yùn)輸企業(yè)車(chē)輛管理信息系統(tǒng)的系統(tǒng)配置。</p><p><b> 軟件配置</b></p><p> 數(shù)據(jù)庫(kù)軟件 : SQL Server 2000</p><p> 備選操作系統(tǒng):Windows N
40、T , Windows 2000 Server , Windows XP</p><p><b> 硬件配置</b></p><p> 客戶端硬件選擇 :CPU:奔騰4處理器 256MSDRAM</p><p> 服務(wù)器端硬件選擇 :Xeon 雙 CPU/1GB/RAID5 3x72GB</p><p>
41、第三章 系統(tǒng)調(diào)研及可行性分析</p><p><b> 1、系統(tǒng)調(diào)研</b></p><p> 正式開(kāi)發(fā)管理信息系統(tǒng)之前進(jìn)行調(diào)研是非常必要的,其必要性主要表現(xiàn)在以下幾個(gè)方面。</p><p> ?。?)明確用戶的要求,以根據(jù)調(diào)查結(jié)果進(jìn)行可行性分析,確認(rèn)系統(tǒng)的開(kāi)發(fā)是否可行。</p><p> ?。?)提出新系統(tǒng)的人員
42、并不都是系統(tǒng)研究人員,有些人對(duì)于其功能和處理數(shù)據(jù)的方法沒(méi)有明確的認(rèn)識(shí)。它們只是根據(jù)自己業(yè)務(wù)工作的需要提出了要求,系統(tǒng)開(kāi)發(fā)人員要對(duì)此進(jìn)行詳細(xì)的調(diào)查和分析,確認(rèn)用戶的要求可以通過(guò)現(xiàn)有的計(jì)算機(jī)技術(shù)實(shí)現(xiàn),保證開(kāi)發(fā)的管理信息系統(tǒng)的功能與用戶提出的要求相吻合。</p><p> ?。?)企業(yè)的現(xiàn)行系統(tǒng)可能是手工系統(tǒng),也可能是使用和計(jì)算機(jī)的系統(tǒng),無(wú)論是何種情況,都要詳細(xì)地調(diào)查現(xiàn)行系統(tǒng)中信息處理的具體情況,系統(tǒng)內(nèi)部功能結(jié)構(gòu),以便
43、設(shè)計(jì)出一個(gè)合理的、好的新系統(tǒng)邏輯模型,為新系統(tǒng)的設(shè)計(jì)工作打好基礎(chǔ),保證整個(gè)系統(tǒng)開(kāi)發(fā)的質(zhì)量。</p><p> 總之,必要對(duì)現(xiàn)行系統(tǒng)進(jìn)行詳細(xì)的調(diào)查,明確用戶需求,保證開(kāi)發(fā)的新系統(tǒng)的功能與用戶的要求相吻合,避免耗費(fèi)大量的人力、物力、財(cái)力,新系統(tǒng)的開(kāi)發(fā)卻失敗的悲劇發(fā)生。</p><p><b> 2、可行性分析概述</b></p><p> 可
44、行性分析是在用戶的要求和系統(tǒng)調(diào)研的基礎(chǔ)上進(jìn)行的,對(duì)新系統(tǒng)的開(kāi)發(fā)從社會(huì)、技術(shù)、經(jīng)濟(jì)、管理等方面進(jìn)行分析,并得出新系統(tǒng)的開(kāi)發(fā)工作可行、不可行、需要修改、追加投資、暫緩開(kāi)發(fā)、分步實(shí)施等方案和結(jié)論,最后完成可行性分析。</p><p> 可行性分析一般可定義為:可行性分析是在建設(shè)的前期對(duì)工程項(xiàng)目的一種考察和鑒定,對(duì)擬議中的項(xiàng)目進(jìn)行全面與綜合的技術(shù)、經(jīng)濟(jì)能力的調(diào)查,判斷它是否可行。</p><p>
45、; (1)可行性分析階段的主要工作包括以下幾個(gè)方面:</p><p> ?、傩孪到y(tǒng)目標(biāo)可行性分析:</p><p> 分析新系統(tǒng)的目標(biāo)是否符合企業(yè)的現(xiàn)狀和發(fā)展的需要。</p><p><b> ?、谏鐣?huì)可行性分析:</b></p><p> 社會(huì)可行性分析主要是指管理信息系統(tǒng)的開(kāi)發(fā)是否符合國(guó)家法律、下策,是否能夠與
46、社會(huì)大系統(tǒng)實(shí)現(xiàn)良好的對(duì)接。</p><p><b> ?、奂夹g(shù)可行性分析:</b></p><p> 技術(shù)可行性分析是根據(jù)新系統(tǒng)的目標(biāo)來(lái)衡量是否具備所需要的技術(shù),包括系統(tǒng)開(kāi)發(fā)人員數(shù)量和水平,硬件方面,軟件方面及其它應(yīng)用技術(shù)。</p><p><b> ?、芙?jīng)濟(jì)可行性分析</b></p><p>
47、 經(jīng)濟(jì)可行性分析主要是對(duì)開(kāi)發(fā)新系統(tǒng)所投入的資金與系統(tǒng)投入使用后所帶來(lái)的經(jīng)濟(jì)效益進(jìn)行比較,確認(rèn)新系統(tǒng)是否會(huì)給企業(yè)帶來(lái)一定的經(jīng)濟(jì)效益。</p><p><b> ⑤管理可行性分析:</b></p><p> 管理可行性分析主要是分析企業(yè)現(xiàn)行的管理體制和企業(yè)領(lǐng)導(dǎo)是否具有現(xiàn)代化的管理意識(shí)和管理水平。</p><p><b> 3、技術(shù)可
48、行性分析</b></p><p> 技術(shù)可行性分析主要包括四個(gè)方面:目前有關(guān)的技術(shù)能否支持所開(kāi)發(fā)的新系統(tǒng);新系統(tǒng)開(kāi)發(fā)人員的數(shù)量和水平,即人力資源;硬件和軟件資源。</p><p><b> ?。?)技術(shù)支持:</b></p><p> 首先根據(jù)新系統(tǒng)的目標(biāo),考慮目前有關(guān)的技術(shù)能否支持所開(kāi)發(fā)的新系統(tǒng)。這里討論的技術(shù)必須是已經(jīng)普遍使
49、用的,而不是待研究的或正在研究的。</p><p><b> ?。?)硬件資源:</b></p><p> 開(kāi)發(fā)管理信息系統(tǒng)所需的硬件資源包含以下兩個(gè)方面:</p><p> 系統(tǒng)開(kāi)發(fā)人員在管理信息系統(tǒng)的開(kāi)發(fā)過(guò)程中所需要的計(jì)算機(jī)設(shè)備及其有關(guān)的外部設(shè)備;管理信息系統(tǒng)開(kāi)發(fā)成功投入使用后,使用單位所應(yīng)具備的計(jì)算機(jī)設(shè)備及其有關(guān)的外圍設(shè)備。對(duì)硬件資源
50、進(jìn)行可行性分析時(shí)主要考慮計(jì)算機(jī)的主機(jī)內(nèi)存、類(lèi)型、功能、聯(lián)網(wǎng)能力、安全保護(hù)措施以及輸入/輸出設(shè)備,外存儲(chǔ)器和聯(lián)網(wǎng)數(shù)據(jù)通信設(shè)備的配置、功能、效率等指標(biāo)是否符合系統(tǒng)方案設(shè)計(jì)要求,同時(shí)還要考慮計(jì)算機(jī)的性能/價(jià)格比。</p><p><b> ?。?)軟件資源</b></p><p> 軟件資源的可行性分析主要考慮以下幾點(diǎn)是否滿足用戶的要求:</p><p
51、><b> ①操作系統(tǒng)的選擇;</b></p><p><b> ?、诰幾g系統(tǒng)的選擇;</b></p><p> ③數(shù)據(jù)庫(kù)管理系統(tǒng)的選擇;</p><p> ?、芨呒?jí)編程語(yǔ)言的選擇;</p><p> ?、轁h字處理系統(tǒng)的選擇;</p><p> ?、迲?yīng)用軟件包的選擇
52、。</p><p> 本系統(tǒng)在開(kāi)發(fā)前,與中心的領(lǐng)導(dǎo)和有關(guān)的操作人員密切溝通,認(rèn)真聽(tīng)取他們的意見(jiàn),并吸收他們的積極觀點(diǎn),使本系統(tǒng)的開(kāi)發(fā)在相當(dāng)大的程度上具有一定的先進(jìn)性和合理性。</p><p><b> 第四章 系統(tǒng)分析</b></p><p><b> 1、系統(tǒng)需求分析</b></p><p&g
53、t; 系統(tǒng)分析是開(kāi)發(fā)管理信息系統(tǒng)的關(guān)鍵性階段,是一個(gè)從不斷認(rèn)識(shí)和逐步細(xì)化的過(guò)程,是下一階段的工作基礎(chǔ),是為下一階段進(jìn)行物理方案設(shè)計(jì)、解決“怎么做”提供依據(jù),基關(guān)鍵性主要體現(xiàn)在“理解需求”和“表達(dá)需求”兩方面。</p><p> 通過(guò)對(duì)現(xiàn)行系統(tǒng)的詳細(xì)調(diào)研,主要是從系統(tǒng)的角度理解用戶的需要,確定新系統(tǒng)的綜合要求,并提出這些需求的實(shí)現(xiàn)條件以及需求應(yīng)達(dá)到的標(biāo)準(zhǔn),也就是確定新系統(tǒng)要做什么,做到什么程度。這些需求包括:&
54、lt;/p><p> (1)功能需求。確定新系統(tǒng)應(yīng)做什么,這是最主要的需求。</p><p> ?。?)性能需求。給出所開(kāi)發(fā)的新系統(tǒng)的技術(shù)性能指標(biāo),包括存儲(chǔ)容量限制、運(yùn)行時(shí)間限制、安全保密性等。</p><p> ?。?)環(huán)境需求。這是對(duì)系統(tǒng)運(yùn)行以及所處環(huán)境的要求。例如,在硬件方面采用什么機(jī)型、有什么硬件設(shè)備等;在軟件方面,采用什么支持系統(tǒng)運(yùn)行的系統(tǒng)軟件(指操作系統(tǒng)、
55、數(shù)據(jù)庫(kù)管理系統(tǒng))。</p><p> (4)未來(lái)需求。這類(lèi)要求是指目前不屬于系統(tǒng)開(kāi)發(fā)的范圍,但將來(lái)隨著外界環(huán)境的變化以及系統(tǒng)的發(fā)展可能會(huì)提出的要求。了解這類(lèi)要求的目的是在開(kāi)發(fā)過(guò)程中,可對(duì)系統(tǒng)將來(lái)可能的擴(kuò)展與修改做準(zhǔn)備。一旦需要時(shí),就比較容易進(jìn)行補(bǔ)充和修改了。</p><p><b> 2、數(shù)據(jù)流圖</b></p><p> 在了解了公司的
56、整體經(jīng)營(yíng)管理活動(dòng)以及管理對(duì)信息系統(tǒng)的要求,在此基礎(chǔ)上,對(duì)各個(gè)部門(mén)的逐一調(diào)查,從系統(tǒng)的科學(xué)性、管理得合理性、實(shí)際運(yùn)行的可行性出發(fā)將信息處理功能和彼此的關(guān)系自頂向下,逐層分解,在邏輯上精確地描述系統(tǒng)應(yīng)該有的功能、數(shù)據(jù)輸入、數(shù)據(jù)輸出、數(shù)據(jù)存儲(chǔ)以及數(shù)據(jù)來(lái)源河去向。通過(guò)數(shù)據(jù)流圖來(lái)描述管理業(yè)務(wù)活動(dòng)</p><p> 圖4.1數(shù)據(jù)流圖頂層圖</p><p><b> F1司機(jī)登記單<
57、/b></p><p><b> D1司機(jī)信息</b></p><p><b> F2車(chē)輛登記單</b></p><p><b> D2車(chē)輛信息</b></p><p><b> F3維修登記單</b></p><p&g
58、t;<b> F6報(bào)表</b></p><p><b> D3維修信息</b></p><p><b> F4運(yùn)營(yíng)登記單</b></p><p><b> D4運(yùn)營(yíng)信息</b></p><p><b> F5事故登記單</b>
59、;</p><p><b> D5事故信息</b></p><p> 第五章 系統(tǒng)總體設(shè)計(jì)</p><p><b> 1、系統(tǒng)流程</b></p><p> 該運(yùn)輸企業(yè)車(chē)輛管理系統(tǒng)的系統(tǒng)流程如圖5.1所示:</p><p><b> 圖5.1系統(tǒng)流程圖&
60、lt;/b></p><p> 2、系統(tǒng)功能分解圖如圖5.2所示</p><p> 圖5.2系統(tǒng)功能分解圖</p><p> 第六章 數(shù)據(jù)庫(kù)設(shè)計(jì)</p><p> 1、E—R圖設(shè)計(jì)如圖6.1所示</p><p> 圖6.1E—R圖設(shè)計(jì)</p><p><b> 2、
61、數(shù)據(jù)表概述</b></p><p><b> 表6.1數(shù)據(jù)表概述</b></p><p><b> 2.1表詳細(xì)設(shè)計(jì)</b></p><p> 1. driver (司機(jī)基本信息表) 表6.2</p><p> 2.vehicle(車(chē)輛基本信息表)表6.3</p>
62、<p> 3.Vehicle2(車(chē)輛附加信息表) 表6.4</p><p> 4. statistic (運(yùn)營(yíng)信息表)表6.5</p><p> 5. repair (車(chē)輛維修信息表) 表6.6</p><p> 6. accident(事故信息表) 表6.7</p><p> 7.repairunit(維修單位信息表)表
63、6.8</p><p> 2.2創(chuàng)建SQL基本語(yǔ)句;</p><p> 1.創(chuàng)建事故信息基本語(yǔ)句及數(shù)據(jù)表如圖6.2;</p><p> CREATE TABLE [dbo].[accident] (</p><p> [sgid] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,<
64、/p><p> [sgdriver] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [sgdate] [datetime] NOT NULL ,</p><p> [sgplace] [char] (30) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p>
65、<p> [sgreason] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [sgopp_id] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [sgopp_dept] [char] (30) COLLATE Chinese_PRC_CI_AS NU
66、LL ,</p><p> [sgmode] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [sgvalue] [numeric](10, 2) NULL ,</p><p> [sgmemo] [text] COLLATE Chinese_PRC_CI_AS NULL </p>&l
67、t;p> ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]</p><p><b> GO</b></p><p><b> 事故數(shù)據(jù)表圖6.2</b></p><p> 2.創(chuàng)建司機(jī)信息基本語(yǔ)句及數(shù)據(jù)表如圖6.3;</p><p> CREATE TABL
68、E [dbo].[driver] (</p><p> [sjid] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [sjname] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [sjsex] [char] (2) CO
69、LLATE Chinese_PRC_CI_AS NULL ,</p><p> [sjbirthday] [datetime] NULL ,</p><p> [sjaddress] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [sjfirstdate] [datetime] NULL ,<
70、/p><p> [sjtype] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [sjbegin_date] [datetime] NULL ,</p><p> [sjend_date] [datetime] NULL </p><p> ) ON [PRIMARY]
71、</p><p><b> GO</b></p><p> 司機(jī)信息數(shù)據(jù)表圖6.3</p><p> 3.創(chuàng)建維修信息基本語(yǔ)句及數(shù)據(jù)表如圖6.4;</p><p> CREATE TABLE [dbo].[repair] (</p><p> [wxid] [char] (10) COL
72、LATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [wxdate] [datetime] NOT NULL ,</p><p> [wxdept] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [wxcontent] [char] (40) COLLATE Chi
73、nese_PRC_CI_AS NULL ,</p><p> [wxprice] [numeric](10, 2) NULL ,</p><p> [wxslave] [char] (30) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [wxmemo] [text] COLLATE Chinese_PRC_CI_AS N
74、ULL </p><p> ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]</p><p><b> GO</b></p><p> 維修信息數(shù)據(jù)表圖6.4</p><p> 4.創(chuàng)建運(yùn)營(yíng)信息基本語(yǔ)句及數(shù)據(jù)表如圖6.5;</p><p> CREATE TAB
75、LE [dbo].[statistic] (</p><p> [yyid] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [yydriver] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [yybegin_date]
76、[datetime] NOT NULL ,</p><p> [yyend_date] [datetime] NOT NULL ,</p><p> [yydistance] [numeric](8, 2) NULL ,</p><p> [yywaste] [numeric](8, 2) NULL </p><p> ) ON [P
77、RIMARY]</p><p><b> GO</b></p><p> 運(yùn)營(yíng)信息基本表圖6.5</p><p> 5.創(chuàng)建車(chē)輛信息基本語(yǔ)句及數(shù)據(jù)表如圖6.6;</p><p> CREATE TABLE [dbo].[vehicle] (</p><p> [clid] [char]
78、(10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [clkind] [char] (20) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [clowner] [char] (20) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p&
79、gt; [clcode1] [char] (10) COLLATE Chinese_PRC_CI_AS NOT NULL ,</p><p> [clcode2] [char] (10) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [clcode3] [char] (20) COLLATE Chinese_PRC_CI_AS NULL ,<
80、;/p><p> [cltotal] [numeric](8, 2) NULL ,</p><p> [clpassenger] [numeric](2, 0) NULL ,</p><p> [clregist_date] [datetime] NULL ,</p><p> [clcertifi_date] [datetime] NU
81、LL ,</p><p> [clcolor] [char] (4) COLLATE Chinese_PRC_CI_AS NULL ,</p><p> [cldriver] [char] (10) COLLATE Chinese_PRC_CI_AS NULL </p><p> ) ON [PRIMARY]</p><p><b
82、> GO</b></p><p> 車(chē)輛信息基本表圖6.6</p><p> 第七章 主界面設(shè)計(jì)與分析</p><p> 1、登錄界面如圖7.1</p><p><b> 登陸界面圖7.1</b></p><p> 2、主界面如圖7.2 </p>&l
83、t;p><b> 主界面圖7.2</b></p><p><b> 3、司機(jī)信息管理</b></p><p> 添加司機(jī)信息圖7.3</p><p> 修改司機(jī)信息如圖7.4</p><p> 刪除司機(jī)信息如圖7.5</p><p> 查詢司機(jī)信息圖7.6;
84、</p><p><b> 4、車(chē)輛信息管理</b></p><p> 添加車(chē)輛信息圖7.7</p><p> 修改車(chē)輛信息如圖7.8</p><p> 查詢車(chē)輛信息如圖7.9</p><p><b> 5、業(yè)務(wù)管理</b></p><p>
85、<b> 5.1運(yùn)營(yíng)管理</b></p><p> 添加運(yùn)營(yíng)信息如圖7.10</p><p> 查詢運(yùn)營(yíng)信息如圖7.11</p><p><b> 5.2維修管理</b></p><p> 添加維修管理如圖7.13</p><p> 查詢維修信息如圖7.14<
86、;/p><p><b> 5.3事故信息管理</b></p><p> 添加事故信息如圖7.15</p><p> 查詢事故信息如圖7.16</p><p><b> 第八章 結(jié)論</b></p><p> 通過(guò)這次對(duì)運(yùn)輸公司管理系統(tǒng)的設(shè)計(jì)和開(kāi)發(fā),使我對(duì)Visua
87、l Basic 6.0有了更進(jìn)一步的認(rèn)識(shí),尤其是對(duì)運(yùn)輸車(chē)輛數(shù)據(jù)庫(kù)系統(tǒng)后臺(tái)的設(shè)計(jì)和開(kāi)發(fā),使我對(duì)數(shù)據(jù)庫(kù)的掌握和使用有了很大的突破。</p><p> 在這次設(shè)計(jì)過(guò)程中,讓我認(rèn)識(shí)到,在課堂里面和書(shū)本里面學(xué)的都是基礎(chǔ),對(duì)與實(shí)際的開(kāi)發(fā)時(shí)遠(yuǎn)遠(yuǎn)不夠的,這讓我明白,我還有更多的東西需要去學(xué),通過(guò)這次的設(shè)計(jì)可開(kāi)發(fā),讓我體會(huì)到了開(kāi)發(fā)一次系統(tǒng)是多么的不容易。</p><p><b> 參考文獻(xiàn)&l
88、t;/b></p><p> [1]王珊,薩師煊.數(shù)據(jù)庫(kù)系統(tǒng)概論[M].高等教育出版社,2009.</p><p> [2]陳明銳.Visual Baisic程序設(shè)計(jì)及應(yīng)用教程[M].高等教育出版社,2008.</p><p> [3]錢(qián)樂(lè)秋,趙文耘,牛軍鈺.軟件工程[M].清華大學(xué)出版社,2010.</p><p> [4]黃
89、德才,許蕓,王文娟.數(shù)據(jù)庫(kù)原理及其應(yīng)用教程[M].科學(xué)出版社,2010.</p><p><b> 附錄:</b></p><p> 部分頁(yè)面主要代碼如下:</p><p><b> 登錄界面部分代碼:</b></p><p> Private Declare Function GetUse
90、rName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long</p><p> Public OK As Boolean</p><p> Private Sub Form_Load()</p><
91、p> Dim sBuffer As String</p><p> Dim lSize As Long</p><p> sBuffer = Space$(255)</p><p> lSize = Len(sBuffer)</p><p> Call GetUserName(sBuffer, lSize)</p>
92、<p> If lSize > 0 Then</p><p> txtUserName.Text = Left$(sBuffer, lSize)</p><p><b> Else</b></p><p> txtUserName.Text = vbNullString</p><p><
93、;b> End If</b></p><p><b> End Sub</b></p><p> Private Sub cmdCancel_Click()</p><p> OK = False</p><p><b> Me.Hide</b></p>&
94、lt;p><b> End Sub</b></p><p> Private Sub cmdOK_Click()</p><p> If txtPassword.Text = "" Then</p><p><b> OK = True</b></p><p>&l
95、t;b> Me.Hide</b></p><p><b> Else</b></p><p> MsgBox "Invalid Password, try again!", , "Login"</p><p> txtPassword.SetFocus</p>&l
96、t;p> txtPassword.SelStart = 0</p><p> txtPassword.SelLength = Len(txtPassword.Text)</p><p><b> End If</b></p><p><b> End Sub</b></p><p>
97、 事故列表部分代碼如下:Option Explicit</p><p> Public txtSQL As String</p><p> Dim mrc As ADODB.Recordset</p><p> Dim MsgText As String</p><p> Private Sub Form_Load()</p&g
98、t;<p><b> ShowTitle</b></p><p><b> ShowData</b></p><p> flagaEdit = True</p><p><b> End Sub</b></p><p> Private Sub Form
99、_Resize()</p><p> If Me.WindowState <> vbMinimized And fMainForm.WindowState <> vbMinimized Then</p><p> If Me.ScaleHeight < 10 * lblTitle.Height Then</p><p><b&
100、gt; Exit Sub</b></p><p><b> End If</b></p><p> If Me.ScaleWidth < lblTitle.Width + lblTitle.Width / 2 Then</p><p><b> Exit Sub</b></p>&l
101、t;p><b> End If</b></p><p> lblTitle.Top = lblTitle.Height</p><p> lblTitle.Left = (Me.Width - lblTitle.Width) / 2</p><p> msgList.Top = lblTitle.Top + lblTitle.He
102、ight + lblTitle.Height / 2</p><p> msgList.Width = Me.ScaleWidth - 200</p><p> msgList.Left = Me.ScaleLeft + 100</p><p> msgList.Height = Me.ScaleHeight - msgList.Top - 200</p
103、><p><b> End If</b></p><p><b> End Sub</b></p><p> Public Sub RecordEdit()</p><p> Dim intCount As Integer</p><p> If msgList.Row
104、s > 1 Then</p><p> gintmode = EDIT</p><p> intCount = msgList.Row</p><p> gsSql = " where sgid='" & Trim(msgList.TextMatrix(msgList.Row, 1)) & "'
105、; and sgdate=cdate('" & Format(msgList.TextMatrix(msgList.Row, 2), "yyyy-mm-dd") & "') and sgplace='" & Trim(msgList.TextMatrix(msgList.Row, 3)) & "'"<
106、;/p><p> frmAcc1.Show 1</p><p><b> ShowData</b></p><p> Call MovCursor(intCount, msgList)</p><p><b> Else</b></p><p> Call Record
107、Add</p><p><b> End If</b></p><p><b> End Sub</b></p><p> Public Sub FormClose()</p><p><b> Unload Me</b></p><p><
108、;b> End Sub</b></p><p> Public Sub RecordDelete()</p><p> Dim sSql As String</p><p> Dim intCount As Integer</p><p> On Error GoTo myErr</p><p&
109、gt; If msgList.Rows > 1 Then</p><p> If MsgBox("真的要?jiǎng)h除這條文件記錄么?", vbOKCancel + vbExclamation, "警告") = vbOK Then</p><p> intCount = msgList.Row</p><p> sSql
110、= "delete from " & msTableName & " where sgid='" & Trim(msgList.TextMatrix(msgList.Row, 1)) & "' and sgdate='" & Format(msgList.TextMatrix(msgList.Row, 2), &q
111、uot;yyyy-mm-dd") & "' and sgplace='" & Trim(msgList.TextMatrix(msgList.Row, 3)) & "'"</p><p> dbHuaxia.Execute sSql, dbSQLPassThrough</p><p>&l
112、t;b> ShowData</b></p><p> If msgList.Rows > 1 Then</p><p> If intCount = msgList.Rows Then</p><p> MovCursor msgList.Rows - 1, msgList</p><p><b>
113、 Else</b></p><p> MovCursor intCount, msgList</p><p><b> End If</b></p><p><b> End If</b></p><p><b> End If</b></p>
114、<p><b> End If</b></p><p><b> Exit Sub</b></p><p><b> myErr:</b></p><p><b> ShowError</b></p><p><b> En
115、d Sub</b></p><p> Public Sub RecordRefresh()</p><p> msSql = msSelect & msTableName & " where sgdate>='" & Format(DateAdd("m", -1, Now), "yyyy
116、-mm-dd") & "' and sgdate<='" & Format(Now, "yyyy-mm-dd") & "'" & msOrderBy</p><p> msBarText = "當(dāng)前數(shù)據(jù)時(shí)間范圍:" & Format(DateAdd(&q
117、uot;m", -1, Now), "yyyy-mm-dd") & "至" & Format(Now, "yyyy-mm-dd")</p><p><b> ShowData</b></p><p> sOrder0 = "+ {sgdate}"</p&
118、gt;<p> sOrder1 = ""</p><p><b> End Sub</b></p><p> Public Sub RecordAdd()</p><p> gintmode = Add</p><p> frmAcc1.Show 1</p>&l
119、t;p><b> ShowData</b></p><p><b> End Sub</b></p><p> Public Sub RecordFind()</p><p> frmAcc2.Show 1</p><p> If Trim(frmAcc2.sQSql & &
120、quot; ") <> "" Then</p><p> msSql = msSelect & msTableName & " where" & frmAcc2.sQSql</p><p> msSql = msSql & msOrderBy</p><p><b
121、> ShowData</b></p><p><b> End If</b></p><p> Unload frmAcc2</p><p><b> End Sub</b></p><p> Private Sub Form_Unload(Cancel As Integ
122、er)</p><p> flagaEdit = False</p><p> gintaMode = 0</p><p><b> End Sub</b></p><p> Public Sub RecordView()</p><p> If msgList.Rows > 1
123、= False Then</p><p> gintmode = View</p><p> gsSql = " where sgid='" & Trim(msgList.TextMatrix(msgList.Row, 1)) & "' and sgdate=cdate('" & Format(ms
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 眾賞文庫(kù)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)--車(chē)輛租賃管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)車(chē)輛租賃管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)報(bào)告-車(chē)輛故障管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)--數(shù)據(jù)庫(kù)設(shè)計(jì)—公司管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)---機(jī)房管理系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)---運(yùn)輸企業(yè)車(chē)輛信息管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)---圖書(shū)管理系統(tǒng)數(shù)據(jù)庫(kù)管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)--工資管理系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)-酒店管理系統(tǒng)課程設(shè)計(jì)
- 數(shù)據(jù)庫(kù)原理課程設(shè)計(jì)---教室管理系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)
- 《數(shù)據(jù)庫(kù)系統(tǒng)概論》課程設(shè)計(jì)-車(chē)輛租賃系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)--bbs系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)論文---汽車(chē)銷(xiāo)售管理系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)--超市會(huì)員管理系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)
- 數(shù)據(jù)庫(kù)原理課程設(shè)計(jì)---圖書(shū)管理系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)-學(xué)生管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)-薪資管理系統(tǒng)
- 酒店管理系統(tǒng)--數(shù)據(jù)庫(kù)課程設(shè)計(jì)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)——學(xué)生管理系統(tǒng)
- 數(shù)據(jù)庫(kù)課程設(shè)計(jì)--- 銷(xiāo)售管理系統(tǒng)
評(píng)論
0/150
提交評(píng)論