設(shè)計說明書設(shè)計說明書課程名稱 數(shù)據(jù)庫課程設(shè)計數(shù)據(jù)庫課程設(shè)計 題目名稱 汽車租賃管理系統(tǒng) 學生姓名 學號 專 業(yè) 指導(dǎo)教師 年 月 日 目錄目錄第一章第一章 系統(tǒng)概述系統(tǒng)概述 .1 11.1 背景.11.2 發(fā)展現(xiàn)狀.1第二章第二章 需求分析需求分析 .2 22.1 功能需求.22.2 數(shù)據(jù)需求.3第三章第三章 系統(tǒng)設(shè)計系統(tǒng)設(shè)計 .5 53.1 系統(tǒng)結(jié)構(gòu).53.2 數(shù)據(jù)庫設(shè)計.53.2.1 ER 圖 .53.2.2 邏輯結(jié)構(gòu).63.2.3 數(shù)據(jù)庫物理結(jié)構(gòu).73.2.4 數(shù)據(jù)庫實現(xiàn).93.3 用戶控制系統(tǒng).93.4 模塊設(shè)計.103.4.1 汽車管理模塊設(shè)計.103.4.2 基本設(shè)置模塊設(shè)計.11第四章第四章 系統(tǒng)實現(xiàn)系統(tǒng)實現(xiàn) .11114.1 用戶登錄模塊.114.2 汽車管理模塊實現(xiàn).124.3 汽車預(yù)租模塊實現(xiàn).16第五章第五章 后記后記 .18185.1 完善計劃.185.2 個人總結(jié).19參考文獻參考文獻 .1919-1-第一章第一章 系統(tǒng)概述系統(tǒng)概述1.1 背景今天，隨著人民生活水平的提高，汽車工業(yè)的發(fā)展和汽車的普及，汽車如今已經(jīng)與我們的生活密不可分，而汽車租賃也已成為一個極具市場潛力的行業(yè)，面對飛速發(fā)展的汽車租賃市場，其經(jīng)營管理的汽車種類繁多,樣式各異,客戶需求量大,客戶要求高,每天的工作量大,一套完整的管理系統(tǒng)對于汽車租賃公司來說已經(jīng)十分重要, 在信息飛速發(fā)展的今天，計算機在事務(wù)管理方面的應(yīng)用已經(jīng)相當廣泛，但目前很多汽車租賃公司還停留在人工管理的水平上，顯然不適應(yīng)時代的發(fā)展,管理人員目前需要一套方便、計算機化的管理信息系統(tǒng)來代替他們繁瑣、低效的傳統(tǒng)手工管理方式，并最終實現(xiàn)汽車租賃管理的全面自動化,使用汽車租賃管理系統(tǒng)可以規(guī)范企業(yè)的管理和經(jīng)營行為，減少企業(yè)的經(jīng)營成本，提高工作效率。汽車租賃管理系統(tǒng)是為汽車租賃公司提供的一個簡單易用的系統(tǒng),隨著科技的發(fā)展，設(shè)備和管理的現(xiàn)代化，在實際工作中如何提高工作效率成為一個很重要的問題。而建立管理系統(tǒng)是一個很好的解決辦法。1.2 發(fā)展現(xiàn)狀目前市場上相關(guān)系統(tǒng)并不多，畢竟汽車租賃行業(yè)也算是個新興的產(chǎn)業(yè)，但由于它的飛速發(fā)展，市場也看到了它的設(shè)計價值，不過大都大同小異，一般市場上的汽車租賃管理系統(tǒng)多是針對汽車租賃的業(yè)務(wù)處理的一種系統(tǒng)，其它管理層面也有涉及，只是比較簡略，一般包括基本設(shè)置、綜合管理、業(yè)務(wù)處理、查詢報表、統(tǒng)計排行以及系統(tǒng)管理等模塊，優(yōu)點在于業(yè)務(wù)處理模塊比較結(jié)合實際，所以對于日常的汽車租賃管理系統(tǒng)已經(jīng)不成問題，但缺點也是存在的。如汽車照片的存儲仍然采取相對路徑的存儲，用戶密碼的安全性做得不夠，系統(tǒng)的擴展性也不是很全等。因此，我們決定利用所學知識設(shè)計一個汽車租賃管理系統(tǒng)，主要是針對汽車租賃的基本設(shè)置、綜合管理、業(yè)務(wù)處理、查詢報表、統(tǒng)計排行以及系統(tǒng)管理進行全面管理的系統(tǒng)，而并不再是只注重于業(yè)務(wù)處理，并且我們將解決一些問題，如汽車照片用二進制進行存取，用戶密碼進行雙重加密，基本設(shè)置模塊更好地體現(xiàn)系統(tǒng)的擴展性，報表的打印，SQL 語句利用視圖跟存儲過程，以增強系統(tǒng)的訪問安全性，試圖完善汽車租賃管理系統(tǒng)的安全性跟擴展性，讓其更人性化，更好地服務(wù)于汽車租賃公司。-2-第二章第二章 需求分析需求分析2.1 功能需求經(jīng)過調(diào)研及分析，汽車租賃管理系統(tǒng)主要完成以下功能：（1）綜合管理此模塊主要對客戶（包括普通客戶跟會員） ，員工以及汽車的具體信息進行管理，分為普通客戶管理，會員管理，員工管理以及汽車管理。汽車管理：管理員可以對租賃公司現(xiàn)已擁有的汽車的具體信息進行查看，修改信息或者刪除檔案（當汽車報廢或不再租賃時） ，而且是可以批量刪除的，也可添加新購進的汽車的具體信息，以便更快地投入租賃市場，方便客戶了解，以便做出更好的租賃選擇。普通客戶管理/會員管理：管理員對客戶的資料（包括普通客戶跟會員）可以進行查看，添加新客戶，修改一些基本資料以及刪除客戶檔案；員工管理：對聘用的員工的資料也可以進行查看，對新聘用的員工添加其詳細信息，修改一些基本信息以及刪除員工檔案。（2）業(yè)務(wù)管理此模塊提供對汽車日常業(yè)務(wù)進行管理，包括汽車預(yù)租/出租/續(xù)租，汽車加油，汽車維修，還車結(jié)算，催車還交以及事故登記。汽車預(yù)租：員工可以根據(jù)客戶需求幫其預(yù)租汽車，可以查看及修改預(yù)租的相關(guān)信息，但是不可以刪除客戶之前已經(jīng)預(yù)租的汽車，管理員可以修改以及取消客戶之前已經(jīng)預(yù)租的汽車，可以查看已經(jīng)預(yù)租汽車的情況等。汽車出租：員工可以根據(jù)客戶的需求出租汽車，可以查看及修改出租的相關(guān)信息，但也不可以刪除已經(jīng)出租的汽車，而管理員則可以修改，查看以及刪除出租汽車的相關(guān)情況。當汽車出租時可以打印相關(guān)合同，雙方簽訂合同。汽車續(xù)租：在客戶出租汽車的還車時間三天之前可前往汽車租賃公司辦理汽車續(xù)租手續(xù)，員工在檢查完汽車的相關(guān)情況后，可根據(jù)實際情況調(diào)整還車時間以便達到續(xù)租的目的。汽車加油：員工可以進行記錄相關(guān)加油情況，修改，刪除加油記錄。汽車維修：員工可以進行記錄汽車相關(guān)維修情況，修改，刪除維修記錄。還車結(jié)算：員工對來還車的客戶進行查詢，統(tǒng)計其它費用（如事故費，罰金費等） ，算出總費用，收款后返回客戶押金以及客戶抵押件等。催車還交：員工可以根據(jù)出租汽車的還車時間，催促那些還車時間快到了的客戶-3-及時還車以免交罰金。事故登記：員工應(yīng)該根據(jù)所出租的汽車發(fā)生的事故的具體情況登記入表，以便以后查詢，也可修改或刪除信息。（3）基本設(shè)置管理此模塊提供對汽車信息設(shè)置以及服務(wù)信息設(shè)置的全面管理功能。包括汽車設(shè)置管理與服務(wù)設(shè)置管理等。管理員可以對一些基本信息進行添加，修改，刪除。汽車設(shè)置管理包括汽車類型設(shè)置，汽車名稱設(shè)置，燃油類型設(shè)置；服務(wù)設(shè)置管理包括修理廠設(shè)置，加油站設(shè)置，保險類型設(shè)置。這項管理可以使管理員更好地根據(jù)租賃公司實際情況修改汽車以及服務(wù)的一些基本信息，使系統(tǒng)更適合其公司的運營，而且管理員只需在設(shè)置界面進行修改，而不需自己修改數(shù)據(jù)庫，更體現(xiàn)出系統(tǒng)的人性化。（4）查詢報表此模塊分為加油記錄查詢，維修記錄查詢，汽車預(yù)租查詢，汽車出租查詢，還車結(jié)算查詢，事故記錄查詢，單車租賃查詢，汽車資料查詢，會員資料查詢，客戶資料查詢以及員工資料查詢。此模塊可對客戶，員工以及汽車相關(guān)業(yè)務(wù)的情況進行查詢，對查詢到的相關(guān)信息可以生成相應(yīng)的 Excel 文件以及打印報表，尤其是汽車資料查詢還可以生成顯示照片的報表等。（5）統(tǒng)計排行此模塊根據(jù)汽車出租次數(shù)的實際情況可以統(tǒng)計出本周/本月/全部排行，進而有利于管理員分析購買哪些汽車能使公司的利潤最大化。還可以根據(jù)客戶（包括普通客戶和會員）租賃汽車的次數(shù)，統(tǒng)計出其排行，有利于管理員有針對性地對某些客戶進行高質(zhì)里的服務(wù)。（6）系統(tǒng)維護備份數(shù)據(jù)：可以提供直接備份數(shù)據(jù)庫的相關(guān)數(shù)據(jù)還原數(shù)據(jù)：當系統(tǒng)出現(xiàn)異常狀況時可以通過此還原數(shù)據(jù)庫的相關(guān)數(shù)據(jù)修改密碼：可以賬戶修改登錄密碼，密碼是采取雙重 MD5 加密，使其更具安全性。2.2 數(shù)據(jù)需求 ：系統(tǒng)外部 ：實物或單據(jù) ：實物或信息流向-4-：處理 ：數(shù)據(jù)存儲圖圖 2-12-1 綜合管理流程圖綜合管理流程圖圖圖 2-22-2 汽車預(yù)租流程圖汽車預(yù)租流程圖圖圖 2-32-3 汽車出租、續(xù)租流程圖汽車出租、續(xù)租流程圖圖圖 2-42-4 還車結(jié)算流程圖還車結(jié)算流程圖員工查詢汽車信息表普通客戶/會員信息登記客戶信息表管理員員工信息登記汽車信息登記員工信息表客戶(普通客戶/會員)預(yù)租請求汽車預(yù)租表員工員工汽車預(yù)租表簽訂合同客戶汽車出租表續(xù)租請求費用結(jié)算表客戶(普通客戶/會員)員工還車查詢費用繳納費用P003員工加油、維修、事故登記加油、維修、事故信息表-5-圖圖 2-52-5 汽車加油、維修、事故流程圖汽車加油、維修、事故流程圖圖圖 2-62-6 基本設(shè)置流程圖基本設(shè)置流程圖第三章第三章 系統(tǒng)設(shè)計系統(tǒng)設(shè)計3.1 系統(tǒng)結(jié)構(gòu)此汽車租賃管理系統(tǒng)主要實現(xiàn) 6 個大的功能模塊：綜合管理、業(yè)務(wù)管理，基本設(shè)置，查詢報表、統(tǒng)計排行、系統(tǒng)維護。每個模塊有分成多詳細的功能子模塊。詳情如下圖 3-1 所示：圖圖 3-13-1 系統(tǒng)結(jié)構(gòu)圖系統(tǒng)結(jié)構(gòu)圖3.2 數(shù)據(jù)庫設(shè)計汽車租賃管理系統(tǒng)汽車設(shè)置管理基本設(shè)置管理服務(wù)設(shè)置管理綜合管理汽車管理業(yè)務(wù)管理汽車預(yù)/出/續(xù)租汽車加油汽車維修還車結(jié)算催車還交事故登記查詢報表統(tǒng)計排行汽車查詢客戶資料查詢客戶租賃排行本周/月/全部排行人事管理系統(tǒng)維護備份數(shù)據(jù)權(quán)限管理員工運用基本設(shè)置表管理員基本設(shè)置錄入-6-3.2.1 ER 圖3.2.2 邏輯結(jié)構(gòu)1、用戶信息表用戶（uid , users, pwd, type）分析：因為 uid 是主鍵，而且 users 不允許重復(fù)，所以主鍵只有一個屬性，不存在部分依賴；又因為 uid users，所以不存在非主屬性對主鍵 uid 的傳遞依賴，所以該關(guān)系屬于 3NF。2、客戶信息表客戶（kid, ktype,kname,ksex,ksf,kdy,ktel,klic,kadd,ktimes）分析：因為只有 kid 是主鍵，所以不存在部分依賴，因此該關(guān)系屬于 2NF。但存在非主屬性 kname 通過 ktel 對主鍵 kid 的傳遞依賴，所以該關(guān)系不屬于 3NF。3、員工信息表員工（eid,ename,esex,esf,etel,eadd）分析：因為只有 eid 是主鍵，所以不存在部分依賴，因此該關(guān)系屬于 2NF。但存在非主屬性 ename 通過 etel 對主鍵 eid 的傳遞依賴，所以該關(guān)系不屬于 3NF。4、管理員信息表管理員（uid,uname,usex）分析：因為只有 uid 是主鍵，所以不存在部分依賴，且不存在非主屬性對主鍵 uid繳納收繳設(shè)置屬于屬于2屬于30,n0,n0,n0,n1,n0,n0,n0,n0,n汽車cidcnamectypecnumcclorclsucoilcphocmilecgmcbfcdepcdmcstactimesSerial (4)Characters (10)Characters (10)Characters (10)Characters (6)Characters (10)Characters (6)ImageNumber (5)Date & TimeDate & TimeMoneyMoneyCharacters (10)Number (4)Identifier_1客戶ktypeknameksexksfkdyktelklickaddktimesCharacters (8)Characters (10)Characters (5)Characters (20)Characters (10)Characters (15)Characters (10)Characters (50)Number (4)費用fdisfreturnfotherftotalNumber (4)Date & TimeMoneyMoney基本信息sidsstylesnameSerial (4)Characters (10)Characters (16)Identifier_1員工enameesexesfeteleaddCharacters (10)Characters (6)Characters (20)Characters (15)Characters (25)管理員unameusexCharacters (10)Characters (6)用戶uiduserspwdtypeSerial (4)Characters (20)Characters (35)Characters (8)Key_1維修r(nóng)idrplacermatrpmoneyrother.Serial (4)Characters (10)MoneyMoneyMoney.事故aidapleadateaplaceacus.SerialCharacters (10)Date & TimeCharacters (20)Characters (20).加油oidoilstationpriceoilvolumeototal.Serial (4)Characters (10)Number (4)Number (5)Money.租賃htidrenttyperenttimereturntimemustmoney.Serial (4)Characters (8)Date & TimeDate & TimeMoney.namesetoldnamenewnameCharacters (15)Characters (20)-7-的傳遞依賴，所以該關(guān)系屬于 3NF。5、汽車信息表汽車(cid,cname,ctype,cnum,cclor,clsu,coil,cpho,cmile,cgm,cbf,cdep,cdm,csta,ctimes)分析：因為 cid 是主鍵，而且 cnum 不允許重復(fù)，所以主鍵只有一個屬性，不存在部分依賴；又因為 cid cnum，所以不存在非主屬性對主鍵 cid 的傳遞依賴，所以該關(guān)系屬于 3NF。6、租賃情況表租賃 (htid,cid,eid,kid,renttype,renttime,returntime,mustmoney,des,regtime,rem)分析：因為只有 htid 是主鍵，所以不存在部分依賴，因此該關(guān)系屬于 2NF。但存在非主屬性 des 通過 cid 對主鍵 htid 的傳遞依賴，所以該關(guān)系不屬于 3NF。7、加油表加油(oid,cid,eid,oilstation,price,oilvolume,ototal,odate)分析：因為只有 oid 是主鍵，所以不存在部分依賴，且不存在非主屬性對主鍵 oid的傳遞依賴，所以該關(guān)系屬于 3NF。8、維修表維修(rid,cid,eid,rplace,rmat,rpmoney,rother,rtotal,rdate,rcon,rrem)分析：因為只有 rid 是主鍵，所以不存在部分依賴，且不存在非主屬性對主鍵 rid的傳遞依賴，所以該關(guān)系屬于 3NF。9、事故登記表事故(aid,cid,eid,aple,adate,aplace,acus,acon,adtime,arem)分析：因為只有 aid 是主鍵，所以不存在部分依賴，且不存在非主屬性對主鍵 aid的傳遞依賴，所以該關(guān)系屬于 3NF。10、費用表費用(htid,eid,kid,fdis,freturn,fother,ftotal)分析：因為只有 htid 是主鍵，所以不存在部分依賴，因此該關(guān)系屬于 2NF。但存在非主屬性 fdis 通過 kid 對主鍵 htid 的傳遞依賴，所以該關(guān)系不屬于 3NF。11、基本信息表基本信息(sid,uid,sstyle,sname)分析：因為只有 sid 是主鍵，所以不存在部分依賴，且不存在非主屬性對主鍵 sid的傳遞依賴，所以該關(guān)系屬于 3NF。3.2.3 數(shù)據(jù)庫物理結(jié)構(gòu)1、視圖uh_kh: select * from 用戶,客戶 where kid=uid-8-kh_ht: select * from 客戶 where(not exists(select * from ht where kid=客戶.kid)ht: select htid,kname,ktype,ktel,cname,ctype,cnum,renttype,renttime,returntime,mustmoney,des,regtime,rem,租賃.cid,租賃.kid,eidfrom 租賃,汽車,客戶 where 租賃.cid = 汽車.cid and 客戶.kid=租賃.kidoil：select oid,加油.cid,加油.eid,oilstation,price,oilvolume,ototal,odate,ename,cname,coil from 加油,汽車,員工 where 加油.cid = 汽車.cid2、存儲過程u_xg: create procedure u_xg ( users char(20), pwd char(35) ) asupdate 用戶 set pwd=pwd where users=userskh_tj: create procedure kh_tj(users char(20),pwd char(35),ktype char(8),kname char(10),ksex char(5),ksf char(20),kdy char(10),ktel char(15),klic char(10),kadd char(25) as declare kid numeric(4) begininsert into 用戶 (users,pwd,type) values(users,pwd,ktype)select kid=uid from 用戶 where users=usersinsert into 客戶 (kid,ktype,kname,ksex,ksf,kdy,ktel,klic,kadd) values(kid,ktype,kname,ksex,ksf,kdy,ktel,klic,kadd)endem_tj: create procedure em_tj (users char(20),pwd char(35),type char(8),ename char(10),esex char(6),esf char(20),etel char(15),eadd char(25) as declare eid numeric(4) begininsert into 用戶 (users,pwd,type) values(users,pwd,type)select eid=uid from 用戶 where users=usersinsert into 員工 values(eid,ename,esex,esf,etel,eadd)endcar_xg: create procedure car_xg (cid numeric(4),cname char(10),ctype char(10),cnum char(10),cclor char(6),clsu char(10),coil char(6),cpho image,cmile numeric(5),cgm datetime,cbf datetime,cdep money,cdm money) as beginupdate 汽車 set cname=cname,ctype=ctype,cnum=cnum,cclor=cclor,clsu=clsu,coil=coil,cpho=cpho,cmile=cmile,cgm=cgm,cbf=cbf,cdep=cdep,cdm=cdm where cid=cidend3、觸發(fā)器-9-csta_xg: create trigger csta_xg on 租賃 for insert asupdate 汽車 set csta=(select renttype from inserted) where cid=(select cid from inserted)csta_xg2: create trigger csta_xg2 on 租賃 for update asif (select cid from deleted)(select cid from inserted)beginupdate 汽車 set csta=待租 where cid=(select cid from deleted)update 汽車 set csta=(select renttype from inserted) where cid=(select cid from inserted)update 汽車 set ctimes=ctimes+1 where cid=(select cid from inserted)update 汽車 set ctimes=ctimes-1 where cid=(select cid from deleted)endctimes_xg: create trigger ctimes_xg on 租賃 for insert as declare ctimes numeric(4)if (select renttype from inserted)=出租update 汽車 set ctimes=ctimes+1 where cid=(select cid from inserted)ht_change: create trigger ht_change on 租賃 for delete asupdate 汽車 set csta=待租 where cid=(select cid from deleted)3.2.4 數(shù)據(jù)庫實現(xiàn)數(shù)據(jù)庫創(chuàng)建語句：IF EXISTS (SELECT name FROM master.dbo.sysdatabases WHERE name = Ncar)DROP DATABASE carGOCREATE DATABASE car ON (NAME = Ncar_Data, FILENAME = NC:Program FilesMicrosoft SQL ServerMSSQLdatacar_Data.MDF , SIZE = 8, FILEGROWTH = 10%) LOG ON (NAME = Ncar_Log, FILENAME = NC:Program FilesMicrosoft SQL ServerMSSQLdatacar_Log.LDF , SIZE = 5, FILEGROWTH = 10%) COLLATE Chinese_PRC_CI_ASGO3.3 用戶控制系統(tǒng)-10-系統(tǒng)及數(shù)據(jù)庫中用戶訪問控制體系可以用如下圖 3-2 所示：圖圖 3-23-2 用戶控制系統(tǒng)圖用戶控制系統(tǒng)圖3.4 模塊設(shè)計3.4.1 汽車管理模塊設(shè)計此模塊實現(xiàn)：管理員可以對租賃公司現(xiàn)已擁有的汽車的具體信息進行查看，修改檔案或者刪除檔案（當汽車報廢或不再租賃時） ，而且是可以批量刪除的，也可添加新購進的汽車的具體信息，以便更快地投入租賃市場，方便客戶了解，以便做出更好的租賃選擇。此模塊設(shè)計過程中，由于經(jīng)常有大量的汽車照片需要保存，簡便的方法是把圖片存儲在指定的文件夾下，數(shù)據(jù)庫中只保存圖片所在的路徑和圖片名，但是這種方法對數(shù)據(jù)的管理很不方便，同時安全性和可靠性也不能保證；另一種方法是把圖片數(shù)據(jù)存儲在數(shù)據(jù)庫中，在數(shù)據(jù)庫中提供了 Image 數(shù)據(jù)類型，該類型存儲的是可變長度的二進制數(shù)，因此要把保存到數(shù)據(jù)庫中的圖片文件的類型轉(zhuǎn)換成二進制數(shù)據(jù)類型。利用MemoryStream 類將圖像文件以二進制的形式在數(shù)據(jù)庫中直接進行讀寫操作。此模塊采用第二種方法即把圖片以二進制的形式存儲在數(shù)據(jù)庫中，該方案解決了汽車租賃管理系統(tǒng)中數(shù)據(jù)庫存儲圖像數(shù)據(jù)的問題，提高了汽車租賃管理系統(tǒng)的應(yīng)用功能和范圍。由于圖片的保存是一個獨立的過程，在其它的模塊開發(fā)中也可以方便的應(yīng)用，提高了整個系統(tǒng)開發(fā)的效率。另外，考慮到系統(tǒng)的人性化，添加，修改以及刪除等操作采取了批處理，即可以批量添加，批量修改以及批量刪除；而在批量刪除時要注意在選中的行中從后面往前用戶通過 bridge 判斷賬戶驗證通過系統(tǒng)進入3 次未通過退出程序判斷賬戶權(quán)限員工管理員客戶-11-刪，避免出現(xiàn)沙漏效應(yīng)。3.4.2 基本設(shè)置模塊設(shè)計此模塊實現(xiàn)：提供對汽車信息設(shè)置以及服務(wù)信息設(shè)置的全面管理功能。包括汽車設(shè)置管理與服務(wù)設(shè)置管理等。管理員可以對一些基本信息進行添加，修改，刪除。汽車設(shè)置管理包括汽車類型設(shè)置，汽車名稱設(shè)置，燃油類型設(shè)置；服務(wù)設(shè)置管理包括修理廠設(shè)置，加油站設(shè)置，保險類型設(shè)置。這項管理可以使管理員更好地根據(jù)租賃公司實際情況修改汽車以及服務(wù)的一些基本信息，使系統(tǒng)更適合其公司的運營，而且管理員只需在設(shè)置界面進行修改，而不需自己修改數(shù)據(jù)庫，更體現(xiàn)出系統(tǒng)的人性化。第四章第四章 系統(tǒng)實現(xiàn)系統(tǒng)實現(xiàn)4.1 用戶登錄模塊1、界面如圖 4-1 所示：圖圖 4-14-1 用戶登錄模塊用戶登錄模塊-12-2、重點代碼（1） 、加密函數(shù)Public Function 加密(ByVal strSource As String) As String dataToHash= (New System.Text.ASCIIEncoding).GetBytes(strSource) hashvalue = CType(System.Security.Cryptography.CryptoConfig.CreateFromName(MD5), System.Security.Cryptography.HashAlgorithm).ComputeHash(dataToHash) For i = 0 To 15 strresult += Hex(hashvalue(i).ToLower Next Return strresult End Function（2） 、連接數(shù)據(jù)庫Public Sub 連接數(shù)據(jù)庫() If type.Trim = 管理員 Then con.ConnectionString = server=.;database=car;user id=admin;password=admin ElseIf type.Trim = 員工 Then con.ConnectionString = server=.;database=car;user id=employee;password=employee ElseIf type.Trim = 客戶 Then con.ConnectionString = server=.;database=car;user id=kh;password=kh End If cmd.Connection = conEnd Sub4.2 汽車管理模塊實現(xiàn)1、界面如圖 4-2 所示：-13-圖圖 4-24-2 汽車管理模塊汽車管理模塊2、重點代碼（1） 、批量刪除 Public Sub deletedgvs(ByRef dgv As DataGridView, ByVal sql As String) count = dgv.SelectedRows.Count res = MsgBox(確定刪除這 & count & 條記錄？, 1 + 32 + 0, 提示) If res = 1 Then Try For i = count - 1 To 0 Step -1 cmd.CommandText = sql & dgv.SelectedRows(i).Cells(0).Value & con.Open() cmd.ExecuteNonQuery() dgv.Rows.Remove(dgv.SelectedRows(i) con.Close() Next Catch ex As Exception MsgBox(刪除記錄失??！, 0 + 48 + 0, 刪除失敗) con.Close()-14- Exit Sub End Try MsgBox(已刪除 & count & 條記錄!, 0 + 48 + 0, 刪除成功) con.Close() Else Exit Sub End If End Sub（2） 、靈活性填充（填充 DataGridView 的 filldgv 函數(shù)） Public Sub filldgv(ByRef dgv As DataGridView, ByVal sql As String) If dr.HasRows Then While dr.Read With dgv .Rows.Add() For j = 0 To dr.FieldCount - 1 .Columns(j).Name = dr.GetName(j).Trim .Rows(i).Cells(j).Value = dr.GetValue(j) Next End With i = i + 1 End While Else For j = 0 To dr.FieldCount - 1 dgv.Columns(j).Name = dr.GetName(j).Trim Next End If con.Close() For i = 0 To dgv.ColumnCount - 1 cmd.CommandText = select * from nameset where oldname= & dgv.Columns(i).Name.Trim & con.Open() dr = cmd.ExecuteReader If dr.Read Then dgv.Columns(i).HeaderCell.Value = dr.GetString(1).Trim-15- End If con.Close() Next End Sub（3） 、把圖片轉(zhuǎn)換成二進制流Public Sub 選擇照片(ByRef OpenFileDialog1 As OpenFileDialog, ByRef pb As PictureBox) OpenFileDialog1.ShowDialog() If OpenFileDialog1.FileName Then filepath = OpenFileDialog1.FileName.ToString pic = New Bitmap(filepath) pb.Image = pic Dim ms As New IO.MemoryStream pb.Image.Save(ms, pb.Image.RawFormat) data = ms.GetBuffer ms.Close() Else If data Is Nothing Then pb.Image = Nothing End If End If End Sub（4） 、把圖片從數(shù)據(jù)庫取出 If dr.IsDBNull(7) Then pb.Image = Nothing Else data = CType(dr.Item(7), Byte() Dim ms As New IO.MemoryStream(data) pb.Image = Image.FromStream(ms) ms.Close() End If（5）填充 ComboBoxPublic Sub showjb(ByRef combo As ComboBox, ByVal sql As String) cmd.CommandText = select sname from jb where sstyle= & sql & -16- con.Open() dr = cmd.ExecuteReader While dr.Read combo.Items.Add(dr.GetString(0).Trim) End While con.Close()End Sub4.3 汽車預(yù)租模塊實現(xiàn)1、界面如圖 4-3 所示：圖圖 4-34-3 汽車預(yù)租模塊汽車預(yù)租模塊2、重點代碼（1）查詢條件For i = 0 To arr.Count - 1 If dgv1.Rows(i).Cells(0).Value = Then If dgv1.Rows(i).Cells(3).Value Is Nothing Then-17- MsgBox(查詢條件不能為空！, 0 + 48 + 0, 提醒) Exit Sub End If sql = sql + arr.Item(i).ToString.Trim + sign + & dgv1.Rows(i).Cells(3).Value.ToString.Trim & ElseIf dgv1.Rows(i).Cells(0).Value = 并且 Then If dgv1.Rows(i).Cells(3).Value Is Nothing Then MsgBox(查詢條件不能為空！, 0 + 48 + 0, 提醒) Exit Sub End If sql = sql + and + arr.Item(i).ToString.Trim + sign + & dgv1.Rows(i).Cells(3).Value.ToString.Trim & Else If dgv1.Rows(i).Cells(3).Value Is Nothing Then MsgBox(查詢條件不能為空！, 0 + 48 + 0, 提醒) Exit Sub End If sql = sql + or + arr.Item(i).ToString.Trim + sign + & dgv1.Rows(i).Cells(3).Value.ToString.Trim & End If Next（2） 、生成 ExcelPublic Sub getExcel(ByRef dgv As DataGridView) myBook = myApp.Workbooks.Add() mySheet = myBook.Worksheets(1) mySheet.Name = dsname mySheet.Cells(1, 1) = dsname + 詳細資料 For k = 0 To dgv.Columns.Count - 1 mySheet.Cells(2, k + 1).Value = dgv.Columns(k).HeaderText mySheet.Cells(2, k + 1).Font.Bold = True Next mySheet.Rows(3).select() For i = 0 To dgv.Rows.Count - 1 For j = 0 To dgv.Columns.Count - 1-18- mySheet.Cells(i + 3, j + 1).value = + dgv(j, i).Value.ToString.Trim Next Next myApp.Visible = True End Sub（3） 、汽車預(yù)租報表ParamField.Name = 報表標題discreteVal.Value = dsname + 詳細資料報表ParamField.CurrentValues.Add(discreteVal)ParamFields.Add(ParamField)crv.ParameterFieldInfo = ParamFieldsDim rent As New 租車報表()rent.SetDataSource(ds.Tables(dsname)crv.ReportSource = rent第五章第五章 后記后記5.1 完善計劃汽車租賃管理系統(tǒng)針對的是汽車租賃公司在向客戶提供出租車輛服務(wù)過程中面對的各種問題，對其業(yè)務(wù)信息進行自動化、信息化處理，使車輛租賃管理變得規(guī)范、快捷、高效。為規(guī)范操作流程，降低勞動強度使租賃業(yè)務(wù)走向標準化和科學化， 設(shè)計開發(fā)了這套管理系統(tǒng)，它的使用將有利于提高租賃公司的勞動生產(chǎn)率，節(jié)約生產(chǎn)成本，增加經(jīng)濟效益，希望它能為業(yè)內(nèi)人員的工作提供一定的幫助。后期將針對目前大多數(shù)汽車租賃行業(yè)設(shè)計開發(fā)一套更加科學，更加人性化的汽車租賃管理系統(tǒng)，使其操作簡單，查詢報表更加豐富，將包含汽車租賃過程中的多數(shù)細節(jié)：如增加司機相關(guān)信息管理，會員進行積分制，會員進行分類等，并可分類統(tǒng)計查詢：日收入，月收入,總收入，司機，車輛，會員以及客戶報表等；而且改進連接數(shù)據(jù)庫使系統(tǒng)能夠全面地兼容不同的常用數(shù)據(jù)庫，如 SQL Server2000，SQL Server2005，Oracle 等?；谏厦娓鞣矫娴难芯?，同時針對汽車租賃公司的實際情況，再應(yīng)用數(shù)據(jù)庫、管理信息系統(tǒng)、軟件工程的一些基本原理和理論思想，結(jié)合具有強大的應(yīng)用程序開發(fā)功能和數(shù)據(jù)庫開發(fā)功能的開發(fā)工具，設(shè)計開發(fā)了出一套完善的汽車租賃管理系統(tǒng)，使其-19-在 Windows 環(huán)境下，具有比較友好的界面和基本完善的功能，使用輕松方便，易于維護，適應(yīng)性強，安全性跟擴展性都得到保證。5.2 個人總結(jié)經(jīng)過一學期的學習,我對數(shù)據(jù)庫應(yīng)用課程設(shè)計這門學科有了充分的了解。這次的課程設(shè)計我們選擇的題目是汽車租賃管理系統(tǒng)。通過本次的可視化編程課程設(shè)計，鞏固了我在課堂上所學的理論知識，更進一步的理解了面向?qū)ο缶幊痰幕舅枷?，并且對可視化編程工?VB2005 這個軟件的應(yīng)用也有了一個簡單的了解，開拓了自己的知識面。本次課程設(shè)計，在梁玉強老師的指導(dǎo)下，通過不懈的努力完成了本次課程設(shè)計的任務(wù)，汽車租賃管理系統(tǒng)的設(shè)計及運行基本實現(xiàn)。通過本課程設(shè)計，培養(yǎng)了我的團隊精神，學會了如何和別人合作，同時也從同學那里學到了許多東西。當然我們也遇到了各種各樣的問題和錯誤。但面對種種問題和困難，我們小組的成員個個都非常的努力。經(jīng)過不懈的努力，最終總算交出一個滿意的系統(tǒng)。參考文獻參考文獻1、王濤，唐植華 Visual Basic 2005+SQL Server 2005 清華大學出版社 2008 年 6 月2、李捷 Visual Basic 2005 程序設(shè)計教程機械工業(yè)出版社 2009 年 8 月3、陳志泊 數(shù)據(jù)庫原理及應(yīng)用教程 人民郵電出版社 2009 年 12 月