conectar a una base de datos

[ElAprendiz]

que codigo debo utilizar para conectarme a una base de datos access en VB



un saludo




VVaayyaa tteeccllaaddoo mmaass sseennssiibbllee

[Saga]

Este es un ejemplo muy sencillo, te recomiendo que investigues cada metodo por separado en la ayuda que viene incluida con el VB, solo escribe el nombre del metodo seleccionalo y dale F1, la yuda esta compelta y contiene ejemplos.

'Define variables
Dim WS As Workspace
Dim DB As Database
Dim tmpUsuarios As Recordset
Dim Ruta_DB As String

Ruta_DB = App.Path & "\DATOS.mdb"

'Abre la base de datos
Set WS = DBEngine.Workspaces(0)
Set DB = WS.OpenDatabase(Ruta_DB)

'Crea una consulta
criterio = "SELECT * FROM usuarios WHERE [tipo] = 1"
Set tmpUsuarios = GDB.OpenRecordset(criterio)



Saludos

[ElAprendiz]

ok gracias lo vere

[Mamulito]

si quieres un poco mas de complicacion pero menos codigo a traves de odbc. Pare ello debes activar la referencia Microsoft ActiveX Data Object en Referencias

Dim cnn as new adodb.connection
dim rs as new adodb.recordset
dim query as string

cnn.connectiostring="la cadena odbc"
cnn.open

query = "select * from basedatos"
rs.open query,cnn

[Mamulito]

la cadena ODBD es la cadena que se conecta a la BBDD que previamente habras creado en el icono ODBC del Panel de control