¿Codigo para alta a registros en una BD de Access o Excel desde un control data?

Iniciado por El_chapulin, 24 Octubre 2006, 19:29 PM

0 Miembros y 1 Visitante están viendo este tema.

El_chapulin

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:

CeLaYa

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
"La soledad es el elemento de los grandes talentos".
Cristina de Suecia (1626-1689) Reina de Suecia.