レコードセット オブジェクトを使用する
または、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 の例と対照的です。