【導(dǎo)讀】臺(tái),采用功能強(qiáng)大的編程語(yǔ)言VBA作為前端,能夠?qū)崿F(xiàn)圖書(shū)的日常管理，合查詢(xún),可以大大提高工作人員的工作效率。到各個(gè)領(lǐng)域，圖書(shū)館也不例外，圖書(shū)館的計(jì)算機(jī)化已不容遲緩。源、借書(shū)信息、還書(shū)信息進(jìn)行管理，及時(shí)了解各個(gè)環(huán)節(jié)中信息的變更，從廣義上講，數(shù)據(jù)庫(kù)就是數(shù)據(jù)或信息的集合，相當(dāng)于一個(gè)數(shù)據(jù)倉(cāng)庫(kù)。具體地說(shuō)，數(shù)據(jù)庫(kù)是一組經(jīng)過(guò)計(jì)算機(jī)整理后的數(shù)據(jù)，它由許多數(shù)據(jù)組成。有數(shù)百萬(wàn)個(gè)數(shù)據(jù)庫(kù)系統(tǒng)在運(yùn)行,其應(yīng)用已經(jīng)深入到社會(huì)生活的各個(gè)領(lǐng)域,從企業(yè)管理,銀行管理,資源管理,經(jīng)濟(jì)預(yù)測(cè)一直到信息檢索,檔案管理,我國(guó)20世紀(jì)90年代初在全國(guó)范圍內(nèi)裝備了12個(gè)以數(shù)據(jù)。路,氣象,民航,情報(bào),公安,軍事,航天和財(cái)稅等行業(yè)。

　　

【正文】 的數(shù)據(jù)庫(kù)通常被叫做單層數(shù)據(jù)庫(kù)，單層數(shù)據(jù)庫(kù)是一個(gè)數(shù)據(jù)經(jīng)常變化 , 例如編輯數(shù)據(jù) ,插入記錄 , 或刪除記錄 – 并且立即發(fā)生的數(shù)據(jù)庫(kù) . 單層數(shù)據(jù)庫(kù)限制了表中數(shù)據(jù)的多少能夠被控制和應(yīng)用程序能支持的用戶(hù)數(shù)目。當(dāng)數(shù)據(jù)庫(kù)中包含幾個(gè)表 之間的復(fù)雜關(guān)系的時(shí)候，或當(dāng)客戶(hù)的數(shù)字增加的時(shí)候 , 你可能想要使用兩層 或多層應(yīng)用程序。 客戶(hù)端應(yīng)用程序運(yùn)行在本地機(jī)器上；應(yīng)用程序服務(wù)器通常地是運(yùn)行在一個(gè)服務(wù)器上，而且數(shù)據(jù)庫(kù)它本身可能是在另外的一個(gè)服務(wù)器上 . 在多層體系結(jié)構(gòu)中因?yàn)閼?yīng)用程序服務(wù)器做大部份的工作 , 所以客戶(hù)應(yīng)用程序可能是非常小的，這就是我們所稱(chēng)的客戶(hù)機(jī)應(yīng)用程序 .。 51 當(dāng)我們?cè)?Delphi 中編寫(xiě)一個(gè)數(shù)據(jù)庫(kù)應(yīng)用程序的時(shí)候 ,我們需要用到一些數(shù)據(jù)庫(kù)引擎來(lái)訪(fǎng)問(wèn)一個(gè)數(shù)據(jù)庫(kù)中的數(shù)據(jù) . 數(shù)據(jù)庫(kù)引擎允許你集中于你想要訪(fǎng)問(wèn)什么數(shù)據(jù)，而不是該如何訪(fǎng)問(wèn)它。 版就提供 BDE(Borland 數(shù)據(jù)庫(kù)引擎 ) 給數(shù)據(jù)庫(kù)開(kāi)發(fā)者，除了 BDE， Delphi 的 版開(kāi)始支持微軟的 ADO 數(shù)據(jù)庫(kù)接口 . 我們將會(huì)主要地把重心集中在 MS Access 本地?cái)?shù)據(jù)庫(kù)的應(yīng)用程序開(kāi)發(fā)。 對(duì)所有的 Borland 的產(chǎn)品， BDE 是一個(gè)公共的數(shù)據(jù)訪(fǎng)問(wèn)層，包括Delphi 和 C++ Builder。 BDE 由動(dòng)態(tài)鏈接庫(kù)和公用程序的集合所組成， BDE 的優(yōu)點(diǎn)是所有的數(shù)據(jù)處理被認(rèn)為是對(duì)開(kāi)發(fā)者 透明的 。 BDE 包含一系列驅(qū)動(dòng)程序，它能夠使應(yīng)用程序可以和幾種類(lèi)型不同的數(shù)據(jù)庫(kù)之間進(jìn)行通 話(huà)。 這些驅(qū)動(dòng)程序?qū)⒏邔拥臄?shù)據(jù)庫(kù)指令 (例如 Open 或 Post)和任務(wù) (記錄鎖定或 SQL 解釋 ) 翻譯成特別的指令到一個(gè)具體的數(shù)據(jù)庫(kù)類(lèi)型： Paradox， dBASE ， MS Access 或任何的 ODBC 數(shù)據(jù)源。 BDE API (應(yīng)用編程接口 ) 由超過(guò) 200個(gè)程序和功能所組成，這些程序和功能都在 BDE 單元中被用到。 幸運(yùn)的是，你幾乎從不需要直接的訪(fǎng)問(wèn)這些程序。取而代之的是，你使用 BDE 通過(guò) VCL中數(shù)據(jù)訪(fǎng)問(wèn)組件欄的數(shù)據(jù)訪(fǎng)問(wèn)組件。要訪(fǎng)問(wèn)應(yīng)用程序中的特別的數(shù)據(jù)庫(kù)需要知道數(shù)據(jù)庫(kù)的別名和在那個(gè)數(shù)據(jù)庫(kù)中它將會(huì)有 權(quán)利訪(fǎng)問(wèn)所有的數(shù)據(jù)。別名是建立在 BDE Administrator 中而且敘述驅(qū)動(dòng)程序參數(shù)和數(shù)據(jù)庫(kù)位置。 BDE 封裝了數(shù)據(jù)庫(kù)的驅(qū)動(dòng)程序，允許訪(fǎng)問(wèn)一個(gè)廣泛的多樣性數(shù)據(jù)源，標(biāo)準(zhǔn)的 (默認(rèn)的 ) BDE 驅(qū)動(dòng)程序包括 Paradox， dBase ， MS Access， ASCII 本文。當(dāng)然，通過(guò) ODBC Administrator 也可以使 BDE 使用任何的開(kāi)放數(shù)據(jù)庫(kù)連接驅(qū)動(dòng)程序。 52 使用 BDE 訪(fǎng)問(wèn)的 Delphi 應(yīng)用程序數(shù)據(jù)庫(kù)需要你在程序中發(fā)布 BDE ， 當(dāng)在應(yīng)用程序中配置 BDE的時(shí)候 ,你必須使用快速安裝保護(hù)或其它的被 Borland 認(rèn)可的安裝程序。 自我一個(gè)數(shù)據(jù)庫(kù)引擎， BDE 有一些利益和缺點(diǎn)。我們的目的不是討論有關(guān)為什么和什么時(shí)候你應(yīng)該使用（不使用） BDE 方法而放棄非 BDE的技術(shù)。 在 Delphi 的文章中按規(guī)定的介紹 ADO， ADO 是一組允許你訪(fǎng)問(wèn)數(shù)據(jù)庫(kù)與電子郵件和文件系統(tǒng)一樣的 COM 組件 (動(dòng)態(tài)鏈接庫(kù) )，使用了 ADO的應(yīng)用程序就不需要使用 BDE了。為了要用 ADO連接各種類(lèi)型的數(shù)據(jù)庫(kù)，你將會(huì)當(dāng)然需要有對(duì)象鏈接和嵌入庫(kù)，你需要使用的 ADO 的所有或許已經(jīng)在你的計(jì)算機(jī)上；文件被微軟分配成 Windows98/2021 的一個(gè)部 份，如果你或你的客戶(hù)使用 Windows 95 或 WindowsNT 系統(tǒng)，你可能需要發(fā)布并且安裝 ADO 引擎， Delphi 的光碟上包括一個(gè)安裝程序 MDAC － 微軟數(shù)據(jù)訪(fǎng)問(wèn)組件， 你應(yīng)該總是確定有 MDAC 的最新版本， 從微軟公司可以得到， 微軟數(shù)據(jù)訪(fǎng)問(wèn)組件是使全世界的數(shù)據(jù)能夠存取的主要技術(shù)關(guān)鍵。 他們包括 ActiveX 數(shù)據(jù)對(duì)象 (ADO) ，對(duì)象連接與嵌入庫(kù)和開(kāi)放式數(shù)據(jù)庫(kù)連接 (ODBC)。（注意：為了要正確的在一部 Windows95 的計(jì)算機(jī)上安裝， MDAC 需要安裝 DCOM95 。 MDAC 安裝組件仰賴(lài) DCOM95 安裝的動(dòng)態(tài)鏈接庫(kù)，以便為了正確的注冊(cè)。 注意，在 Windows 上 DCOM95 不是必須的， 在某些情況下， DCOM 可能沒(méi)有安裝在一部Windows98 計(jì)算機(jī)上， 如果它沒(méi)有被安裝，那么 DCOM98 在 MDAC 的安裝之前應(yīng)該被安裝。 ） 沒(méi)有很多的談到對(duì)象連接與嵌入庫(kù)和 ADO，讓我們繼續(xù)前進(jìn)到更多的比較實(shí)用的主題。 ADO 設(shè)計(jì)模型建立在幾個(gè) ADO 對(duì)象上，這些對(duì)象提供你存取各種各樣數(shù)據(jù)源的方法，這些對(duì)象提供連接數(shù)據(jù)源的功能，詢(xún) 53 問(wèn)和更新記錄組合連接，而且報(bào)告錯(cuò)誤。 Delphi ，通過(guò)一些 VCL 提供的封裝的組件存取那些對(duì)象， 讓我們看一看 ADO 對(duì)象是怎樣工作的： 連接對(duì)象表現(xiàn)為對(duì)數(shù)據(jù)源的一個(gè)連接用的串 ,在 BDE/ Delphi 中一個(gè)連接對(duì)象是數(shù)據(jù)庫(kù)和 Session 組件的一個(gè)組合。 指令對(duì)象使我們能夠操作一個(gè)數(shù)據(jù)源， Ir 表式一個(gè)指令 (也可以看做一個(gè)查詢(xún)或聲明 ) 可以完成在一個(gè)數(shù)據(jù)庫(kù)中增加，刪除，更新，查詢(xún)數(shù)據(jù)的作用。 Recordset 對(duì)象是查詢(xún)指令的一個(gè)結(jié)果 . 你能把 Recordset 看做Delphi 的一個(gè)表或查詢(xún)組件， Recordset 的每一行返回包 含多個(gè)域的對(duì)象。 一些其他的對(duì)象如： 域?qū)ο?，參?shù)對(duì)象和錯(cuò)誤對(duì)象也在 ADO 模型中存在 －將會(huì)在以下章節(jié)中了解它們。 在大致的了解 AdoExpress 集中的組件之前， 首先讓了我們看見(jiàn)該如何連接到一個(gè) Access 數(shù)據(jù)庫(kù)， 當(dāng)然，我們將會(huì)以連接到我們的 數(shù)據(jù)庫(kù)為例。 Delphi (5) ADO 支持的被集中在組件框的 ADO 標(biāo)簽上的 ADOExpress 組件中，其它幾個(gè)數(shù)據(jù)庫(kù)激活的組件在這個(gè)過(guò)程中將會(huì)被使用， 暫時(shí)我們將集中于使用 ADO中最少的組件來(lái)訪(fǎng)問(wèn) Access數(shù)據(jù)庫(kù)。開(kāi)始 Delphi，將會(huì)用一種空白窗體的形式打開(kāi)一個(gè)新的應(yīng)用程序。 Delphi 7 的新特點(diǎn) Delphi 7 是唯一能夠完全支持行業(yè)全部主流標(biāo)準(zhǔn)（如 XML， SOAP，WSDL 和 XSL）的 RAD 環(huán)境，在提供企業(yè)與 Web 開(kāi)發(fā)人員所需要的可升級(jí)性和可靠性的同時(shí)，還依次支持正涌現(xiàn)而出的基于提供商平臺(tái)的 Web 服務(wù)，如微軟的 . 和 BizTalk，以及 SUN 公司的微機(jī)系統(tǒng)。通過(guò)簡(jiǎn)便無(wú)縫的創(chuàng)建和使用基于 Web 服務(wù)的 XML/SOAP， BizSnap?簡(jiǎn)化了電子商務(wù)的集成。 54 利用基于 Web 服務(wù)和 XML 數(shù)據(jù)交換的支持的完整 SOAP, Delphi 7從根本上簡(jiǎn)化了互聯(lián)網(wǎng)上的下一代電子商務(wù)應(yīng)用程序的構(gòu)建， XML 和Web 服務(wù)技術(shù)的無(wú)縫集成技術(shù)使得 Delphi 7 成為唯一的符合行業(yè)標(biāo)準(zhǔn)的 Web 服務(wù)和互聯(lián)網(wǎng)上的 B2B， B2C， P2P 快速應(yīng)用程序開(kāi)發(fā)工具。 WebSnap? 是基于組件的 Web 應(yīng)用開(kāi)發(fā)框架，支持包括 Apache，Netscape 和微軟的互聯(lián)網(wǎng)信息服務(wù)（ IIS）在內(nèi)的主流 Web 應(yīng)用服務(wù)器。Websnap 集成了將 Delphi 直接帶進(jìn)今天的 Web 站點(diǎn)開(kāi)發(fā)小組的威力，利用 WebSnap ， Delphi 應(yīng) 用 程 序 能 夠 把 Web 站 點(diǎn) 和 使 用Dreamweaver,Frontpage， Vbscript 和 javascript 等當(dāng)今流行 HTML 開(kāi)發(fā)環(huán)境的 Web 站點(diǎn)開(kāi)發(fā)小組進(jìn)行無(wú)縫集成。 DataSnap 提供高級(jí)的性能和 Web 活動(dòng)服務(wù)數(shù)據(jù)中間件，使任何客戶(hù)應(yīng)用或服務(wù)都很容易的連接互聯(lián)網(wǎng)上的任何大型數(shù)據(jù)庫(kù)。 DataSnap 支持所以的大型數(shù)據(jù)庫(kù)服務(wù)器，如 Oracle， MSSQL 服務(wù)器， Informix， IBM DB2， Sybase 和 Interbase。無(wú)需大型數(shù)據(jù)庫(kù)客戶(hù)驅(qū)動(dòng)程序和復(fù)雜的配置要求，通過(guò)行業(yè)標(biāo)準(zhǔn)的 SOAP/XML HTTP 連接，客戶(hù)應(yīng)用程序 就可以連接到互聯(lián)網(wǎng)上的高性能 DataSnap 服務(wù)器，同樣，也支持 DCOM， CORBA 和 TCP/IP 連接。 Pascal 的多重和間接單元引用 單元在 uses 子句中出現(xiàn)的位置決定了其初始化節(jié)執(zhí)行的順序（初始化節(jié)）并且對(duì)編譯器定位該單元中標(biāo)識(shí)符的方式有影響。如果兩個(gè)單元聲明了同名的變量、常量、類(lèi)型、過(guò)程或函數(shù)，那么編譯器將根據(jù)uses 子句中的單元列表從后向前查找，也就是說(shuō)，列于 uses 子句中靠后位置的單元，其標(biāo)識(shí)符優(yōu)先被編譯器認(rèn)可。（要訪(fǎng)問(wèn)其他單元的標(biāo)識(shí)符，可以在標(biāo)識(shí)符前加上限定詞，例如： 。這樣 55 就可以消除編譯器自動(dòng)匹配可能帶來(lái)的影響。） uses 子句中只需要包括其直接使用的單元。對(duì)于程序（ program），只需要包括其語(yǔ)句塊中直接使用的標(biāo)識(shí)符所在的單元。對(duì)于單元，在其接口節(jié)使用的標(biāo)識(shí)符所在的單元需要列在其接口節(jié)的 uses 子句中，此時(shí)其實(shí)現(xiàn)節(jié)也可以使用被引用的單元中的公共實(shí)體；在其實(shí)現(xiàn)節(jié)使用的標(biāo)識(shí)符所在的單元需要列在其實(shí)現(xiàn)節(jié)的 uses 子句中，此時(shí)其接口節(jié)中不能使用被引用單元的公共實(shí)體。例如，如果單元 A 引用了在單元 B 中聲明的常量、類(lèi)型、變量、過(guò)程或函數(shù)，那么單元 A 必需通過(guò) uses 子句顯式地使用單元 B。如果此時(shí)單元 B 又引用了單元 C，那么稱(chēng)單元 A間接引用了單元 C。在此情況下，單元 C 不必包括在單元 A 的 uses 子句中，而為了成功編譯單元 A，編譯器仍必需能找到單元 B和單元 C。 下面給出的例子說(shuō)明了單元的間接依賴(lài)關(guān)系： program Prog。 uses Unit2。 const a = b。 unit Unit2。 interface uses Unit1。 const b = c。 unit Unit1。 interface const c = 1。 在本例中， Prog 直接依賴(lài) Unit2， Unit2 直接依賴(lài) Unit1。因此 Prog間接依賴(lài) Unit1。由于 Unit1沒(méi)有出現(xiàn)在 Prog的 uses子句中，因此 Unit1的標(biāo)識(shí)符對(duì)于 Prog 是不可用的。 56 要編譯一個(gè)客戶(hù)模塊，編譯器需要定位該客戶(hù)依賴(lài)的所有單元，包括直接依賴(lài)和間接依賴(lài)。除非這些單元的源代碼發(fā)生了改變，否則編譯器只需要相應(yīng)的 .dcu 文件（ Windows）或者 .dcu/.dpu 文件（ Linux）文件，而不需要它們的源（ .pas）文件。 在單元的接口節(jié)發(fā)生改變時(shí)，依賴(lài)該單元的所有單元必需被重編譯。而當(dāng)單元的實(shí)現(xiàn)節(jié)或其他部分發(fā)生改變時(shí)，依賴(lài)該單 元的單元不必被重編譯。編譯器會(huì)自動(dòng)跟蹤這些依賴(lài)關(guān)系，并在必要時(shí)才重編譯相應(yīng)的客戶(hù)單元。 循環(huán)單元引用 單元之間彼此直接或間接引用時(shí)，稱(chēng)為互相依賴(lài)。只要單元之間不是全部通過(guò)接口節(jié)中的 uses 子句直接或間接造成循環(huán)，那么相互相依賴(lài)是允許的。換句話(huà)說(shuō)，從一個(gè)單元的接口節(jié)開(kāi)始，通過(guò)其他單元接口節(jié) uses 子句的引用又回到該單元，這是決不可能的。（因?yàn)樵谶@種情況下編譯器將無(wú)法決定編譯的順序。）為了使相互依賴(lài)有效，每個(gè)循環(huán)引用路徑中必需至少有一個(gè) uses 子句出現(xiàn)在實(shí)現(xiàn)節(jié)。 最簡(jiǎn)單的情況是兩個(gè)單元相互依賴(lài)，單元之間不能通過(guò) 接口節(jié)中的uses 子句彼此引用。因此，下面的例子將導(dǎo)致編譯錯(cuò)誤： unit Unit1。 interface uses Unit2。 unit Unit2。 interface uses Unit1。 然而，可以將其中一個(gè)單元的引用移至實(shí)現(xiàn)節(jié)，使得互相依賴(lài)合法。 57 例如： unit Unit1。 interface uses Unit2。 unit Unit2。 interface implementation uses Unit1。 為減少循環(huán)引用的機(jī)會(huì)，最好的方法是盡可能將單元列在在實(shí)現(xiàn)節(jié)的 uses 子句中。 僅當(dāng)要在接口節(jié)中使用另一單元中的標(biāo)識(shí)符時(shí)（例如從其他的單元中繼承類(lèi)），才有必要將被使用的單元列入接口節(jié) uses 子句中。 語(yǔ)法元素 Object Pascal 使用 ASCII 字符集，包括字母 A 到 Z和 a到 z，數(shù)字 0 到 9，以及其他的標(biāo)準(zhǔn)字符。 Object Pascal 中，編譯器對(duì)大小寫(xiě)不敏感，空格字符（ ASCII 32）和其他控制字符（ ASCII 0 到 ASCII 31，包括行結(jié)束符 ASCII 13）都叫做空格（ blanks）。 基本語(yǔ)法元素叫做標(biāo)記（ tokens），標(biāo)記被聯(lián)合到一起組成表達(dá)式、聲明、語(yǔ)句等。語(yǔ)句（ statement）描述了能夠在程序中被運(yùn)行的邏輯動(dòng)作。表達(dá)式（ expression）是造句單位，它出現(xiàn)在語(yǔ)句中，表示一個(gè)值。聲明（ declaration）定義了一個(gè)標(biāo)識(shí)符（如函數(shù)名或變量），該標(biāo)識(shí)符能被用在表達(dá)式和語(yǔ)句中，并且適當(dāng)?shù)那闆r下為該標(biāo)識(shí)符分配內(nèi)存。 基本語(yǔ)法元素 58 關(guān)于最簡(jiǎn)單的語(yǔ)法級(jí)別，程序就是一個(gè)標(biāo)記序列，這些標(biāo)記以分隔符為界。標(biāo)記是程序文本中最小的有意義的單位。分隔符可以是一個(gè)空格，也可以是注釋。嚴(yán)格地說(shuō)，不總是有必要在