在VB中，用microsoft jet數(shù)據(jù)庫引擎和數(shù)據(jù)訪問對象DAO（data access object）可以創(chuàng)建功能強大的客戶/服務(wù)器應(yīng)用程序。對遠(yuǎn)程數(shù)據(jù)庫的訪問是開發(fā)這類應(yīng)用程序的關(guān)鍵環(huán)節(jié)，本文將介紹在VB中用DAO通過 miscrosoft jet數(shù)據(jù)庫引擎訪問遠(yuǎn)程數(shù)據(jù)庫的方法。

　　 用DAO訪問遠(yuǎn)程數(shù)據(jù)庫大體上可以通過三步來實現(xiàn)，即數(shù)據(jù)連接、數(shù)據(jù)處理和斷開連接。下面主要介紹數(shù)據(jù)連接和數(shù)據(jù)處理的具體操作。

一、數(shù)據(jù)連接

　　 DAO一般通過鏈接遠(yuǎn)程表的方式來進(jìn)行數(shù)據(jù)連接。這樣，數(shù)據(jù)雖然駐留在遠(yuǎn)程數(shù)據(jù)源上，但在本地的microsoftjet數(shù)據(jù)庫中可以存儲與遠(yuǎn)程數(shù)據(jù)的永 久性連接，同時緩存鏈接的表結(jié)構(gòu)信息，從而在下一次訪問該表時，不用再次從服務(wù)器中檢索這些結(jié)構(gòu)信息，加快了連接速度。一旦鏈接了一個表，該鏈接便會保留 在各會話期間，直到連接斷開。鏈接遠(yuǎn)程表的具體操作是：

用opendatabase方法打開將要包含該鏈接的本地microsoft jet數(shù)據(jù)庫

用createtabledef方法在該數(shù)據(jù)庫中創(chuàng)建一個新的tabledef對象

將tabledef對象的connect屬性設(shè)置為一個合法的連接字符串，標(biāo)識要訪問的遠(yuǎn)程數(shù)據(jù)庫類型、數(shù)據(jù)文件的路徑以及用戶名和遠(yuǎn)程數(shù)據(jù)源密碼等。

將tabledef對象的sourcetablename屬性設(shè)置為遠(yuǎn)程數(shù)據(jù)庫中要訪問的表的名稱。

添加tabledef對象到tabledefs集合中。

實現(xiàn)鏈接遠(yuǎn)程表操作的過程如下：

public sub linktable(strdb as string, strrodb as string, strcn as string, strtdf as string, _linktdfname as string)

dim linktdf as new tabledef

set dbs = opendatabase(strdb)

linktdf.name = linktdfname

100

temptable = ucase(linktdf.name)

for i = 0 to dbs.tabledefs.count - 1

if ucase(dbs.tabledefs(i).name) = temptable then

if msgbox(linktdfname + " 已 存 在， 是 否 刪 除 ？", _

vbquestion + vbyesno) = vbyes then

dbs.tabledefs.delete linktdf.name

exit for

else: msgbox " 重 新 輸 入 新 表 名"

linktdfname = inputbox(" 新 表 名")

goto 100

end if

end if

next i

set linktdf = dbs.createtabledef(linktdfname) ' 鏈 接 遠(yuǎn) 程 表

linktdf.connect = ";database=" + strcn

linktdf.sourcetablename = strtdf

dbs.tabledefs.append linktdf

end sub

上述過程用來實現(xiàn)遠(yuǎn)程表的連接，它有5個參數(shù)，其中strrodb是要訪問的遠(yuǎn)程數(shù)據(jù)庫名（包括路 徑）；strtdf是該數(shù)據(jù)庫中的表名；strdb是要鏈接的本地數(shù)據(jù)庫（包括路徑）；linktdfname是本地數(shù)據(jù)庫的一個新表名，用來建立遠(yuǎn)程表 的鏈接；strcn是指定連接信息的字符串。需要特別注意的是，除了在訪問遠(yuǎn)程microsoft jet數(shù)據(jù)庫時，連接字符串要以分號（；）開頭外，指定連接信息的字符串都必須以所訪問的遠(yuǎn)程數(shù)據(jù)庫類型開頭。DAO可以訪問的遠(yuǎn)程數(shù)據(jù)源有以下三類：

.microsoft jet數(shù)據(jù)源，如：access數(shù)據(jù)。

.iisam（可安裝的索引化順序訪問方法）格式數(shù)據(jù)源，如：foxpro、paradox、dbase數(shù)據(jù)。

.odbc數(shù)據(jù)源，如：sqlserver數(shù)據(jù)、oracle數(shù)據(jù)。

　　 例如：設(shè)網(wǎng)絡(luò)服務(wù)器名為server，共享目錄為c:\sales的foxpro3.0數(shù)據(jù)庫，連接字符串應(yīng)為

strcn="foxpro3.0;database=\\server\c$\sales\region1"

　　 此外，DAO通過microsoft jet數(shù)據(jù)庫引擎訪問遠(yuǎn)程數(shù)據(jù)時，還可以用opendatabase方法直接打開遠(yuǎn)程表。在本地數(shù)據(jù)庫中并未存儲與遠(yuǎn)程數(shù)據(jù)源建立連接所需要的信息。如果使用鏈接方式訪問數(shù)據(jù)，則不必在每次會話開始時提