次の方法で共有


レコードセット オブジェクトを使用する

または、Recordset.Open を使用して、暗黙的に接続を確立し、その接続に対してコマンドを 1 回の操作で発行することもできます。 Visual Basic での例は、次のとおりです。

Dim oRs As ADODB.Recordset  
Dim sConn As String  
Dim sSQL as String  
  
sConn = "Provider='SQLOLEDB';Data Source='MySqlServer';" & _             "Initial Catalog='Northwind';Integrated Security='SSPI';"  
  
sSQL = "SELECT ProductID, ProductName, CategoryID, UnitPrice " & _  
             "FROM Products"  
  
' Create and Open the Recordset object.  
Set oRs = New ADODB.Recordset  
oRs.CursorLocation = adUseClient  
oRs.Open sSQL, sConn, adOpenStatic, _  
               adLockBatchOptimistic, adCmdText  
  
MsgBox oRs.RecordCount  
  
oRs.MarshalOptions = adMarshalModifiedOnly  
' Disconnect the Recordset.  
Set oRs.ActiveConnection = Nothing  
oRs.Close          
Set oRs = Nothing  

oRs.Open は、Connection オブジェクト (oConn) の代わりに接続文字列 (sConn) を ActiveConnection パラメーターの値として受け取ります。 また、クライアント側カーソルの種類は、Recordset オブジェクトに CursorLocation プロパティを設定することで適用されます。 ここでも、HelloData の例と対照的です。