vb超市貨物管理系統(tǒng)(編輯修改稿)
2024-09-03 11:05 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 ，現(xiàn)在使用比較多的有DAO、 ODBC、RDO 和 ADO 技術(shù)。DAO（Data Access Object,數(shù)據(jù)訪問對(duì)象）是 Microsoft 公司在早期開發(fā)的一種數(shù)據(jù)庫(kù)訪問組件。最初主要是為了配合 Microsoft Jet 數(shù)據(jù)引擎，后來 DAO 實(shí)現(xiàn)了對(duì) ODBC 的封裝，因此可以用 DAO 來訪問 Oracle 等其他類型的數(shù)據(jù)庫(kù)和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)。ODBC（Open Database Connectivity，開放數(shù)據(jù)庫(kù)互聯(lián)）是 Microsoft 公司推出的一種數(shù)據(jù)庫(kù)訪問標(biāo)準(zhǔn)，是獨(dú)立的 API 應(yīng)用程序接口。使用 ODBC 可以訪問各種提供了 ODBC 接口的數(shù)據(jù)庫(kù)，如 Access、SQL Server、Oracle、Informix 和FoxPro 等。ODBC 的最大優(yōu)點(diǎn)在于使用該技術(shù)可以跨平臺(tái)訪問遠(yuǎn)程主機(jī)上的數(shù)據(jù)庫(kù)。RDO（Remote Data Object，遠(yuǎn)程數(shù)據(jù)對(duì)象）由 DAO 發(fā)展而來，其運(yùn)行依賴于 ODBC API 和 ODBC 驅(qū)動(dòng)程序。RDO 的突出優(yōu)點(diǎn)是實(shí)現(xiàn)了在客戶端訪問遠(yuǎn)程主機(jī)上數(shù)據(jù)的功能并提供大量用于實(shí)現(xiàn)存儲(chǔ)及其他數(shù)據(jù)技術(shù)的方法和屬性。因此，RDO 比較適合于訪問 SQL Server 及 Oracle 等大型數(shù)據(jù)庫(kù)。ADO（ActiveX Data Object）出現(xiàn)的比 DAO 和 RDO 晚，是 Microsoft 公司用于取代 DAO 和 RDO 的數(shù)據(jù)庫(kù)訪問技術(shù)。ADO 具有高度的靈活性，可以使用相同的數(shù)據(jù)模式訪問不同類型的數(shù)據(jù)庫(kù)，所需的只是簡(jiǎn)單地修改一兩行代碼而已。ADO 具備了 RDO 和 DAO 兩者的功能，并在 ASP、JSP 網(wǎng)絡(luò)編程技術(shù)上大量使用。目前，ADO 已經(jīng)成為數(shù)據(jù)庫(kù)訪問方面的主流技術(shù) [7]。本系統(tǒng)將用 ADO 來連接數(shù)據(jù)庫(kù)，接下來詳細(xì)說明如何建立連接和建立數(shù)據(jù)記錄集。★建立連接：訪問數(shù)據(jù)庫(kù)之前需要和數(shù)據(jù)庫(kù)建立連接。在建立連接時(shí)，需要按如下步驟操作：（1）定義一個(gè) ，并通過 New 進(jìn)行實(shí)例化。 （2）為連接字符串賦值。 （3）調(diào)用連接的 Open 方法，這樣就建立了一個(gè)連接。 （4）不使用連接時(shí)，調(diào)用 Close 方法關(guān)閉連接。具體代碼如下：Dim Conn As Set Conn = New = “Provider= 。Password=sa。Persist Security_Info=True?！癠ser ID =sa,Initial Catalog=ADO 數(shù)據(jù)控件實(shí)例；Data_ Source=MERRYCHINA”……Conn Close★建立數(shù)據(jù)記錄集:（1）定義一個(gè) ，并通過 New 進(jìn)行實(shí)例化。 （2）設(shè)定 CursorLocation 值。 （3）調(diào)用 Recordset 的 Open 方法。此時(shí)，要求有一個(gè)打開的連接；如果沒有，則報(bào)告錯(cuò)誤。具體代碼如下：Dim Rs As Set Rs = New = adUseClient “SELECT * FROM 用戶信息表” ，Conn,adOpenDynamic,adLockBatchO_Ptimistic 用 設(shè)計(jì)系統(tǒng)主窗體通過數(shù)據(jù)庫(kù)分析設(shè)計(jì)，已經(jīng)完成了所有的后臺(tái)工作。現(xiàn)在，用 VB 來編寫數(shù)據(jù)庫(kù)系統(tǒng)應(yīng)用程序。創(chuàng)建工程，添加一個(gè) MDI 窗體作為系統(tǒng)的主界面，如圖 所示：圖 系統(tǒng)主界面 用 創(chuàng)建公用模塊 為了能夠?qū)?shù)據(jù)庫(kù)訪問進(jìn)行集中處理，需要建立一個(gè)專門訪問數(shù)據(jù)庫(kù)的公用模塊。在項(xiàng)目資源管理器中為項(xiàng)目添加一個(gè)模塊，將其保存為。OPeratDataBase 公用模塊主要用于對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作，包括以下 5 個(gè)函數(shù)：◆ GetConnStr() As String 函數(shù)，返回連接字符串，用來設(shè)置數(shù)據(jù)庫(kù)連接字符串?！?OpenConn(ByRefConn As ) AsBoolean 函數(shù)，返回布爾值，用來打開數(shù)據(jù)庫(kù)連接?！?ExecuteSQL(ByVal SQL As String,ByRef msg As String)函數(shù)，用來執(zhí)行SAL 語(yǔ)句。◆ SelectSQL(ByVal SQL As String,ByRef msg As String)As 函數(shù)，返回 Recordset,用來執(zhí)行查詢語(yǔ)句?！?BatchSelectSQL(ByVal SQL As String, ByRef msg As String) As 函數(shù),返回 Recordset,用來執(zhí)行批處理。 為了實(shí)現(xiàn)全局變量，另外創(chuàng)建一個(gè)全局變量模塊 。主要有 3 個(gè)全局變量，如下所示：■ LoginSucceeded 全局變量，用來保存用戶登錄是否成功的標(biāo)志?！?UserID 全局變量，用來保存用戶 ID?！?ConnectionString 全局變量，用來保存數(shù)據(jù)庫(kù)連接字符串。 用 創(chuàng)建各個(gè)模塊主界面和子界面由主界面可以看出，系統(tǒng) 6 個(gè)大模塊： “資料管理”模塊：用來管理供應(yīng)商資料、商品資料以及客戶資料，其功能模塊如圖 所示：資料管理供應(yīng)商資料商品資料客戶資料圖 “資料管理”功能模塊“供應(yīng)商資料”模塊負(fù)責(zé)維護(hù)供應(yīng)商的基本信息。供應(yīng)商資料對(duì)于采購(gòu)而言非常重要，是超市貨物管理系統(tǒng)的重要資料。供應(yīng)商資料主要包括供應(yīng)商編號(hào)、供應(yīng)商名稱、地址、電話、傳真、信譽(yù)等級(jí)、提供商品和簡(jiǎn)介等。良好的供應(yīng)商資料管理有助于企業(yè)對(duì)采購(gòu)進(jìn)行管理和控制，從而降低企業(yè)的采購(gòu)成本?！吧唐焚Y料”模塊負(fù)責(zé)維護(hù)商品的基本資料信息，基本信息一般變動(dòng)較小。商品資料主要包括商品編號(hào)、商品名稱、條形碼、計(jì)量單位、供應(yīng)商編號(hào)、供應(yīng)商地址
黨政相關(guān)相關(guān)推薦
鄂ICP備17016276號(hào)-1