Ejecutar un string en access

[Kbines]

Hola,

Si la sentencia SQL, no es un SELECT, es decir, que es un insert, delete, etc. usa esto:

Dim db As Database
Dim rs As Recordset

Set db = Workspaces(0).Databases(0)

db.Execute(variable q contiene el SQL)

Si en cambio, es un select:

lo mismo q lo anterior pero en lugar de db.execute, lo siguiente:

Set rs = OpenRecordset(variable sql, dbOpenDynaset)

Me.RecordSource = Variable SQL

rs.Close

esta última linea sirve para asignar la propiedad Origen del registro, por ejemplo en un informe para sacar datos

Suerte;