El Guru Programador
Usuario DESCONOCIDO | Registrate Gratis | Usuarios Registrados
Foro de Visual Basic/VB.NET
Foros del Guru > Visual Basic/VB.NET
Usuario Insertar datos en una base de dato...
Armand
6 Mensaje(s)
Enviado - 10/6/2004
 
Hola a todo el mundo. Soy nuevo en esto de la programacion de VB. Lo que quiero es crearme mi propia aplicacion para aprender a programar en VB 6, pero mi problema esta al intentar insertar datos en una base de datos de access.

Primero quiero crear una conexion con la base de datos y despues en una tabla de access empezar a insertar los datos al hacer click desde un boton de un formulario creado por mi.

Si fuesen tan amables de guiarme, les estaria muy agradecido.

Un saludo a todos.

Unai
 
MASTER_MSN
6 Mensaje(s)
Enviado - 13/6/2004
 
ESTO ES UN POCO LARGO Y COMPLICADO DE ENSEÑAR PERO HARE UN ESFUERZO OK :p

LO PRIMERO QUE TIENES QUE HACER ES AGREGAR LAS REFERENCIAS PARA PODER CONEXTARTE A UNA BASE DE DATOS.

PARA ESO VE A AL MENU PROYECTO Y DALE EN REFERENCIAS
 
MASTER_MSN
6 Mensaje(s)
Enviado - 13/6/2004
 
ESTO ES UN POCO LARGO Y COMPLICADO DE ENSEÑAR PERO HARE UN ESFUERZO OK :p

LO PRIMERO QUE TIENES QUE HACER ES AGREGAR LAS REFERENCIAS PARA PODER CONEXTARTE A UNA BASE DE DATOS.

PARA ESO VE A AL MENU PROYECTO Y DALE EN REFERENCIAS.

DESPUES BUSCAS LA OPCION (MICROSOFT DAO 2.5/3.51 COMPATIBILITY LIBRARY)

DALE EN EL CUADRADO DE ALADO UN CLICK Y PON ACEPTAR


DESPUES TENDRAS QUE ENTRAR EN EL FORM EN VISTA DE CODIGO Y ESCRIBIR LO SIG:

Option Explicit
Dim XX As Database 'ESTO ES PARA LEER LA BASE DE DATOS

Dim RR As Recordset ' ESTO ES PARA LEER LA TABLA DE LA BASE DE DATOS


DESPUES ESCRIBES LO SIG EN EL FORM_LOAD

Private Sub Form_Load()
Set XX = OpenDatabase("LA RUTA DONDE SE ENCUENTRA TU BASE DE DATOS")
Set RR = XX.OpenRecordset("EL NOMBRE DE LA TABLA QUE CREASTE EN LA BASE DE DATOS ACCES", dbOpenDynaset)
End Sub

AHORA YA TIENES HABIERTA TU BASE DE DATOS, SOLO TE FALTA GUARDAR ALGO E BORRAR ALGO.

PARA ESO HAZ LO SIG. EN ALGUN COMMAND_CLIK

Private Sub Command1_Click()
RR.AddNew
RR.NOMBRE = Text5.Text
RR.TELEFONO = Text6.Text
RR.Update
End Sub

SUPUESTAMENTE EL USUARIO ESCRIBIO SU NOMBRE EN UN CAMPO DE TEXTO QUE SE YAMA TEXT5 Y SU NUMERO TELEFONICO EN OTRO CAMPO DE TEXTO QUE SE LLAMA TETX6 Y EN CON UN BOTON QUE SE LLAMA COMMAND1 GUARDAMOS LO QUE EL USUSARIO ME INGRESO.

RR.NOMBRE (NOMBRE ES EL NOMBRE DEL COMPO Y RR ES LA VARIABLE PARA LEER LA TABLA)

AHORA QUE SABES GUARDAR SOLO TE FALTA LEER
PARA ESO HAZ LO SIG.
CON UN COMMAND

Private Sub Command2_Click()
TEXT1.TXT = RR.NOMBRE
TEXT2.TXT = RR.TELEFONO
RR.MoveNext
End Sub

Y ESO ES TODO

SI NO ME ENTENDISTE SOLO MANDAME UN E-MAIL PIDIENDOME ALGUN EJEMPLO Y TE MANDO UNO OK.
CHAOOOOOOOOOO :D
 
Desconocido
Enviado - 2/7/2004
 
MASTER_MSN
Tienes un ejemplo en VB.NET para insertar datos a la BD
 
Desconocido
Enviado - 28/7/2004
 
Hola, a mi tambien me interesa saber como guardar, y leer en una base de datos de Access, pero tengo n apregunta:

¿se puede hacer esto desde los Macros de Outlook?

se que se pueden crear formularios, pero no se si se puedan guardar los datos obtenidos en el formulario.

Gracias. de verda me interesa mucho
 
Desconocido
Enviado - 19/10/2004
 
hola a todos yo tengo el mismo problema pero con VB.net y sql2000 si alguien tine un ejemplo que pueda realizar altas bajas y modificaciones a la BD se los agradeceré.
 
 

 

Contactos myStudio Network