Probleme pour lire une base ACCESS
Bilo1000
Messages postés
3
Date d'inscription
samedi 28 octobre 2000
Statut
Membre
Dernière intervention
6 novembre 2007
-
1 août 2002 à 11:46
cs_joflo Messages postés 156 Date d'inscription mardi 9 juillet 2002 Statut Membre Dernière intervention 23 septembre 2011 - 1 août 2002 à 11:59
cs_joflo Messages postés 156 Date d'inscription mardi 9 juillet 2002 Statut Membre Dernière intervention 23 septembre 2011 - 1 août 2002 à 11:59
A voir également:
- Probleme pour lire une base ACCESS
- Base de données access - Conseils pratiques -Visual Basic / VB.NET
- Base de données javascript - Conseils pratiques -Javascript
- Base access - Forum Visual Basic
- Programmeur access ✓ - Forum Visual Basic 6
- Base de données e-commerce - Forum PHP
1 réponse
cs_joflo
Messages postés
156
Date d'inscription
mardi 9 juillet 2002
Statut
Membre
Dernière intervention
23 septembre 2011
1 août 2002 à 11:59
1 août 2002 à 11:59
-------------------------------
Réponse au message :
-------------------------------
Bonjour ,
Pour lire les données d'une base acces , j'utilise le code donné sur ce site :
TEXT1.TEXT=DATA1.RECORDSET.fields("data")
Tout se passe très bien si je met cela dans un command_click .
Par contre , si je le met dans un CALENDAR_CLICK , ca ne marche plus , commande with truc pas definit .
Avez vous une solution a mon petit probleme car la , je suis obligé de passer par un bouton pour lire ma base , et en fait j'aimerais le faire des le form_load .
Bilo100 : Webmaster on HTTP://www.bilo1000.com
salut
j'utilise cette façon......qui fonctionne
en debut de form apres (option explicite)
et à condition qu'il y ait un DATA sur ta feuille
dim db as database
dim rs as recordset
dans form load ou activate ou un bouton
Set db = OpenDatabase(chemin + "" + NomDe TaBase+ ".mdb")
Set rs = db.OpenRecordset("Nom de la table", dbOpenDynaset)
Do Until rs.EOF
text1.text = rs.fields(nom du champ)
rs.MoveNext
Loop
bon prog
joflo
Réponse au message :
-------------------------------
Bonjour ,
Pour lire les données d'une base acces , j'utilise le code donné sur ce site :
TEXT1.TEXT=DATA1.RECORDSET.fields("data")
Tout se passe très bien si je met cela dans un command_click .
Par contre , si je le met dans un CALENDAR_CLICK , ca ne marche plus , commande with truc pas definit .
Avez vous une solution a mon petit probleme car la , je suis obligé de passer par un bouton pour lire ma base , et en fait j'aimerais le faire des le form_load .
Bilo100 : Webmaster on HTTP://www.bilo1000.com
salut
j'utilise cette façon......qui fonctionne
en debut de form apres (option explicite)
et à condition qu'il y ait un DATA sur ta feuille
dim db as database
dim rs as recordset
dans form load ou activate ou un bouton
Set db = OpenDatabase(chemin + "" + NomDe TaBase+ ".mdb")
Set rs = db.OpenRecordset("Nom de la table", dbOpenDynaset)
Do Until rs.EOF
text1.text = rs.fields(nom du champ)
rs.MoveNext
Loop
bon prog
joflo