![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
30/11/2003, 08:09
|
![Avatar de pabli](http://static.forosdelweb.com/customavatars/avatar45615_1.gif) | | | Fecha de Ingreso: octubre-2003
Mensajes: 381
Antigüedad: 21 años, 3 meses Puntos: 0 | |
Aigama,
no hablamos de lo mismo, QueryDef se utiliza con DAO, no con ADO. Si quieres utilizar ADO, abre una conexión con la BBDD a través de este proveedor y después:
--------------------------------------------------------------------------
'En la sección general de declaraciones***************
Dim Gado_conn As ADODB.Connection 'Abre una conexión
Dim Gado_command As ADODB.Command 'Envía comandos
En el load del form, por ejemplo***************
'Creo un objeto Command para ejecutar las inserciones y actualizaciones
Set Gado_command = New ADODB.Command
Gado_command.ActiveConnection = Gado_conn 'Esta es la variable tipo connection
Gado_command.CommandType = adCmdUnknown 'Predeterminado
'Donde quieras***************
'Monto la cadena SQL
Gado_command.CommandText = "Update tabla ..."
'Actualizo
Gado_command.Execute
--------------------------------------------------------------------------
En este ejemplo no se ve como se abre la base de datos, pero imagino que sabrás hacerlo pues dices que estás utilizando ADO para las consultas.
Si no te funciona, escribes
Saludos
Pablo |