Bonjour Tous le monde,
s'il vous plait , comment on peux lire une table access ligne par ligne qui contient une seule colonne ?
Merci
Bonjour Tous le monde,
s'il vous plait , comment on peux lire une table access ligne par ligne qui contient une seule colonne ?
Merci
Bonjour,
Un peu de DAO ? :
Pour plus d'info regardes ici.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Dim oRst as DAO.Recordset Dim oDb as DAO.Database Set oDb=CurrentDb Set oRst=oDb.OpenRecordset("SELECT NumClient FROM Client") If oRst.EOF = true then oRst.MoveFirst While oRst.EOF = false Msgbox oRst.Fields(0).Value oRst.MoveNext Loop 'Libération des objets oRst.Close oDb.Close Set oRst=Nothing Set oDb=Nothing
bonjour ,
à l'intérieur de la boucle comment je peut stoker un champ dans une chaine de caractére ?
Bonjour
C'est-à-dire ? Tu peux préciser ?stoker un champ dans une chaine de caractére
titi95
voilà mon programme , il lit une table access et stoke le champ LINE dans une chaine de caractére, qu'il va la traiter par plusieurs fonction aprés , le probléme qui me génére des erreurs Argument ou appel de procedure incorrect
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Dim oRst As Recordset Dim SATZ As String Set oRst = DB.OpenRecordset("SELECT LINE FROM MAQ_TEST_TAB") If oRst.EOF = True Then oRst.MoveFirst While oRst.EOF = False SATZ= oRst.Fields(0).Value 'traitement de SATZ par plusieurs procedures oRst.MoveNext Wend 'Libération des objets oRst.Close
Juste à chaud comme ça :
- tu n'as pas initialisé DB
- tu n'as pas de End If
- Il me semble que ta boucle If est fausse, oRst.EOF = False plutot que True
- Enfin si SATZ est un string alors j'enlèverais le .Value
Db est declaré
le if ne necessaite pas de end if dans ce cas
![]()
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager