Duda con Bases de Datos

[biotek]

yo apenas comienzo a usar el visual basic y me e encontrado con un problema que para muchos resultara facil pero io no he podida dar solucion.
Necesito hacer que mi programa busque en una base de datos que tengo en access un numero y me muestre el registro o la info del registro en mi programa.

Es decir en el programa buscare por codigo y quiero que haga la busqueda en la base de datos en access y cuando haye el propietario de ese codigo me lo muestre

se los agradeceria mucho si me pudieran ayudar

[Developer9]

Eje!! eso es algo de código pero no te serviría sin la explicación del mismo. te puedo enviar por mail un programa que hace lo que tu quieres con el codigo comentado

[lop7]

bueno asi calientico sera esto lo que buscas
en un modulo.................

Código:

Global ors As ADODB.Recordset
Global ocnn As New ADODB.Connection
Global oCmd As New ADODB.Command

despues

Código:

sub buscar()
dim str as string
dim buscando 

abrirBD
buscando = InputBox("Ingrese el numro a Buscar")

Set ors = New ADODB.Recordset
oCmd.CommandType = adCmdText
oCmd.CommandText = "select campo1,campo2,campo3 from tabla where numero="& buscando 
Set ors = oCmd.Execute
if not ors.eof then
    text1.text=ors.fields!campo1
    text2.text=ors.fields!campo2
    text3.text=ors.fields!campo3
end if
end sub

Código:

Sub abrirBD()
Set ors = New ADODB.Recordset
Set ors = New ADODB.Recordset
If ocnn.State = adestateclose Then

ocnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\misdatos.mdb;Persist Security Info=False"
Set oCmd.ActiveConnection = ocnn
End If
End Sub

espero te sirva
nos vemos

[biotek]

Gracias lop7, developer9 este es mi correo si me pudieras mandar el programa por favor
para terminar de comprenderlo......
gracias

[email protected]

[Developer9]

yO LO hago con ado pero utilizando un dsn como conexion. Ya te lo mando

[aldo1982]

creo ke tb es cuestion de buscar un pokitin en las faqs (coneccion a db, sentencias sql, etc etc)

bye...