Pervasive OLE DB プロバイダーを使用する場合の一般的な疑問は、データベースへの接続方法です。このセクションでは、OLE DB プロバイダーを使用した接続の基本事項について説明します。
Private Sub Form_Load()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
'これは、特に Client Cursor Engine を使用する場合を除き、
'常に adUseServer です。
cn.CursorLocation = adUseServer
cn.ConnectionString = "Provider=PervasiveOLEDB;Data Source=Demodata"
cn.Open
rs.Open "Billing", cn, adOpenDynamic, adLockOptimistic, adCmdTableDirect
rs.MoveFirst
MsgBox "最初の Student ID:" & rs.Fields("Student_ID")
rs.Close
cn.Close
End Sub