Executeメソッド

SQLコマンドを実行します。SELECT問合せの場合はRecordSetオブジェクト、レコードを戻さないコマンドの場合は整数を戻します。

構文

Object.Execute(CommandText, RecordsAffected)

引数:

  • Object: 必須。常にADODB Connectionオブジェクトの名前。

  • CommandText: 必須。SQLコマンド

  • RecordsAffected: オプション。レコードを戻さないコマンドの場合に影響を受けるレコード数

備考

次の例では、Executeメソッドの使用方法を示します。

例1:

'Create ADODB.Connection Object
Dim ConnObj   ' Create a variable.
Set ConnObj = CreateObject("ADODB.Connection")
ConnObj.Open("ConnectionString") 'Creates DB Connection by Using Connection String

Dim RecSetObj
Dim CmdTxt
CmdTxt = "SELECT * FROM EMPLOYEE_DETAILS"
Set RecSetObj = ConnObj.Execute(CmdTxt) 'Returns RecordSet

Dim RecAffected
CmdTxt = "UPDATE EMPLOYEE_DETAILS SET SALARY= 10000 WHERE LEVEL = 5"
ConnObj.BeginTrans()
ConnObj.Execute CmdTxt, RecAffected 'RecAffected filled with number of records updated
ConnObj.CommitTrans()

RecSetObj.Close()
ConnObj.Close()
Set RecSetObj = Nothing
Set ConnObj = Nothing