Ayuda...Añadir datos a una base de datos en VB6

[Cesar2990]

para empezar tenes q tener dos variables y si las usas generale seria bueno
empieza asi

option explicit
dim conex as adodb.connection
dim withevents base as adodb.recordset
destino sql as string

form load ()
set conex = new connection
set base = new recorset
conex.open "aca pones la direccion de la base de datos con comillas"
end sub

esto es para agregar
sql ="Select * from nombre tabla"
with base
.open sql, conex, adopendynamic, adopenoptimistic
.addnew
!Campo = lugar donde este el dato
.update
.close
end with

espero y esto te sirva