Visual Basic y base de datos Access

¿cómo establecer una conexión entre VB6.0 y una base de datos Access?

hola
acabo de leer este foro pero aún no logro conectar mi base de datos Access con VB6. tengo una base de datos formada por 4 tablas y consultas. quiero, usando VB, mostrar algunos campos de la tabla, modificarlos, eliminarlos y agregar registros, insertar estadísticas ya calculadas por las consultas de Access...gracias por toda la ayuda y me gustaría que me envíen cursos que consideren interesantes
gracias por todo

slt j'aimerai si possibles avoir des cours performants avec exemples sur les bases de données créées avec le vb6 et access

Hola,
Estoy desarrollando una aplicación VB6 en la plataforma de Windows 2000 que es específica para una empresa y no logro conectarme a la base que creé en Access 2000. Me dice que no reconoce el formato de la base. He probado con otros códigos, pero nada. ¿Puedes ayudarme?
Aquí tengo el mensaje «La conexión n'a pas réussi,réessayez»
Te envío el código que he utilizado:

Option Explicit
'Declaración de variables globales
'Global DbName As String
Global Liberreur As String
'Global OK As Integer

Public Cnx As New ADODB.Connection
Public Rst As New ADODB.Recordset
Public Cmd As New ADODB.Command
Sub main()
'Este procedimiento llama a la función de apertura de la BD y muestra la ventana de inicio.
If OuvrirBase = True Then
frmConnexion.Show
Else
MsgBox ("La connexion n'a pas réussi,réessayez")
End If
End Sub

Public Function OuvrirBase() As Boolean
'Esta función abre la BD Access 2000
On Error GoTo Erreur

Cnx.Provider = "Microsoft.Jet.Oledb.4.0"
Cnx.ConnectionString = App.Path & "c:\db1.mdb"
Cnx.Open
Cmd.ActiveConnection = Cnx
OuvrirBase = True
Exit Function
'\gbemich\GESPARC\Application\
Erreur:
Liberreur = "Erreur d'ouverture de la Base"
OuvrirBase = False
End Function

Public Sub OuvrirRecord(StrSQL As String)
'Esta rutina permite abrir todas las tablas de la BD. Este código para abrir una tabla es una consulta SQL que hay que pasarle, es decir, un ''select''
'Mira en la ayuda a nivel de estas propiedades . verás para qué sirven

Cmd.ActiveConnection = Cnx
Cmd.CommandText = StrSQL
Rst.CursorLocation = adUseClient
Rst.CursorType = adOpenDynamic
Rst.LockType = adLockPessimistic
Rst.Open Cmd
End Sub

Public Sub FermerRecord()
'Esta rutina permite cerrar todas las tablas de la BD
On Error Resume Next
Rst.Close
Set Rst = Nothing
Set Rst = New ADODB.Recordset
End Sub

Public Sub FermerBase()
'Esta rutina permite cerrar la BD
On Error Resume Next
Cnx.Close
Set Cnx = Nothing
End Sub

Hola a todos
¿cómo puedo mostrar una imagen en toda la form en VB
porque cuando la hago no se muestra en la form, una parte queda?

Contáctame en ghost_dog_jr@hotmail.com y te daré un tutorial y consejos si quieres, porque es un poco largo de explicar...

Ok Salima, ahora primero, cuando abras VB desde el menú Proyecto -> Referencia -> marca Microsoft DAO 2.5/3.51 compatibility library.

Luego, en el editor de programación, escribe las siguientes líneas de código:

dim cnx as adodb.connection
dim cmd as adodb.command
dim rs as adodb.recordset

sous la procédure form_load() tapez:

set cnx=new adodb.connection
set cmd=new adodb.command
set rs=new adodb.recordset

cnx.Provider="Microsoft.jet.oledb.4.0"
cnx.connectionstring="tu base de datos que debe estar en la carpeta del proyecto.mdb"
rs.cursorlocation=adUseClient
rs.cursortype=adopenDynamic
rs.locktype=adlockPessimistic

rs.open cmd

Te deseo buena suerte y mucho ánimo

Saludos

hola

si el programa que conecta VB con Access, ¿podrías publicarlo en: srigovich@hotmail.com
gracias de antemano

Hola,

Para evitar algunos fallos, necesitas convertir tu base de datos a ACCESS 97.

Haz una prueba para ver.

Nos vemos.

Primero quiero agradecerle por su respuesta, es muy amable de su parte, y esta solución la he probado ya y funciona, pero el Office instalado en las máquinas es la versión 2000, así que no puedo convertir cada vez, no es profesional, y no entiendo por qué Office 2000 es menos eficiente que la versión 97.

trabajo normalmente con VB y Access, envíame tu código para ver

*pones un control DATA
*un DBGRID
o no
ejemplo

declara de la siguiente manera
SET MO(el nombre de la variable con la que vas a trabajar) as database="la ruta de acceso a tu base")
SET moo as database.recordset="el nombre de la tabla"

quiero saber cómo puedo vincular VB 6.0 con la base de datos
nes j

You need to create a Microsoft Access 97 database for VB6, my friend.

hola moh
en Visual Basic he vinculado mi programa a la base de datos Access2000 a través del control Data, pero éste me señala un error de acceso a la base, es realmente sorprendente, sobre todo porque funciona muy bien con Access97, ya no entiendo nada, espero que puedas ayudarme, cuento contigo
nos vemos pronto en la red

lo siento pero hay que cambiar los datos, son incompatibles con Acce s2000
y si quieres más explicaciones sobre el problema, contáctame por mi dirección de correo electrónico para obtener más detalles sobre tu problema, chao

Hola a todos,
me gustaría saber funciones básicas que me permitirían manipular una base de datos Access 2003 con Visual C.
bueno, gracias a todos los que me ayuden^^
hasta pronto.

Necesitas convertir tu base a formato Access 97; para ello, en Access ve a Herramientas, Utilitarios de Base de Datos, y realiza la conversión. Luego, en VB, adjúntalo al proyecto. Buena suerte.

you are looking for the ocx data object 3.6 instead of 3.5 that Office 2000 requires

escucha no sé cómo decirte expón bien tu problema, yo siempre he trabajado con VB y las bases Access así que si quieres ayuda ilúmbrame tu problema

hola salma
para poder conectarte a una BD Access 2000 debes usar el ocx Microsoft DAO 3.6 :
en el menú Proyecto haz clic en la pestaña Referencias e intenta localizarlo en la lista de casillas para marcar
si no lo encuentras intenta buscarlo con la utilidad de búsqueda de Windows para conocer su ruta, luego regresa a la pestaña Referencias y haz clic en Examinar para volver a localizar tu ocx y añade-lo . buena suerte
mi correo: hanshans26@hotmail.com
por si quieres avisarme de algo porque solo me conecto muy rara vez