Discussion :

[Sarolion11]

Bonjour,

Je viens ici car mes connaissances en vbs sont un peu limitées.

Je dispose d'un fichier .ini construit sous la forme:
donnée=valeur
donnée=valeur
...

J'aimerai faire un split un première fois sur le retour chariot et ensuite sur le signe =.

Car en effet après cela, il me faudra faire une boucle je pense pour appeller un autre .vbs qui prends 2 paramètres, la donnée en param1 et la valeur en param2, ceci pour toutes lignes du fichier.


Merci d'avance vous m'aideriez bien

J'oubliais de mettre ce que je sais faire jusque là, splitter par =:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Const ForReading = 1
 
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Scripts\Test.ini", ForReading)
 
Do Until objFile.AtEndOfStream
    strLine = objFile.ReadLine
    arrFields = Split(strLine, "=")
 
 
objFile.Close

[omen999]

bonjour,
en résumé, tu veux savoir comment lire des valeurs stockées dans un fichier .ini
des exemples parmi beaucoup :
http://www.robvanderwoude.com/vbstech_files_ini.php
ou
https://github.com/cparker15/INIFile.vbs

[Sarolion11]

Bonjour et merci,

Non en fait c'est un peu plus que cela car j'arrive à le lire, maintenant j'aimerai splitter les infos à l'intérieur pour les exploiter en m'en servant pour appeller un autre vbs avec ces infos en paramètres.

Je crois que j'ai réussi avec le code suivant, si vous voyez des améliorations ou des erreurs n'hésitez pas merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Const ForReading = 1
Dim objShell
 
Set objShell = Wscript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Scripts\Test.ini", ForReading)
 
Do Until objFile.AtEndOfStream
    strLine = objFile.ReadLine
    arrFields = Split(strLine, "=")
objShell.Run "C:\Scripts\Testscript.vbs " & arrFields(0) & " " & arrFields(1)  
 
Set objShell = Nothing
objFile.Close

[omen999]

je suppose qu'à la ligne 13 il y aura l'instruction Loop...
si le but est de lancer un script avec la clé comme 1er paramètre et sa valeur comme 2ème paramètre, c'est tout bon
mais à la condition qu'il ne s'agisse pas d'un "vrai" fichier ini, c'est à dire ne comportant pas de noms de section entre
crochets car dans ce cas, la référence à arrFields(1) lèvera une erreur