開(kāi)發(fā)語(yǔ)言功能比較強大,其中特有的各種性質(zhì)能幫助大家輕松實(shí)現功能,提高編程效率。在這里我們就為大家介紹一下VB.NET連接遠程數據庫的相關(guān)操作,希望能給大家帶來(lái)一些幫助。
在VB中,用數據庫引擎和數據訪(fǎng)問(wèn)對象DAO可以創(chuàng )建功能強大的客戶(hù)/服務(wù)器應用程序。對遠程數據庫的訪(fǎng)問(wèn)是開(kāi)發(fā)這類(lèi)應用程序的關(guān)鍵,本文將介紹在VB中用DAO通過(guò)數據庫引擎訪(fǎng)問(wèn)遠程數據庫的方法。
用DAO訪(fǎng)問(wèn)遠程數據庫可以通過(guò)三步來(lái)實(shí)現,即數據連接、數據處理和斷開(kāi)連接。下面主要介紹數據連接和數據處理的具體操作。
DAO通過(guò)鏈接遠程表的方式來(lái)進(jìn)行數據連接。這樣,數據雖然駐留在遠程數據源上,但在本地的數據庫中可以存儲與遠程數據的永久性連接,同時(shí)緩存鏈接的表結構信息,從而在下一次訪(fǎng)問(wèn)該表時(shí), 不用再次從服務(wù)器中檢索這些結構信息,加快了連接速度。一旦鏈接了一個(gè)表,該鏈接便會(huì )保留在各會(huì )話(huà)期間,直到連接斷開(kāi)。鏈接遠程表的具體操作是:
用 OpenDatabase 方法打開(kāi)將要包含該鏈接的本地數據庫,用 CreateTableDef 方法在該數據庫中創(chuàng )建一個(gè)新的TableDef對象,將 TableDef 對象的 Connect 屬性設置為一個(gè)合法的連接字符串,標識要訪(fǎng)問(wèn)的遠程數據庫類(lèi)型、數據文件的路徑以及用戶(hù)名和遠程數據源密碼等。將 TableDef 對象的 SourceTableName 屬性設置為遠程數據庫中要訪(fǎng)問(wèn)的表的名稱(chēng)。 添加 TableDef 對象到 TableDefs 集合中。
實(shí)現VB.NET連接遠程數據庫的代碼如下:
- 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)
''鏈接遠程表 linkTdf.Connect = ";database=" + strCn- linkTdf.SourceTableName = strTdf
- dbs.TableDefs.Append linkTdf
- End Sub
VB.NET連接遠程數據庫的相關(guān)操作方法就為大家介紹到這里。
聯(lián)系客服