ft8pb
Messages postés10Date d'inscriptionsamedi 9 juillet 2005StatutMembreDernière intervention26 juillet 2007
-
26 juil. 2007 à 10:15
ft8pb
Messages postés10Date d'inscriptionsamedi 9 juillet 2005StatutMembreDernière intervention26 juillet 2007
-
26 juil. 2007 à 17:59
Voila mon problème:
Je précise que je travaille en VB Script
Je crée des tableaux d'utilisateurs et la j'ai donc 2 utilisateurs. je veux faire une boucle pour faire des traitements en fonction du nombre d'utilisateurs donc jusque la pas de souci mais lorsque je concatène User avec compteur(variable UserNum), ce qui me donne bien User1 ou User2, je n'accede pas a mes élement du tableau lorsque je fais UserNum(0) pourtant quand j'affiche UseNum tout seul, j'ai bien User1 dedans.
Avez vous une idée?
ft8pb
Messages postés10Date d'inscriptionsamedi 9 juillet 2005StatutMembreDernière intervention26 juillet 2007 26 juil. 2007 à 10:38
Pourrais-tu m'en dire plus sur le tableau à 2 dimemsion ssur la manière de m'y prendre parce que vu qu'avec un, ca ne marche, je ne vois pas ce que l'on fait de plus avec un a à 2 dimension
ft8pb
Messages postés10Date d'inscriptionsamedi 9 juillet 2005StatutMembreDernière intervention26 juillet 2007 26 juil. 2007 à 11:12
La j'ai tout compacté pour faire plus simple mais normalement,.
En fait dans un fichier texte je met le nombre d'utilisateur NombreUtilisateur et je rempli des tableau pour chacun (UserX) (utilisateur.txt) et apres dans un script je vais lire ce fichier texte et en fonction du nombre d'utilisateur rempli dans le fichier texte, je fais un traitement sur chacun des utilisateurs. toujours identique.
Par la suite, je serai surement amener a saisir d'autre utilisateur dans ce fichier texte, donc j'aurai qua incrémenter ma constante NombreUtilisateur et faire des tableau pour chaque nouveau. mais j'ai un souci pour le traitement automatique dans mon script avec les tableau d'user....
ft8pb
Messages postés10Date d'inscriptionsamedi 9 juillet 2005StatutMembreDernière intervention26 juillet 2007 26 juil. 2007 à 11:15
j'avais pa vu la réponse de Renfield mais oui c'est cela. je fais cela pour pas avoir un nombre fixe d'utilisateur mais que cela soit modulable en fonction de mes besoins.
Set objFso = Createobject("Scripting.FileSystemObject")
Set objFile = objFso.OpenTextFile(cFile)
Set objDicoUsers = CreateObject("Scripting.Dictionary")
cpt = 0
Do while not objFile.AtEndOfStream
strTablNom=Split(objFile.ReadAll , vbCr)
For i = LBound(strTablNom) To UBound(strTablNom) -1
objDicoUsers.Add "User" & cpt, strTablNom(cpt) : cpt=cpt+1
Next
Loop
objFile.Close
For k = 0 To objDicoUsers.Count-1
MsgBox "k=" & k &vbCr& oDicoKeys(k) &vbCr& oDicoItems(k),,"verif Dictionnaire"
If k = objDicoUsers.Count-2 Then Exit For
Next
Set objFso = Nothing
Set objFile = Nothing
Set objDicoUsers = Nothing
ft8pb
Messages postés10Date d'inscriptionsamedi 9 juillet 2005StatutMembreDernière intervention26 juillet 2007 26 juil. 2007 à 17:59
En fait j'avais vu l'existence de ce dictionnaire et je l'ai tout simplement utilisé comme j'avais utilisé mes tableaux car lui il peut prendre des chaines de caractère sur ses clés et lorsqu'on le rapelle dans une variable cela fonctionne :)
voila ce que cela donne en gros :
'### création du dictionnaire de users
Set Users= CreateObject("Scripting.Dictionary")
'### 2 Utilisateurs à créer
Const NombreUtilisateur = 2
'###Remplissage du dictionnaire
'###Utilisateur 1
Users.add "login1","bob"
Users.add "mdp1","bob"