將資料訪問頁綁定到中斷連線的記錄集

來源:互聯網
上載者:User
斷開|訪問|記錄集|資料 Meyyammai Subramanian
Microsoft Corporation

2001 年 4 月

適用於:
Microsoft® Access 2002

摘要:本文說明如何將資料訪問頁綁定到中斷連線的 ADO 記錄集。

目錄
簡介
建立使用中斷連線的記錄集的資料訪問頁

簡介
中斷連線的記錄集是用戶端快取中的對象,該對象沒有同伺服器即時串連。使用中斷連線的記錄集,ActiveX® 資料對象 (ADO) 允許您建立記錄集,斷開與資料來源的串連,使使用者可以離線查看和編輯記錄集。

例如,“類別”資料訪問頁會詢問是否該頁應使用中斷連線的資料。如果使用者單擊“是”,該頁將提示使用者輸入中斷連線的記錄集的路徑。如果使用者單擊“否”,該頁將使用即時資料。

建立使用中斷連線的記錄集的資料訪問頁
在“設計”視圖中建立資料訪問頁。


添加所需的控制項和分組層級。例如,建立“類別”頁,該頁組合有不同類別下的產品記錄。


將代碼添加到 BeforeInitialBind 事件,以便串連到中斷連線的記錄集,或者串連到即時資料。
以下是 BeforeInitialBind 事件程序樣本。

<SCRIPT language=vbscript event=BeforeInitialBind(info) for=MSODSC>
<!--
Dim rs
Dim strShapeText
Dim strConnectionString
Dim strDataSource
adOpenKeyset=1
adLockOptimistic=3

If vbyes=msgbox("使用中斷連線的記錄集嗎?",vbyesno) Then
On Error Resume Next
strDataSource = InputBox ("請輸入要使用的_
中斷連線的記錄集的路徑。", "Enter Path", _
"C:\Program Files\Microsoft Office\Office10\Samples\ _
Northwind.mdb")
strShapeText = MSODSC.RootRecordsetDefs(0).ShapeText
strConnectionString = "Provider=MSDataShape.1; _
Persist Security Info=False;Data Source=" & strDataSource _
& ";User ID=Admin;Data Provider=Microsoft.Jet.OLEDB.4.0"

Set rs = CreateObject("ADODB.Recordset")
rs.Open strShapeText, strConnectionString, adOpenKeyset, _
adLockOptimistic

If err.Number <> 0 Then
MsgBox "錯誤:" & err.description & "Error " & err.number
End If

MSODSC.SetRootRecordset "Categories", rs
End If
-->
</SCRIPT>

注意:

不能從 Microsoft Access 內部正常使用綁定到中斷連線的記錄集的資料訪問頁。 應在 Microsoft Internet Explorer 中開啟該頁,才能正常查看。


在建立 Microsoft® Office 資料來源控制項 (MSODSC) 事件的 Visual Basic® Scripting Edition (VBScript) 塊時,必須將參數添加到事件名稱中,如下所示:
<SCRIPT LANGUAGE=vbscript FOR=MSODSC EVENT=Current(oventInfo)>

oEventInfo 參數用於向指令碼返回有關該事件的具體資訊。無論是否使用此參數,都必須添加此參數,否則指令碼將無法運行。



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。