ListView
cs_David2410
Messages postés
40
Date d'inscription
mardi 20 août 2002
Statut
Membre
Dernière intervention
13 octobre 2004
-
15 janv. 2003 à 16:25
cs_David2410 Messages postés 40 Date d'inscription mardi 20 août 2002 Statut Membre Dernière intervention 13 octobre 2004 - 4 févr. 2003 à 09:52
cs_David2410 Messages postés 40 Date d'inscription mardi 20 août 2002 Statut Membre Dernière intervention 13 octobre 2004 - 4 févr. 2003 à 09:52
3 réponses
cs_PROGRAMMIX
Messages postés
1133
Date d'inscription
mercredi 2 octobre 2002
Statut
Membre
Dernière intervention
24 juillet 2011
2
15 janv. 2003 à 21:19
15 janv. 2003 à 21:19
Il faut que tu indiques la ligne que tu comptes compléter au fur et à mesure de ta boucle...
Je ne sais pas trop pour le ListView, mais pour un flexgrid cela donnerait :
Dim Ligne as integer
Ligne = 0
With MonFlexGrid
While Not .EOF
.Row = Ligne
.Text = Fields("NomUserReq")
.MoveNext
Ligne = Ligne +1
Wend
End With
Je suppose que c'est pratiquement la même chose avec un listview.
Je ne sais pas trop pour le ListView, mais pour un flexgrid cela donnerait :
Dim Ligne as integer
Ligne = 0
With MonFlexGrid
While Not .EOF
.Row = Ligne
.Text = Fields("NomUserReq")
.MoveNext
Ligne = Ligne +1
Wend
End With
Je suppose que c'est pratiquement la même chose avec un listview.
MarcoBrunelle
Messages postés
7
Date d'inscription
vendredi 13 décembre 2002
Statut
Membre
Dernière intervention
30 janvier 2003
30 janv. 2003 à 19:07
30 janv. 2003 à 19:07
Salut David,
Essaie plutot ceci:
With Recordset
While Not .EOF
Dim itmX As ListItem
Set itmX = Me.ListView1.ListItems.Add(, , .Fields("No"))
itmX.SubItems(1) = Fields("NomUserReq")
itmX.SubItems(2) = Fields("DateRappel")
.MoveNext
Wend
End With
Tiens moi au courant
Bonne chance!
Marco
Essaie plutot ceci:
With Recordset
While Not .EOF
Dim itmX As ListItem
Set itmX = Me.ListView1.ListItems.Add(, , .Fields("No"))
itmX.SubItems(1) = Fields("NomUserReq")
itmX.SubItems(2) = Fields("DateRappel")
.MoveNext
Wend
End With
Tiens moi au courant
Bonne chance!
Marco
cs_David2410
Messages postés
40
Date d'inscription
mardi 20 août 2002
Statut
Membre
Dernière intervention
13 octobre 2004
4 févr. 2003 à 09:52
4 févr. 2003 à 09:52
Ciao Marco,
Merci beaucoup pour ton aide, j'ai bien avancé grace à toi! Par contre un dernier petit détail concernant ce listview.
Lorsque j'execute mon code il n'y pas toute les enregistrements dans le listview, est-ce que cela vient que tous les champs ne sont pas saisis? Si [.fields("DateRappel")] est vide cela stoppe l'insertion des enregistrements dans le listview.
Est-ce qu'il y'a une astuce à cela ?
Merci pour ton aide.
David
Merci beaucoup pour ton aide, j'ai bien avancé grace à toi! Par contre un dernier petit détail concernant ce listview.
Lorsque j'execute mon code il n'y pas toute les enregistrements dans le listview, est-ce que cela vient que tous les champs ne sont pas saisis? Si [.fields("DateRappel")] est vide cela stoppe l'insertion des enregistrements dans le listview.
Est-ce qu'il y'a une astuce à cela ?
Merci pour ton aide.
David
