执行 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