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