Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: ::: Devil ::: en 9 Marzo 2007, 05:30 am



Título: acces y vb
Publicado por: ::: Devil ::: en 9 Marzo 2007, 05:30 am
bueno estoy aprendiendo a utilizar el visual basic y lo que necesito en este momento es como puedo yo buscar desde vb un registro de x persona desde una base de datos en acces


Título: Re: acces y vb
Publicado por: Hans el Topo en 12 Marzo 2007, 20:33 pm
bueno estoy aprendiendo a utilizar el visual basic y lo que necesito en este momento es como puedo yo buscar desde vb un registro de x persona desde una base de datos en acces

yo empezaria por saber algo sobre las cositas que tendría que utilizar xD

http://foro.elhacker.net/index.php/topic,127987.0.html



Título: Re: acces y vb
Publicado por: ::: Devil ::: en 13 Marzo 2007, 19:19 pm
aja esta bien sigue mi duda igual por que hay lo que hace es conectar a la base de datos.

lo que en si quiero es tener mi base de datos y yo poder desde mi programa en un textbox meterle datos a la base de datos y que los vaya guardando


Título: Re: acces y vb
Publicado por: CeLaYa en 13 Marzo 2007, 21:11 pm
bueno estoy aprendiendo a utilizar el visual basic y lo que necesito en este momento es como puedo yo buscar desde vb un registro de x persona desde una base de datos en acces

yo empezaria por saber algo sobre las cositas que tendría que utilizar xD

http://foro.elhacker.net/index.php/topic,127987.0.html




Coincido con "hans el topo", primero deberías leerte un manual o la ayuda del VB y en un caso extremo usar la opción de búscar (porque de BD ya se ha hablado un monton), pero para que este post no se desperdicie hay te va un poco de ayuda:

Código:
'Primero declaras variables
Dim BD as database
Dim TB as recrodset

'habres la BD
set BD = workspaces(0).Opendatabase("c:\tararara\BD")

'Haces la búsqueda
set TB = BD.OpenRecordSet("SELECT * FROM Tabla WHERE Nombre = '" & nombrequeestasbuscando & "';")

'Si lo encuentra lo muestra
if TB.RecordCount > 0 Then
     'si son varios registros aqui puedes hacer un bucle
    Text1.Text = TB!Campo1
    Text2.Text = TB!Campo2
    Text3.Text = TB!Campo3
    Text4.Text = TB!Campo4....
end if

'Cierras la tabla y BD
TB.Close
BD.Close

'Liberas memoria
Set TB = nothing
Set BD = NOthing

[/close]