注：找這個(gè)解決方法很辛苦，有些笨拙，但還好，可以解決問(wèn)題。適用于SQL Server 2000

原文出自：如何在鏈接服務(wù)器中使用 SQL Server 7.0 分布式查詢來(lái)訪問(wèn)受保護(hù)的 Access 數(shù)據(jù)庫(kù)(http://support.microsoft.com/?kbid=246255)

?

Microsoft SQL Server 7.0 版提供了通過(guò)使用 OLE DB 提供程序?qū)Σ煌瑪?shù)據(jù)庫(kù)執(zhí)行查詢的功能。可以使用以下方式查詢數(shù)據(jù)庫(kù)：

• OpenQuery 或 OpenRowset Transact-SQL 函數(shù)。
  
  - 或 -
  
  
• 具有四部分名稱（包括鏈接服務(wù)器名稱）的查詢。

要將鏈接服務(wù)器設(shè)置為訪問(wèn)受保護(hù)的 Microsoft Access 數(shù)據(jù)庫(kù)，請(qǐng)使用下列步驟：

使用注冊(cè)表編輯器將注冊(cè)表配置為使用正確的 Microsoft Access 工作組信息文件（.mdw 文件），然后向以下注冊(cè)表項(xiàng)中添加工作組信息文件的完整路徑名： HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\SystemDB 接下來(lái)，將其值設(shè)置為該文件的路徑和名稱，例如：

C:\...\MySystem.mdw

要打開(kāi)注冊(cè)表編輯器，請(qǐng)定位到“開(kāi)始”按鈕，然后單擊“運(yùn)行”。在“運(yùn)行”對(duì)話框中，鍵入 Regedit，然后按“確定”。

在注冊(cè)表編輯器中，定位到以下項(xiàng)： HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\

單擊右鍵，然后依次選擇“新建”、“字符串值”。

鍵入?SystemDb，然后按?Enter。

雙擊左窗格中的“SystemDb”項(xiàng)。

在“數(shù)值數(shù)據(jù)”文本框中，鍵入 .mdw 文件的完整路徑。

關(guān)閉注冊(cè)表編輯器。

執(zhí)行?sp_addlinkedserver?存儲(chǔ)過(guò)程創(chuàng)建鏈接服務(wù)器。指定 Microsoft.Jet.OLEDB.4.0 作為 provider_name，并指定 Microsoft Access .mdb 數(shù)據(jù)庫(kù)文件的完整路徑名作為 data_source。data_source 將在服務(wù)器而不是客戶端上進(jìn)行計(jì)算，因此該路徑在服務(wù)器上必須有效。

執(zhí)行?sp_addlinkedsrvlogin?存儲(chǔ)過(guò)程創(chuàng)建從本地登錄到 Microsoft Access 登錄的登錄映射。

回到頂端

查詢受保護(hù)的 Microsoft Access 數(shù)據(jù)庫(kù)的步驟

修改步驟 1（請(qǐng)參見(jiàn)“更多信息”部分）中顯示的注冊(cè)表項(xiàng)并添加 .mdw 文件的位置。

啟動(dòng) Microsoft Visual Basic 6.0 并選擇一個(gè)標(biāo)準(zhǔn) EXE 項(xiàng)目。默認(rèn)情況下會(huì)創(chuàng)建 Form1。

在“項(xiàng)目”菜單上，選擇“引用”，然后將其中一個(gè)引用設(shè)置為“Microsoft ActiveX Data Objects 2.1 庫(kù)”（或更高版本）。

在 Form1 上放置兩個(gè)命令按鈕和一個(gè) DataGrid 控件（分別名為 Command1、Command2 和 DataGrid1）。

將以下代碼粘貼到 Form1 的“聲明”部分中：

注意：在運(yùn)行此代碼之前，必須將 User ID=<User ID> 和 password=<Strong Password> 更改為正確的值。請(qǐng)確保該用戶 ID 具有在數(shù)據(jù)庫(kù)中執(zhí)行此操作所需的適當(dāng)權(quán)限。 Dim adorst As New ADODB.Recordset Dim adoconn As New ADODB.ConnectionPrivate Sub Command1_Click()Dim strConn As Stringadoconn.Open "Provider=SQLOLEDB;Data Source=MyServer;Initial Catalog=master;User Id=<User ID>;Password=<Strong Password>;"adoconn.Execute "EXEC sp_addlinkedserver 'SecuredJetLS', 'Jet 4.0', 'Microsoft.Jet.OLEDB.4.0', 'c:\.....\MyDatabase.mdb'"adoconn.Execute "EXEC sp_addlinkedsrvlogin 'SecuredJetLS', FALSE, NULL, 'UserName', 'Password'"adoconn.CloseMsgBox "Successful Setup"End SubPrivate Sub Command2_Click()Dim SQL As String' Using OpenQuery syntax. SQL = " Select a.* from OPENQUERY(SecuredJetLS, 'Select * from MyTable') a"' Using OpenRowset syntax.' SQL = "SELECT * From OpenRowset('Microsoft.Jet.OLEDB.4.0','c:\....\MyDatabase.mdb'; 'UserName';'Password', MyTable)"' Using four-part name syntax.' SQL = "Select * from SecuredJetLS...MyTable"adoconn.CursorLocation = adUseClientadoconn.Open "Provider=SQLOLEDB;Data Source=MyServer;Initial Catalog=master;User Id=<User ID>;Password=<Strong Password>;"adorst.Open SQL, adoconn, adOpenStatic, adLockReadOnlySet DataGrid1.DataSource = adorstEnd SubPrivate Sub Form_Load()Command1.Caption = "Setup Linked Server"Command2.Caption = "Query Linked Server" End SubPrivate Sub Form_Unload(Cancel As Integer)adorst.CloseSet adorst = Nothingadoconn.CloseSet adoconn = Nothing End Sub

運(yùn)行該項(xiàng)目。

單擊“設(shè)置鏈接服務(wù)器”。如果將連接字符串中的?sp_addlinkedserver?和sp_addlinkedsrvlogin?修改為正確的參數(shù)，則可以成功創(chuàng)建鏈接服務(wù)器。

單擊“查詢鏈接服務(wù)器”。如果將連接字符串和查詢文本修改為正確的參數(shù)，將使用您的數(shù)據(jù)填充 DataGrid 控件。

回到頂端

總結(jié)

以上是生活随笔為你收集整理的如何通过OPENROWSET函数向SQL Server导入带工作组(mdw)保护的Access数据库数据（转）...的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。