[VB6] txtbox Index et Access

Version imprimable

bonjour ,
j ai une base access avec une colonne Quantite et des ligne J 0 , J 1, J 2

Sur une form 3 txtbox indexe
txt_Q
txt_Q(1)
txt_Q(2)

je voudrais recupere les valeures quantites de ma base
txt_Q = J0
txt_Q(1)=J1...
Code:

1 2 3 4 5 6 7 8 9 10 11 12 Private Sub t_Qte_Change(Index As Integer) 'GESTION DES QUANTITE Dim temp As String For Index = 1 To 2 temp = Index With Adodc1.Recordset .MoveFirst .Find "num = '" & temp & "'" End With Next Index End Sub
merci d avance

10/11/2006, 13h50
VARACH

en gros je souhaiterai que
t_qte(x)= resultat dans la ligne x
10/11/2006, 14h23
khany

Une boucle sur tes lignes dont l'index correspondrait à tes textboxes !
10/11/2006, 15h36
VARACH

Citation:

Envoyé par khany

Une boucle sur tes lignes dont l'index correspondrait à tes textboxes !

Merci pour ta reponse mais je ne pige pas . j ai beau chercher partout .je suis peut etre sur la mauvaise piste
11/11/2006, 19h18
avigeilpro

Juste une petite indication, ta variable temp ne sert à rien, VB convertie automatiquement les numériques en text et vis-et-vers si cela est possible, sinon il génère une erreur ;) . Et le code que tu as mis ne fonctionne pas ??
12/11/2006, 09h11
VARACH

Citation:

Envoyé par avigeilpro

Juste une petite indication, ta variable temp ne sert à rien, VB convertie automatiquement les numériques en text et vis-et-vers si cela est possible, sinon il génère une erreur ;) . Et le code que tu as mis ne fonctionne pas ??

Bjs .
Merci pour ton aide , j ai enleve la variable temp .
non le code ne marche pas il me met le resultat de la ligne 2 dans mes 2 txtbox ..

snif ..

merci encore de ton aide
12/11/2006, 09h27
SfJ5Rpw8

mais comment sont remplis tes deux text box ...? il n'y as rien dans ton code qui nous le dis non ..?
12/11/2006, 09h35
VARACH

Citation:

Envoyé par bbil

mais comment sont remplis tes deux text box ...? il n'y as rien dans ton code qui nous le dis non ..?

Bjs ..
mon groupe de text bos est lie a un ADODC et pointe la colonne "Q" de ma base access
12/11/2006, 09h49
SfJ5Rpw8

donc tu n'affiche que l'enregistrement courant non ..?
12/11/2006, 09h52
VARACH

Citation:

Envoyé par bbil

donc tu n'affiche que l'enregistrement courant non ..?

oui je pense ...
je t avoue que je suis un peu pomme la ...

c est la premiere fois que j utilise un "groupe" mais la j ai 35 txtbox lie a "Q"
12/11/2006, 09h59
VARACH

Je vais vous exposer ce que je cherche a faire .

Je doit faire un planning de conditionnement ..

J ai donc un form avec

T_cde lie a un ADODC .. table semaine0 colonne Cde
T_Cde(0) ..........................................................
.
.
T-Cde(34).....................................................

T_Q lie au meme adodc .. table semaine0 colonne Q
T_Q(0)............................................................
T_Q(34).........................................................

Dans ma table access j ai un idex qui va de 0 à 34 ..

je souhaite lie mes Textbox a ces valeurs .. que t_cde soit lie a la valeur cde de l index 0 de ma table ....t_cde(0) a la valeur de l index 1 de ma table ainsi de suite ..

je suis peut etre sur une mauvaise piste ..

merci d avance

Bonjour j en suis la ...
Code:

1 2 3 4 5 6 7 8 9 10 Private Sub Command1_Click() ' POUR TEST For I = 0 To 1 With Adodc1.Recordset .MoveFirst .Find "Num = '" & I & "' " End With Text = Adodc1.Recordset.Fields("quantite") t_Qte(I) = Text Next I End Sub
a chaque tour text prend bien la valeur Q lie a l index I mais impossible de renvoyer cette valeur a t_Qte(i)

merci d avance

Yann

Ca marche mais j ai recreer mes label sans modifier leur nom