begin process at 2010 03 22 03:42:58
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Visual Basic & VB.NET

 > 

Archives Visual Basic

 > 

Bases de données

 > 

comment faire une boucle avec integrateurs et record! ?


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

comment faire une boucle avec integrateurs et record! ?

lundi 10 octobre 2005 à 11:32:05 | comment faire une boucle avec integrateurs et record! ?

beber00

Bonjour, je cherche a rentrer dans ma listbox les données de 6colonnes (JuryUV1, JuryUV2, ... ,JuryUV6)

Voici mon code

For i = 1 To 6
    LstJury.AddItem record!juryUV & i
    record.MoveNext
Next i

Malheureusement, juryUV & i n'est pas compris par la fonction record!

comment faire?

Merci d'avance
lundi 10 octobre 2005 à 12:11:26 | Re : comment faire une boucle avec integrateurs et record! ?

pcpt

Administrateur CodeS-SourceS
salut

essai ceci :


Dim ColName as String
For i = 1 To 6
   ColName = "JuryUV" & i
   LstJury.AddItem Record!ColName
   Record.MoveNext
Next i


nb : attention à la casse
PCPT
lundi 10 octobre 2005 à 13:07:34 | Re : comment faire une boucle avec integrateurs et record! ?

beber00

Merci pour cet exemple mais j'avais deja essayé et ca ne marche pas il ne comprend ce que represente ColName

A l'aide!!!!!!!!!!!!!!!

lundi 10 octobre 2005 à 19:20:38 | Re : comment faire une boucle avec integrateurs et record! ?

CanisLupus

Membre Club Administrateur CodeS-SourceS
Salut, c'est du vba ou du vb ?
Si c'est du vba, une méthode est de remplir un tableau puis :

LstJury.columncount= lenombredecolonnes
LstJury.list = letableau
...

Voir : [ Lien ]

Si c'est du vb, vois du côté listview, plein d'exemples sur vbfrance.

-------------------------------------------------
Dresseur de puces, .... normal pour un loup  !?
mardi 11 octobre 2005 à 15:49:15 | Re : comment faire une boucle avec integrateurs et record! ?

beber00

Salut, c'est du VB!!

J'ai regardé le control listView mais j'en arrive au meme resultat il ne comprend pas ce qu'est

record!JuryUV & i

je reprends mon code:

Je me place sur un record avec une requete SQL su ce record axiste JuryUV1, JuryUV2, ..., JuryUV6

Dim ColName as String
For i = 1 To 6
   ColName = "JuryUV" & i
   LstJury.AddItem Record!ColName
Next i


dans ce cas il ne comprend pas ColName comme une entité de la base de données mais comme record!JuryUV1 et ainsi de suite jusqu'à 6

Je ne vois pas du tout comment faire

mardi 11 octobre 2005 à 16:24:16 | Re : comment faire une boucle avec integrateurs et record! ?

pcpt

Administrateur CodeS-SourceS

dit, tu ne confondrais pas (à tout hasard) l'entête de ta ListView avec les champs de ta base

essai, séparément, de récupérer juste le premier champs (de ta base ) dans uen TxtBox, et copi ici le code (désolé, j'utilise ADO3.6, c'est pas les mêmes syntaxes), et j'essayerai de voir....

ps : "Record" est bien une variable déclarée en RecordSet, n'est-ce pas?!!!

PCPT

mercredi 12 octobre 2005 à 12:18:35 | Re : comment faire une boucle avec integrateurs et record! ?

beber00

record est bien declaré comme recordset

je t'explique:

J'ai dans ma table 6 colonnes juryUV qui peuvent etre vide ou non

mon record ne concerne qu'une ligne de la table. je voudrais pouvoir afficher les données de mes 6 colonnes dans une liste de cette maniere

juryUV1
juryUV2
JuryUV3
....
JuryUV6

je pourrais le faire de cette maniere

LstJury.addItem record!JuryUV1
LstJury.addItem record!JuryUV2
LstJury.addItem record!JuryUV3
LstJury.addItem record!JuryUV4
LstJury.addItem record!JuryUV5
LstJury.addItem record!JuryUV6

Mais si une des entitésJuryUV est vide alors il ne comprend pas que la valeur record! est vide
Ainsi je veux faire une boucle sur i ( de 1 à 6) avec à l'interieur une condition sur la valeur du record! (vide ou non)

J'espere que je suis assez claire
mercredi 12 octobre 2005 à 13:06:43 | Re : comment faire une boucle avec integrateurs et record! ?

pcpt

Administrateur CodeS-SourceS
ok, je comprend.

tu donnes l'exemple de LstJury.addItem record!JuryUV4
c'est la bonne syntaxe? (pas de guillemet, etc....) testé?

si oui, à tout hasard, essaie :

Dim ColName as String, i as integer
i = 4: ColName = "JuryUV" & i
LstJury.AddItem (Record!"" & cstr(ColName))

PCPT
mercredi 12 octobre 2005 à 14:14:17 | Re : comment faire une boucle avec integrateurs et record! ?

beber00

LstJury.addItem record!JuryUV4

Cette syntaxe est celle qui marche j'en suis sur à 100%

J'ai essayé ton idée mais il n'accepte pas la ligne de code

LstJury.AddItem (Record!"" & cstr(ColName))

VB6 n'accepte pas les guillemets apres un record!
mercredi 12 octobre 2005 à 14:53:45 | Re : comment faire une boucle avec integrateurs et record! ?

pcpt

Administrateur CodeS-SourceS
ok.
en ADO, la syntaxe aurait été rs("JuryUV" & i)
désolé. je ne te suis d'aucun secours
PCPT

1 2

Cette discussion est classée dans : boucle, record, integrateurs, juryuv


Répondre à ce message

Sujets en rapport avec ce message

DBGrid : Mise en couleurs des rows [ par Domino ] Ce que j'ai actuellement :Un DbGrid relié à un Contrôle Data.Cela permet de récupérer un record, et de le traiter, c'est bien mais c'est peu.Ce que j' Recommencer un bouble a un endroit donné [ par jack ] Comment puis faire pour recommencer une boucle dans un fichier a l'endroit ou celle ci c'est terminée?J'ai la position de la fin grace a instr() et je cycles processeurs [ par whrein ] Mon problême est de savoir si mon programme prend le maximum decycle process qu'il peut ou si il laisse la main pour la reprendre lorsd'un evenement Tache de fond [ par whrein ] Mon problême est de savoir si mon programme laisse la main pourla reprendre lors d'un evenement type " changement de l'heure " ( seconde suivante) Le Boucle [ par Chuck ] Existe-t-il une boucle que n'utilise pas de variables.----------------------------------------For i = 1 to 5Next'Cette Boucle utilise une variable i-- Jouer des fichiers MP en boucle avec MciSendString [ par touil ] Je voudrais savoir comment jouer des fichiers MP3 en boucle ou tout simplement comment détecter la fin d'un fichier mp3 qui vient d'être joué, sachant Probleme de macro en boucle [ par angel ] Bonjour,Je suis en train de réaliser une macro qui aura pour but de figer des valeurs obtenues par liaisons, seulement tout mon tableau est figé(elle Probleme de boucle if...then [ par kiler ] J'ai ecrit cette boucle et VB me dit qu'elle a un défaut.Povez-vous me dire pour quelle raison?MerciPrivate Sub Command_terminer_Click() If Text_tr Boucle For et concaténation [ par Vinie ] Bonjour,J'ai dans une page un select1 qui contient plusieurs options choisies à partir d'un select2, tout ça étant contenu dans un FORM et envoyé à un


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,390 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales