Necesito el codigo para dar de alta registros en una aplicacion de visual basic ya sea en una base de datos de Access o Excel :huh:
mira para abrir una BD puedes hacerlo asi
Dim BD as Database
Dim Tb as Recordset
set BD = Workspaces(0).Opendatabase("Tu base de datos")
set tb = BD.OpenRecodset(Tabla o consulta SQL)
para agregar registros
tb.Addnew
tb!Campo1 = Valor1
tb!campo2 = Valor2....
tb.Update
--------------------------
o puedes meter una consulta SQL
bd.execute ("INSERT INTO Tabla (campo1, campo2...) " & _
"VALUES (Valor1, Valor2...)
para cerrar la BD
tb.close
BD.close
set tb = nothing 'Liberas memoria
set BD = nothing