D'une table à un tableau... Je ne sais pas faire !!!
4 réponses
Jean-Pierre LAGUERRE
Bonjour à tous !
Voici ce que je voudrais faire... et que je n'arrive pas à faire...
J'ai une table comprenant 2 champs ("FactureObjet_1_Num" et
"FactureObjet_1_Type") ;
Je voudrais, (en VB), remplir un tableau avec les valeurs de ces champs...
et je patauge !!!
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonsoir.
avant d'écrire des tas de lignes, A quoi sert ce tableau ? car pour charger ce tableau il faut lire la table ou un recordset . Alors pourquoi ne pas utiliser directement le recordset pour faire le reste au lieu de passer par un tableau ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" a écrit dans le message de news: 421a1cbf$0$312$
Bonjour à tous !
Voici ce que je voudrais faire... et que je n'arrive pas à faire...
J'ai une table comprenant 2 champs ("FactureObjet_1_Num" et "FactureObjet_1_Type") ; Je voudrais, (en VB), remplir un tableau avec les valeurs de ces champs... et je patauge !!!
Quelqu'un pourrait-il m'aider ???
Merci à l'avance pour votre aide.
Bonsoir.
avant d'écrire des tas de lignes, A quoi sert ce tableau ? car pour charger
ce tableau il faut lire la table ou un recordset . Alors pourquoi ne pas
utiliser directement le recordset pour faire le reste au lieu de passer par
un tableau ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" <c_laguer@club-internet.fr> a écrit dans le message
de news: 421a1cbf$0$312$7a628cd7@news.club-internet.fr...
Bonjour à tous !
Voici ce que je voudrais faire... et que je n'arrive pas à faire...
J'ai une table comprenant 2 champs ("FactureObjet_1_Num" et
"FactureObjet_1_Type") ;
Je voudrais, (en VB), remplir un tableau avec les valeurs de ces champs...
et je patauge !!!
avant d'écrire des tas de lignes, A quoi sert ce tableau ? car pour charger ce tableau il faut lire la table ou un recordset . Alors pourquoi ne pas utiliser directement le recordset pour faire le reste au lieu de passer par un tableau ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" a écrit dans le message de news: 421a1cbf$0$312$
Bonjour à tous !
Voici ce que je voudrais faire... et que je n'arrive pas à faire...
J'ai une table comprenant 2 champs ("FactureObjet_1_Num" et "FactureObjet_1_Type") ; Je voudrais, (en VB), remplir un tableau avec les valeurs de ces champs... et je patauge !!!
Quelqu'un pourrait-il m'aider ???
Merci à l'avance pour votre aide.
Jean-Pierre LAGUERRE
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais pas lire lire une table ou un recordset... Vous pouvez m'aider sur l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien triviales !
Jean-Pierre Laguerre
"Raymond [mvp]" a écrit dans le message news:
Bonsoir.
avant d'écrire des tas de lignes, A quoi sert ce tableau ? car pour charger
ce tableau il faut lire la table ou un recordset . Alors pourquoi ne pas utiliser directement le recordset pour faire le reste au lieu de passer par
un tableau ?
-- @+ Raymond Access MVP
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais
pas lire lire une table ou un recordset... Vous pouvez m'aider sur
l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien
triviales !
Jean-Pierre Laguerre
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message
news: OjFWRuEGFHA.4004@tk2msftngp13.phx.gbl...
Bonsoir.
avant d'écrire des tas de lignes, A quoi sert ce tableau ? car pour
charger
ce tableau il faut lire la table ou un recordset . Alors pourquoi ne pas
utiliser directement le recordset pour faire le reste au lieu de passer
par
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais pas lire lire une table ou un recordset... Vous pouvez m'aider sur l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien triviales !
Jean-Pierre Laguerre
"Raymond [mvp]" a écrit dans le message news:
Bonsoir.
avant d'écrire des tas de lignes, A quoi sert ce tableau ? car pour charger
ce tableau il faut lire la table ou un recordset . Alors pourquoi ne pas utiliser directement le recordset pour faire le reste au lieu de passer par
un tableau ?
-- @+ Raymond Access MVP
Raymond [mvp]
Bonsoir.
procédure standard pour lire une table:
Dim Db As Dao.Database Dim Rs As Dao.Recordset Dim strSql As String strSql = "Select * from table1" Set Db = CurrentDb Set Rs = Db.OpenRecordset(strSql) If Rs.BOF Then GoTo Exit_Sub Do Until Rs.EOF ' ici ta procédure de travail x = Rs.Fields("numéro") ' exemple ' ici fin de ta procédure Rs.MoveNext Loop Exit_Sub: Set Rs = Nothing Set Db = Nothing
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" a écrit dans le message de news: 421ac576$0$307$
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais pas lire lire une table ou un recordset... Vous pouvez m'aider sur l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien triviales !
Jean-Pierre Laguerre
Bonsoir.
procédure standard pour lire une table:
Dim Db As Dao.Database
Dim Rs As Dao.Recordset
Dim strSql As String
strSql = "Select * from table1"
Set Db = CurrentDb
Set Rs = Db.OpenRecordset(strSql)
If Rs.BOF Then GoTo Exit_Sub
Do Until Rs.EOF
' ici ta procédure de travail
x = Rs.Fields("numéro") ' exemple
' ici fin de ta procédure
Rs.MoveNext
Loop
Exit_Sub:
Set Rs = Nothing
Set Db = Nothing
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" <c_laguer@club-internet.fr> a écrit dans le message
de news: 421ac576$0$307$7a628cd7@news.club-internet.fr...
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne
sais
pas lire lire une table ou un recordset... Vous pouvez m'aider sur
l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien
triviales !
Dim Db As Dao.Database Dim Rs As Dao.Recordset Dim strSql As String strSql = "Select * from table1" Set Db = CurrentDb Set Rs = Db.OpenRecordset(strSql) If Rs.BOF Then GoTo Exit_Sub Do Until Rs.EOF ' ici ta procédure de travail x = Rs.Fields("numéro") ' exemple ' ici fin de ta procédure Rs.MoveNext Loop Exit_Sub: Set Rs = Nothing Set Db = Nothing
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" a écrit dans le message de news: 421ac576$0$307$
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais pas lire lire une table ou un recordset... Vous pouvez m'aider sur l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien triviales !
Jean-Pierre Laguerre
Jean-Pierre LAGUERRE
Merci beaucoup !!! C'est exactement ce que je cherchais !!!
Jean-Pierre Laguerre
"Raymond [mvp]" a écrit dans le message news:
Bonsoir.
procédure standard pour lire une table:
Dim Db As Dao.Database Dim Rs As Dao.Recordset Dim strSql As String strSql = "Select * from table1" Set Db = CurrentDb Set Rs = Db.OpenRecordset(strSql) If Rs.BOF Then GoTo Exit_Sub Do Until Rs.EOF ' ici ta procédure de travail x = Rs.Fields("numéro") ' exemple ' ici fin de ta procédure Rs.MoveNext Loop Exit_Sub: Set Rs = Nothing Set Db = Nothing
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" a écrit dans le message de news: 421ac576$0$307$
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais pas lire lire une table ou un recordset... Vous pouvez m'aider sur l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien triviales !
Jean-Pierre Laguerre
Merci beaucoup !!! C'est exactement ce que je cherchais !!!
Jean-Pierre Laguerre
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message
news: OqbiDcRGFHA.1084@tk2msftngp13.phx.gbl...
Bonsoir.
procédure standard pour lire une table:
Dim Db As Dao.Database
Dim Rs As Dao.Recordset
Dim strSql As String
strSql = "Select * from table1"
Set Db = CurrentDb
Set Rs = Db.OpenRecordset(strSql)
If Rs.BOF Then GoTo Exit_Sub
Do Until Rs.EOF
' ici ta procédure de travail
x = Rs.Fields("numéro") ' exemple
' ici fin de ta procédure
Rs.MoveNext
Loop
Exit_Sub:
Set Rs = Nothing
Set Db = Nothing
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" <c_laguer@club-internet.fr> a écrit dans le message
de news: 421ac576$0$307$7a628cd7@news.club-internet.fr...
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne
sais
pas lire lire une table ou un recordset... Vous pouvez m'aider sur
l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien
triviales !
Merci beaucoup !!! C'est exactement ce que je cherchais !!!
Jean-Pierre Laguerre
"Raymond [mvp]" a écrit dans le message news:
Bonsoir.
procédure standard pour lire une table:
Dim Db As Dao.Database Dim Rs As Dao.Recordset Dim strSql As String strSql = "Select * from table1" Set Db = CurrentDb Set Rs = Db.OpenRecordset(strSql) If Rs.BOF Then GoTo Exit_Sub Do Until Rs.EOF ' ici ta procédure de travail x = Rs.Fields("numéro") ' exemple ' ici fin de ta procédure Rs.MoveNext Loop Exit_Sub: Set Rs = Nothing Set Db = Nothing
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Pierre LAGUERRE" a écrit dans le message de news: 421ac576$0$307$
Bonjour, et merci pour la réponse
La solution du tableau n'est pas très pertinente, sûrement, mais je ne sais pas lire lire une table ou un recordset... Vous pouvez m'aider sur l'utilisation d'un recordset, ou le sujet est-il trop vaste ?
Merci de votre intérêt pour des questions qui doivent vous sembler bien triviales !
