Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: katuriri en 26 Octubre 2005, 08:58 am



Título: Visual basic y access
Publicado por: katuriri en 26 Octubre 2005, 08:58 am
necesito saber como llamar datos de una base de datos de access para ser programados en visual



Título: Re: Visual basic y access
Publicado por: LICHONGO en 26 Octubre 2005, 19:52 pm
Puede utilizar un control data y le asignas en la propiedad (DataBaseName) la ruta de la base de datos que vas a utilizar y en la propiedad RecordSoucer el nombre de la tabla que vas a utilizar esto es para el control data.

Si vas a mostrar la informacion en un text, le asignas en la propiedad DataSource la data de que vas a utilizar y en la propiedad DataField el campo con que vas a trabajar esta manera de trabajar no es muy buena por que si cambias de ruta la base datos el programa no la va a encotrar y mostrara un error mejor es trabajar con programacion

Public db As Database 'declara una variable publica
Public re As Recordset 'declara una variable publica
Private Sub Form_Load()
If Right(App.Path, 1) = "\" Then 'obtine el ultimo caracter en la ruta del programa
    Set db = OpenDatabase(App.Path + "mibasedatos.mdb") 'asigna a la variable db la base de datos
Else
    Set db = OpenDatabase(App.Path + "\mibasedatos.mdb") 'asigna a la variable db la base de datos
End If
Set re = db.OpenRecordset("mitabla") 'asigna a la variable re la tabla
Text1.Text = re.Fields(0) 'asigna el campo numero 1 de la tablas
Text2.Text = re.Fields(1) 'asigna el campo numero 2 de la tablas
Text3.Text = re.Fields(2) 'asigna el campo numero 3 de la tablas
Text4.Text = re.Fields(3) 'asigna el campo numero 4 de la tablas
End Sub

espero que te sirva de algo