長江大學數據庫課程設計報告班級：地信10801序號：34姓名：邱小波指導老師：邵燕林、朱小龍地球科學學院地信系2010目錄1.概述……………1.1傳統業務管理模式介紹……………………1.2現有信息系統應用情況……………………1.3開發思路……………………2需求分析………………………2.1系統開發可行性分析………………………管理可行性…………………經濟可行性…………………2.2系統總體需求………………2.3系統性能需求………………數據精確度與準確性……………………權限的設置和保密性………………………3.系統功能設計…………………3.1系統功能模塊設計…………3.2系統具備功能………………4．數據庫設計…………………4.1數據庫概念設計……………4.1.1實體分析及其局部E-R圖………………4.1.2實體之間的聯系及其ER圖……………4.1.3系統全局ER圖…………4.2數據庫邏輯設計……………表匯總……………………4.2.2表邏輯結構設計………………………4.3數據庫物理實現……………創立表CAR………………創立表Customer………………………創立表Staff……………創立表users………………創立表UserType…………創立存儲過程……………創立觸發器………………4.3.8創立查詢對象……………5．數據庫應用系統編碼實現…………………5.1增加信息……………………5.2編輯信息……………………5.3界面登錄……………………5.4修改密碼……………………5.5查詢信息……………………6．總結…………………………6.1結論…………………………6.2系統缺乏，待改良的地方，提出一些自己對系統的擴展設想…………6．3致謝………………………前言該系統分析報告分為業務概述、需求分析、系統功能設計、系統數據庫設計、應用編碼實現和總結六個局部。轎車產業被各國視為支柱型產業，在經濟開展的過程中起著舉足輕重的作用，全球經濟日趨一體化，國際、國內的轎車產業競爭越來越劇烈，我國的轎車產業也面臨著巨大的機遇和挑戰。因此，要在劇烈的競爭中取勝，采用國際先進的管理思想、現代的管理方式日益成為轎車產業可持續開展的重要保障之一，轎車產業的企業信息化管理是成為企業價值鏈上提升企業核心競爭力的不可或缺的手段。轎車銷售與普通商品銷售有著極大的差異，在傳統的轎車業管理模式中，紙單據及手工管理是其主流方式。這種方式帶來是數據可靠性差，運行效率低下，統計分析難度大。這種傳統的銷售管理模式已經不能適應當今轎車銷售企業的市場需求。日趨劇烈的市場競爭要求企業不斷提高信息處理速度，及時、準確地掌握經營情況，快速地做出經營決策，引入計算機管理才是最終的解決方法，而應用計算機管理的關鍵在于選擇適宜的管理軟件。因此開發一套轎車銷售系統是很有必要的事情。在下面的各章中將以開發這一系統為例,談談其開發過程和所涉及到的問題及解決方法。1.概述1.1傳統業務管理模式介紹目前，我國的轎車業銷售管理大多沿用舊的管理模式，無論在倉儲管理，還是在銷售管理方面等其他方面都存在一些問題，這些無疑制約了轎車業的開展和騰飛，在傳統的轎車業管理模式中，紙單據及手工管理是其主流方式。這種方式具有數據可靠性差，運行效率低下，統計分析難度大的缺點，快速抽取對企業有用的統計信息的可能性很小。對于買主來說，必須要到公司來對轎車進行觀察、了解性能、商談售價，最后再確定是否要購置，因為這些事情需要花費大量的時間和精力，對購車者來說很不方便，對公司的銷售來說，每天要接待大量的購車者，也要花費大量的人力來應對，并且可能會由于轎車銷售員的問題給消費者和公司帶來不好的影響，在轎車銷售完成后，要手工記錄購車者的信息，以便提供售后效勞，工作量大。尤其在轎車行業越來越興旺的近幾年，想購置轎車的家庭也越來越多，這種傳統的管理模式已不能適應當今轎車企業的開展趨勢，特別是信息化時代的到來，采用先進管理模式來增強競爭力，迎接信息化革命是擺在轎車業面前很現實而且很重要的問題。如何在效益、效率上取得提升成為關鍵問題，迫切需要一種能夠快速完成以上各種需求的系統。1.2現有信息系統應用情況目前轎車銷售公司已經運用轎車銷售系統，但是由于公司對于信息化系統建設重視程度缺乏等原因，造成公司銷售業務系統構建不夠完善；還主要停留在簡單的網站水平，只能讓購車者通過網站了解公司情況，觀察新車，而不能進行在線買車和支付，同時，由于國內信息化技術不夠成熟，造成在線銷售系統的技術水平不高，功能不夠完善，因此迫切需要建設一套適合本公司實際情況的轎車銷售系統。1.3開發思路〔1〕系統初步調查；〔2〕可行性分析；〔3〕系統分析；〔4〕系統設計；〔5〕系統實施。2需求分析2.1系統開發可行性分析2.1.1管理可行性任何銷售信息系統開發的成功都離不開管理人員和銷售人員的支持，這套系統綜合管理和銷售與一體，在公司管理人員與銷售人員的支持下容易實現，且本系統根據公司實際情況開發，各種功能都是在公司的實際日常業務中能夠容易做到的，所以管理起來比擬容易。2.1.2經濟可行性電子商務是購物方式的一場革命，電子商務的實時交互性可以促進企業與客戶的良好溝通，從而使企業能夠更加及時準確地預測市場需求、了解需求變化狀況和開展趨勢，提供更為周到的個性化效勞，提高企業的效勞質量，擴大企業的業務量，因此企業開發網上購物系統是一項投入較小，回報巨大的投資。公司在該系統投入使用后，可以更及時的向顧客公布本公司現在有的車型、價格等，省去很多宣傳費用，顧客在看車的環節一般在網上就可以進行的差不多了，來公司后就不會用很多的時間，也省去了公司向顧客介紹車、接待顧客的很多時間，另外公司可以較以前減少一些銷售人員，為公司節省很多開銷，給公司帶來的效益是很大的，因此本系統具有非常大的經濟可行性。2.2系統總體需求隨著時代的開展，信息技術、Internet/Intranet技術、數據庫技術的不斷開展完善，網絡進程的加快，傳統的購物方式也越來越不能滿足人們快節奏的生活需求，使得企業的IT部門已經認識到Internet的優勢,電子商務就是在這樣一個背景下產生開展起來的。伴隨著電子商務技術的不斷成熟，電子商務的功能也越來越強大，注冊用戶可以在網上搜索購置到自己想要的各種轎車，只需輕點鼠標就可以完成搜索、選擇、購置、付款，還可以讓公司將車送上門來，讓人們體會到了足不出戶,便可隨意購物的快感，及時地發布轎車信息及相關報道。為購車者提供注冊效勞，讓購車者在網上完成選車、看車、購車等效勞。易訪問、易查詢，及時的顧客提供滿意的效勞。管理員在線審核注冊購車者的信息真實性、準確性。2.3系統性能需求2.4.1數據精確度與準確性本管理信息系統中使用了整形、時間日期形、文本形數據，要保證數據的準確度與真實性，因為這對顧客和公司來說都是非常重要的。2.4.2權限的設置和保密性注冊用戶和非注冊用戶的權限不同，注冊用戶擁有顧客應該擁有的所有權利，注冊的信息都是顧客的重要的私人信息，因此保密性非常重要。另外管理員的賬戶平安尤為重要，因為轎車屬大宗消費品，因此本系統所涉及到的貨款數額是非常大的。3.系統功能設計3.1系統功能模塊設計本系統在首頁主要是面向顧客使用者的，在首頁模糊的分為幾個功能區域，即用戶中心，轎車選購區，購置確認區，以及在最下面的供系統管理員登陸管理中心，在用戶中心用戶可以進行登陸、注冊和注銷等操作，在轎車選購區進行商品瀏覽、查找轎車、查看熱賣車型等操作，中選擇到自己滿意的轎車后就可以在購置確認區去收銀臺付款確認。在管理中心系統管理員可以進行轎車的添加、修改刪除、修改以及對用戶資料的審核、修改、刪除等操作。本系統功能圖如下圖：用戶中心用戶中心轎車選購區購置確認區管理中心用戶登錄用戶注冊用戶注銷轎車瀏覽熱賣轎車轎車購置〔去收銀臺〕轎車的添加、修改、刪除用戶資料的審核、修改、刪除首頁圖：系統功能圖用戶可以在用戶管理模塊進行個人資料的管理于修改、收貨資料的查詢與修改、修改登陸密碼、查看購物資料、查看修改定單資料、個人帳戶積分查詢以及統計信息等操作。操作簡單、明了，適合本公司的業務管理需求。用戶的管理功能劃分如下圖：用戶管理用戶管理修改密碼購車資料修改密碼購車資料定單資料個人資料圖：用戶管理功能圖3.2系統具備功能：系統管理功能查看修改密碼：修改正在運行的用戶密碼；添加用戶：添加新的用戶，并設置密碼。〔2〕客戶信息管理功能增加、刪除、修改或查詢客戶信息。轎車信息管理功能添加、刪除或修改商品信息。員工信息管理功能添加、修改、查詢或刪除員工信息。。4．數據庫設計4.1數據庫概念設計4.1.1實體分析及其局部E-R圖通過需求分析得知，轎車銷售管理系統的研究對象有轎車庫存信息、客戶信息、系統信息和轎車銷售信息四個對象，但由于系統的主要功能是管理轎車的銷售，為了處理問題的方便，所以在實際處理中將系統的實體對象分為轎車，銷售人員〔員工〕和客戶。〔1〕銷售人員〔員工〕：包含圖示屬性。銷售人員的ER圖如所示。姓名性別員工姓名性別員工職務部門職務部門進廠時間進廠時間地址地址〔2〕轎車： 包含圖示屬性。其中，編號〔ID〕能夠唯一標識每一輛轎車，故定義編號為轎車實體的標識符。轎車實體的ER圖如所示。備注備注品牌價格轎車型號品牌價格轎車型號保修期保修期IDID備注〔3〕客戶：包含圖示屬性。其中，證件號碼能識別某個客戶的所有信息，故在該實體中定義客戶編號為實體標識符。客戶實體的ER圖如下圖。客戶證件號碼職業性別客戶證件號碼職業性別住址住址擁有車型擁有車型年齡年齡備注備注姓名姓名4.1.2實體之間的聯系及其ER圖(1)銷售人員〔員工〕與轎車之間的ER圖部門部門員工性別姓名職務價格轎車品牌型號銷售MN員工性別姓名職務價格轎車品牌型號銷售MN生日生日數量數量出庫日期出庫日期備注保修期備注保修期IDID企業中的每一個銷售人員都可一銷售任意一臺汽車，故銷售人員與汽車之間的聯系類型是m:n的聯系。銷售人員在銷售汽車的過程中將產生數量的屬性。(2)銷售人員〔員工〕與客戶之間的ER圖客戶需要通過銷售人員的介紹、銷售而購置轎車，一個銷售人員能向幾個客戶銷售轎車，同樣，也可以有幾個銷售人員想一個客戶銷售轎車，因此銷售人員實體與客戶實體之間是m:n聯系。在銷售人員向客戶銷售的過程中產生了數量的屬性，其兩之間的ER圖如下圖。客戶客戶性別住址姓名職業銷售數量員工性別姓名職務證件號碼出庫時間(3)客戶與轎車之間的ER圖每個客戶能購置一輛或幾輛轎車，而一輛轎車只能銷售給一個客戶，所以客戶與轎車之間的聯系類型是1:n，在銷售轎車給客戶的過程中，產生了數量與出庫日期的屬性。客戶實體與轎車實體之間的ER圖如下圖。客戶客戶姓名職業數量證件號碼性別住址銷售價格備注保修期轎車品牌型號NID1出庫日期4.1.3系統全局ER圖將上述幾幅圖合并，同時對各個屬性進行整合，就得到系統全局ER圖。在整合的過程中，各局部ER圖的屬性發生如下的沖突，所以需要重新進行定義。整合后的ER圖如下圖。轎車轎車MN供給商備注價格保修期品牌型號1ID數量出庫時間銷售數量員工性別姓名職務客戶證件號碼備注性別姓名住址4.2數據庫邏輯設計表匯總各數據庫表的簡要說明：表名簡要說明Customer客戶信息管理表Staff員工信息管理表car轎車信息管理表Users系統用戶管理4.2.2表邏輯結構設計表1customer(顧客)表字段名數據類型長度描述是否主鍵Customer_IDint客戶證件號碼是Customer_Namevarchar10客戶姓名否Customer_Addrvarchar20地址否Customer_sexvarchar2性別否Customer_ageint年齡否Customer_numvarchar20車輛型號否Customer_tellvarchar10聯系否Customer_occupvarchar10職業否Buy_carvarchar20擁有車輛否Buy_pricevarchar10車輛價格否infovarchar100備注信息否表2Staff表〔員工信息表〕字段名數據類型長度描述是否主鍵Staff_idint員工編號是Staff_namevarchar10姓名是Staff_sexvarchar2性別否Staff_birthdatetime出生日期否Staff_intimedatetime進公司日期否Staff_departvarchar10部門否Staff_titlevarchar10職務否Staff_telvarchar10否Staff_addrvarchar20備注否表3car表〔轎車信息表〕字段名數據類型長度描述是否主鍵Car_idint轎車識別是Car_namevarchar20轎車名稱否Car_brandvarchar20轎車型號否Car_timevarchar10保修期否Car_infovarchar100備注否Car_priceint價格否表4Users表〔系統用戶管理表〕字段名數據類型長度描述User_namevarchar10添加用戶名User_pwdvarchar20密碼User_typesmallint用戶類型4.3數據庫物理實現4.3.1創立表CARCREATETABLE[dbo].[Car]( [Car_id][int]NOTNULL, [Car_name][varchar](20)COLLATEChinese_PRC_CI_ASNOTNULL, [Car_brand][varchar](20)COLLATEChinese_PRC_CI_ASNOTNULL, [Car_price][int]NOTNULL, [Car_time][varchar](10)COLLATEChinese_PRC_CI_ASNOTNULL, [Car_info][varchar](100)COLLATEChinese_PRC_CI_ASNULL,CONSTRAINT[PK__Car__1BFD2C07]PRIMARYKEYCLUSTERED( [Car_id]ASC)WITH(IGNORE_DUP_KEY=OFF)ON[PRIMARY])ON[PRIMARY]GOSETANSI_PADDINGOFF創立結果如下：4.3.2創立表CustomerCREATETABLE[dbo].[Customer]( [Customer_id][int]NOTNULL, [Customer_name][varchar](10)COLLATEChinese_PRC_CI_ASNOTNULL, [Customer_sex][varchar](2)COLLATEChinese_PRC_CI_ASNOTNULL, [Customer_age][int]NULL, [Customer_occup][varchar](10)COLLATEChinese_PRC_CI_ASNULL, [Customer_num][varchar](20)COLLATEChinese_PRC_CI_ASNULL, [Customer_tel][varchar](10)COLLATEChinese_PRC_CI_ASNULL, [Customer_addr][varchar](20)COLLATEChinese_PRC_CI_ASNULL, [Buy_car][varchar](20)COLLATEChinese_PRC_CI_ASNOTNULL, [Buy_price][varchar](10)COLLATEChinese_PRC_CI_ASNOTNULL, [Info][varchar](100)COLLATEChinese_PRC_CI_ASNULL,CONSTRAINT[PK__Customer__1DE57479]PRIMARYKEYCLUSTERED( [Customer_id]ASC)WITH(IGNORE_DUP_KEY=OFF)ON[PRIMARY])ON[PRIMARY]GOSETANSI_PADDINGOFF創立結果如下：4.3.3創立表StaffCREATETABLE[dbo].[Staff]( [Staff_id][int]NOTNULL, [Staff_name][varchar](10)COLLATEChinese_PRC_CI_ASNOTNULL, [Staff_sex][varchar](2)COLLATEChinese_PRC_CI_ASNOTNULL, [Staff_birth][datetime]NULL, [Staff_intime][datetime]NOTNULL, [Staff_depart][varchar](10)COLLATEChinese_PRC_CI_ASNULL, [Staff_title][varchar](10)COLLATEChinese_PRC_CI_ASNULL, [Staff_tel][varchar](10)COLLATEChinese_PRC_CI_ASNULL, [Staff_addr][varchar](20)COLLATEChinese_PRC_CI_ASNULL,CONSTRAINT[PK__Staff__1FCDBCEB]PRIMARYKEYCLUSTERED( [Staff_id]ASC)WITH(IGNORE_DUP_KEY=OFF)ON[PRIMARY])ON[PRIMARY]創立結果如下：4.3.4創立表usersCREATETABLE[dbo].[Users]( [User_name][varchar](10)COLLATEChinese_PRC_CI_ASNOTNULL, [User_pwd][varchar](20)COLLATEChinese_PRC_CI_ASNOTNULL, [User_type][smallint]NOTNULL,PRIMARYKEYCLUSTERED( [User_name]ASC)WITH(IGNORE_DUP_KEY=OFF)ON[PRIMARY])ON[PRIMARY]創立結果如下：SHAPE4.3.5創立表UserTypeCREATETABLE[dbo].[UserType]( [User_type][smallint]NOTNULL, [Type_discription][varchar](50)COLLATEChinese_PRC_CI_ASNOTNULL)ON[PRIMARY]創立結果如下：4.3.6創立存儲過程舉例：創立存儲過程，對表users和customer，選擇所有列。滿足條件：兩個表中有名字相同的。代碼如下：createprocedurename_infoasselectdistinctuser_name,user_pwd,user_type,customer_id,customer_sex,customer_age,customer_occup,customer_num,customer_telfromusers,customerwhereusers.user_name=customer.customer_namego4.3.7創立觸發器舉例：創立名為reminder的觸發器。對表CAR中添加或更改數據，向客戶端顯示一條triggerisworking的信息.代碼如下：createtriggerreminderonCarforinsert,updateasbegindeclare@strchar(50)set@str='triggerisworking'print@strendgo〔2〕舉例：創立名為TR2的觸發器。對表CUSTOMER中添加或更改數據，向客戶端顯示一條triggerisworking的信息。代碼如下：createtriggertr2oncustomerforinsert,updateasbegindeclare@strchar(50)set@str='triggerisworking'print@strendgo4.3.8創立查詢對象在轎車銷售管理中，分別創立了按品牌、型號、價格查詢轎車信息；按姓名、性別、年齡、職業查看客戶信息；按姓名、時間、部門、職務查看員工信息。創立了轎車信息、客戶信息和員工信息的選擇查詢；通過這些查詢操作，實現系統的信息查詢功能。5．數據庫應用系統編碼實現5.1增加信息舉例：增加轎車信息，代碼如下：PrivateSubCmd_add_Click()DimtxtIdAsIntegerAdodc1.RecordSource="SELECT*FROMCarOrderbyCar_iddesc"Adodc1.RefreshIfAdodc1.Recordset.EOF=TrueThentxtId=1ElsetxtId=Adodc1.Recordset.Fields(0)+1EndIfIftxtBrand.Text=""ThenMsgBox("請輸入汽車品牌")ExitSubEndIfIftxtPrice.Text=""ThenMsgBox("請輸入汽車價格")ExitSubEndIfIftxtName.Text=""ThenMsgBox("請輸入汽車型號")ExitSubEndIfIftxtTime.Text=""ThenMsgBox("請輸入汽車保修期")ExitSubEndIf'增加新車Adodc1.Recordset.Fields(0).Value=Val(txtId)Adodc1.Recordset.Fields(1).Value=Trim(txtName.Text)Adodc1.Recordset.Fields(2).Value=Trim(txtBrand.Text)Adodc1.Recordset.Fields(3).Value=Val(Trim(txtPrice.Text))Adodc1.Recordset.Fields(4).Value=Trim(txtTime.Text)Adodc1.Recordset.Fields(5).Value=Trim(txtInfo.Text)Adodc1.RefreshMsgBox"汽車信息增加完成"UnloadMeEndSubPrivateSubCmd_Cancel_Click()UnloadMeEndSub執行結果：5.2編輯信息舉例：編輯轎車信息，局部代碼如下：PrivateSubCmd_modi_Click()curId=Adodc1.Recordset.Fields(0)Adodc1.Recordset.Fields(1)=Trim(txtCarname.Text)Adodc1.Recordset.Fields(2)=Trim(txtCarbrand.Text)Adodc1.Recordset.Fields(3)=Val(Trim(txtCarprice.Text))Adodc1.Recordset.Fields(4)=Trim(txtCartime.Text)Adodc1.Recordset.Fields(5)=Trim(txtCarinfo.Text)MsgBox("轎車記錄已修改")Adodc1.RecordSource="SELECT*FROMCar"Adodc1.RefreshDoWhileAdodc1.Recordset.Fields(0)<>curIdAdodc1.Recordset.Move(1)LoopEndSubPrivateSubCmd_next_Click()IfCmd_pre.Enabled=FalseThenCmd_pre.Enabled=TrueEndIfIfAdodc1.Recordset.Fields(0)=lastIdThenCmd_next.Enabled=FalseEndIfEndSubPrivateSubCmd_pre_Click()IfCmd_next.Enabled=FalseThenCmd_next.Enabled=TrueEndIfIfAdodc1.Recordset.Fields(0)=firstIdThenCmd_pre.Enabled=FalseEndIfEndSubPrivateSubCmd_quit_Click()UnloadMeEndSub執行結果：5.3界面登錄局部代碼如下：MsgBox"請輸入密碼"txtPwd.SetFocusExitSubEndIf'將用戶輸入賦值到變量中NameKey=Trim(txtUser.Text)PasswordKey=Trim(txtPwd.Text)'判斷用戶是否存在Adodc1.RecordSource="select*fromUserswhereUser_name='"+NameKey+"'"Adodc1.RefreshIfAdodc1.Recordset.EOF=TrueThenMsgBox"用戶名不存在"Try_times=Try_times+1IfTry_times>=3ThenMsgBox"您已經三次嘗試進入本系統，均不成功，系統將關閉"ExitSubElseExitSubEndIfEndIf'判斷密碼是否正確IfPasswordKey<>Adodc1.Recordset.Fields(1)ThenMsgBox"密碼錯誤"Try_times=Try_times+1IfTry_times>=3ThenMsgBox"您已經三次嘗試進入本系統，均不成功，系統將關閉"ExitSubElseExitSubEndIfEndIf'登錄成功，設置權限IfAdodc1.Recordset.Fields(2)=1ThenFormMain.Menu_addCar.Enabled=FalseFormMain.Menu_addCus.Enabled=FalseFormMain.Menu_addEmp.Enabled=FalseFormMain.Menu_addUser.Enabled=FalseFrm_edit_Car.Cmd_del.Enabled=FalseFrm_edit_Car.Cmd_modi.Enabled=FalseFrm_edit_Cus.Cmd_del.Enabled=FalseFrm_edit_Cus.Cmd_modi.Enabled=FalseFrm_edit_Emp.Cmd_del.Enabled=FalseFrm_edit_Emp.Cmd_modi.Enabled=FalseFormMain.Menu_edit_User.Enabled=FalseElseIfAdodc1.Recordset.Fields(2)<>0ThenMsgBox("用戶類型