Visual basic et base de données access

comment établire une connection entre VB6.0 et une Base de données Access?

salut
je viens de lire ce forum mais toujours j'arrive pas à lié ma bd access et le vb6. j'ai une base de données formé de 4 tables et des requête. je veux en utilisant Vb afficher qluelques champs de la table, lmodifier, supprimer et ajouter des enregistrement, inserer des statiqtiques calculer déja par les requetes access....merci pour toute aide et je veux bien que vous m' envoyez des cours que vous jugez interessants
merci pour tout

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

Salut,
Je développe une application VB6 sur la plate forme d’un Windows 2000 qui est spécifique à une entreprise et je n’arrive pas à me connecter à la base que j’ai créé dans Access 2000. Il me dit qu’il ne reconnaît pas le format de la base. J’ai essayé avec d’autres codes mais rien à faire. Pouvez-vous m’aider ?
Ici j’ai le message « La connexion n'a pas réussi,réessayez »
Je vous envoie le code que j’ai utilisé :

Option Explicit
'Déclaration des 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()
'Cette procédure appelle la fonction d'ouverture de la BD et affiche la fenêtre d'acceuil.
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
'Cette fonction ouvre 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)
'Cette procédure permet d'ouvrir toutes les tables de la BD. Ce code veut dire que pr ouvrir une table,c'est une requete SQL qu'il faut lui passer. ie un ''select''
'Regarde ds l'aide au niveau de ces propriétés . tu verras ce à quoi elle servent

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

Public Sub FermerRecord()
'Cette procédure permet de fermer toutes les tables de la BD
On Error Resume Next
Rst.Close
Set Rst = Nothing
Set Rst = New ADODB.Recordset
End Sub

Public Sub FermerBase()
'Cette procédure permet de fermer la BD
On Error Resume Next
Cnx.Close
Set Cnx = Nothing
End Sub

salus a tous
comment je peut afficher une image sur toute la form en vb
parceque quant je fait elle n'affiche pas sur la form une partie reste

Contact moi sur ghost_dog_jr@hotmail.com je te donnerais un tutoriel, et des conseils si tu le desir, car c'est un peu long a expliquer...

Ok salima, voila tout d'abord lorsque vous ouvrez VB sous le menu Projet-->référence-->cocher Microsoft DAO 2.5/3.51 compatibility library.

Ensuite dans l'éditeur de programmation tapez les lignes de code suivantes:

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="votre base de données qui doit être dans le dossier du projet.mdb"
rs.cursorlocation=adUseClient
rs.cursortype=adopenDynamic
rs.locktype=adlockPessimistic

rs.open cmd

Je vous souhaite bonne chance et bon courage

Cordialement

bonjour

si vous le programme qui relie le VB avec Access , pourriez vous le poster dans : srigovich@hotmail.com
merci d'avance

Salut,

Pour eviter quelsques plantages, il faut que tu convertisse ta base de données sous ACCESS 97.

Fais un test pour voir.

A+

tout d'abord je vous remercie pour vote réponse , c'est trés gentil de ta part et cette solution , je l'ai déjé essayé et ça marche , mais l'office installé sur les machines est la version 2000, donc je ne peux comme meme pas convertit à chaque fois , ce n'est pas professionnel , et je ne comprend pas pourquoi l'office 2000 est moin performant que la version 97

je travaille normalement avec VB et access envoies moi ton code pour voir

*t'as mis un DATA controle
*un DBGRID
ou pas
exemple

tu declares de la façon suivante
SET MO(le nom de la variable avec laquelle tu vas travailler) as database="le chemin d'acces a ta base)
SET moo as database.recordset="le nom de la table"

je veut savoir comment je peut lies vb 6.0 avec la base do
nes j

khassek a hbibi dir crée base bdd acess97 pour vb6

salut moh
en visuel basic j'ai lié mon programme à la base de données access2000 via le controle data, mais celui ci me signal une erreur d'acces à la base , c'est vraiment étonant surtout que ça marche tres bien avec access97 , je ne comprend plus rien , j'espére que vous pouver m'aider , je compte sur toi
à trés bientot sur le net

desoler mes il faut changer le data il et incompatible avec le Acces2000
et si tu veux plus d'explication sur le Probleme tu me contacte par mon adresse électronique pour avoire plus de detaille sur ton probleme, A+

salut a tous,
je voudrais savoir des fonctions de base qui me permetterais de manipuler une base de donnée access2003 avec visuel C.
voila merci a tous ceux qui m'aidersons^^
a bientot.

il faut que tu convertit ta base en format access 97 pour cela sur access va à outils puis utilitaire de bases de données puis fait la conversion est sur vb attache la avec le projet bonne chance

vous chercher le ocx data objet 3.6 au lieu du 3.5 que l'office 2000 demande

ecoute je ne sais comment te lke dire expose bien ton probleme j ai tjrs travailer avec le vb et les bases acces donc si tu veux de l aide eclaire ton probleme

salut salma
pour pouvoir te connecter a un BD acces 2000 tu doit utiliser l'ocx microsoft DAO 3.6 :
dans le menu projet click sur l'onglet references et essais de le trouver dans la liste des cases à cocher
si tu le trouve pas essais de le rechercher a l'aide de l'utilitaire de recherche de windows pour connaitre son chemin , aprés tu reviens sur ton onglet references et click sur parcourir pour retrouver ton ocx et ajoute le . bonne chance
c mon email : hanshans26@hotmail.com
au cas ou tu veux me signaler quelque chose parceque je me connecte que rarement