指定下列設(shè)置以便使用自定義 DataFactory 處理程序。
? | 在 Connection 對象的 Provider 屬性或者 Connection 對象的連接字符串 “Provider=” 的關(guān)鍵字中指定 “Provider=MS Remote”。 |
? | 設(shè)置 CursorLocation 屬性為 adUseClient。 |
? | 指定處理程序的名稱以便在 RDS.DataControl 對象的 Handler 屬性、或者 Recordset 對象的連接字符串“Handler=”的關(guān)鍵字中使用。(不能在 Connection 對象連接字符串中設(shè)置處理程序) |
RDS 在稱為 MSDFMAP.Handler 的服務(wù)器上提供默認(rèn)處理程序。(默認(rèn)自定義文件被稱為 MSDFMAP.INI。)
假設(shè)有下列 MSDFMAP.INI 節(jié)以及數(shù)據(jù)源名稱 AdvWorks 事先已有定義:
[connect CustomerDataBase]
Access=ReadWrite
Connect="DSN=AdvWorks"
[sql CustomerById]
SQL="SELECT * FROM Customers WHERE CustomerID = ?"
如下代碼片段使用 Visual Basic 編寫:
RDS.DataControl 版本
Dim dc as New RDS.DataControl
Set dc.Handler = "MSDFMAP.Handler"
Set dc.Server = "http://YourServer"
Set dc.Connect = "Data Source=CustomerDatabase"
Set dc.SQL = "CustomerById(4)"
dc.Refresh
Recordset 版本
Dim rs as New ADODB.Recordset
rs.CursorLocation = adUseClient
指定 Handler 屬性或關(guān)鍵字;Provider 屬性或關(guān)鍵字;CustomerById 和 CustomerDatabase 標(biāo)識符。然后打開 Recordset 對象。
rs.Open "CustomerById(4)", "Handler=MSDFMAP.Handler;" & _
"Provider=MS Remote;Data Source=CustomerDatabase;" & _
"Remote Server=http://YourServer"