Ejecuta un comando SQL. Devuelve un objeto RecordSet para consultas SELECT o un entero para comandos que no devuelven registros.
Sintaxis
Object.Execute(CommandText, RecordsAffected)
Argumentos:
Object: necesario. Siempre es el nombre del objeto ADODB Connection.
CommandText: necesario. Comando SQL.
RecordsAffected: opcional. Número de registros afectados para los comandos que no devuelven registros.
Observaciones
En el siguiente ejemplo se muestra el uso del método Execute.
Ejemplo 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