25/10/2004, 15:24
|
 | Moderador | | Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses Puntos: 98 | |
| Visual 6??
Supongo que estás haciendo un componente?
Primero necesitas agregar las referencias de ADO
Microsoft ActiveX Data Object Library
Después lo más recomendable es que hagas tu conexión y cadena de conexión, en este caso una constante cadConx desde la sección general de declaraciones
Private Oconn As ADODB.Connection
Const cadConx = "DSN=tuDSN"
Despues tienes tu Sub
Private Sub Grabar(valor1, valor2)
Set Oconn = New ADODB.Connection
Oconn.Open cadConx
Oconn.Execute("INSERT INTO tabla (campo1, campo2) VALUES ('" & valor1 & "','" & valor2 & "')")
End Sub
Algo así...
Salu2,
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
Última edición por u_goldman; 25/10/2004 a las 15:25 |