A voir également:
- Visual basic et base de données access
- Visual basic download - Télécharger - Langages
- Microsoft 365 basic - Guide
- Formules excel de base - Guide
- Microsoft visual c++ runtime - Guide
- La base de données de sécurité du serveur n'a pas de compte d'ordinateur pour la relation ✓ - Forum Réseau
52 réponses
antonyojunior
Messages postés
22
Date d'inscription
lundi 8 janvier 2007
Statut
Membre
Dernière intervention
11 janvier 2011
42
8 janv. 2007 à 10:52
8 janv. 2007 à 10:52
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
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
leonelrichie
Messages postés
1
Date d'inscription
vendredi 7 septembre 2007
Statut
Membre
Dernière intervention
8 septembre 2007
7
8 sept. 2007 à 13:58
8 sept. 2007 à 13:58
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
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
TU DOIS CONVERTIR TA BASE DE DONNEES EN FORMAT 97
SOUS ACCESS
ETAPES:
TU CLIQUE SSUR LE MENU OUTILS
UTILITAIRES DE BASES DE DONNEES
CONVERTIR LA BASE DE DONNEES EN FORMAT 97
tu donnes un nom au fichier
dans ce cas tu auras 2 bases de données
* format 2000
*format 97
sous vb :
propriétés de DATA
DATABASENAME : connecte toi à la base de données format 97 parce que le contrôle DATA ne reconnaît pas le format 2000
SOUS ACCESS
ETAPES:
TU CLIQUE SSUR LE MENU OUTILS
UTILITAIRES DE BASES DE DONNEES
CONVERTIR LA BASE DE DONNEES EN FORMAT 97
tu donnes un nom au fichier
dans ce cas tu auras 2 bases de données
* format 2000
*format 97
sous vb :
propriétés de DATA
DATABASENAME : connecte toi à la base de données format 97 parce que le contrôle DATA ne reconnaît pas le format 2000
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
isgt
Messages postés
43
Date d'inscription
samedi 29 mars 2008
Statut
Membre
Dernière intervention
15 mai 2012
3
22 avril 2008 à 19:17
22 avril 2008 à 19:17
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
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
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
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+
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"
*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"
MERCIE TOUT DABORE JE SUIS DEBUTANT EN VB ET J'AI CRIEE UN PETIT PROJET DES FONCTIONNAIRES DANS LE QUELLE IL YA TOUS LES INFORMATIONS NOM PRENOM ETC...AVEC LA PHOTO POUR LA QUELLE J'AI TROUVEE LE PROBLEME AU MOUMENT DE LA JOUE D'UN NOUVEAU ENREGISTREMENT C'EST POUR CE LA JE VOUS DEMANDE DE M'AIDEE A TROUVEE COMMENT INSERET UNE IMAGE A L'AIDE D'UNE BOTTON AJOUT UNE IMAGE MERCI UNE DEUSIEME FOIS MOUMEN RAHAL
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
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+
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+
ngo
Messages postés
1
Date d'inscription
mercredi 11 octobre 2006
Statut
Membre
Dernière intervention
11 octobre 2006
11 oct. 2006 à 00:31
11 oct. 2006 à 00:31
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.
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
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
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
Je galère à mort,
Depuis deux jours je n'avance pas dans mon projet : j'ai un problème avec les variables booléennes, lorsque j'ajoute un adhérent, il n'y a aucun problème ça stock bien dans la base de données, mais pour des données que j'ai rentrés moi même à partir d'access, je n'arrive pas à le faire apparaitre dans les options boutton, j'ai essayer avec tout Vrai/Faux, oui/non, -1/0 false/true... aidez moi s'il vous plaît !!!!!!!!!!!!!!!!!
Depuis deux jours je n'avance pas dans mon projet : j'ai un problème avec les variables booléennes, lorsque j'ajoute un adhérent, il n'y a aucun problème ça stock bien dans la base de données, mais pour des données que j'ai rentrés moi même à partir d'access, je n'arrive pas à le faire apparaitre dans les options boutton, j'ai essayer avec tout Vrai/Faux, oui/non, -1/0 false/true... aidez moi s'il vous plaît !!!!!!!!!!!!!!!!!
6 janv. 2012 à 07:33
26 févr. 2012 à 19:38