VBscript : chaine de caractere
Résolu
chguignard
Messages postés
4
Date d'inscription
Statut
Membre
Dernière intervention
-
chguignard -
chguignard -
A voir également:
- VBscript : chaine de caractere
- Shutdown en vbscript - Forum VB / VBA
- Problème d'InputBox en VBScript ✓ - Forum VB / VBA
- [VBScript] Exécution automatique ✓ - Forum VB / VBA
- [PHP] Exécution d'un VBScript ✓ - Forum PHP
- [VBScript] numéro de semaine ✓ - Forum VB / VBA
2 réponses
Salut,
Je sais bien que la question date un peu, mais la discussion reste non résolue.
C'est en forgeant qu'on devient forgeron.
Au revoir.
Je sais bien que la question date un peu, mais la discussion reste non résolue.
Dim fs, a, retstring
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("gedoac.log", 1, False)
Do While a.AtEndOfStream <> True
retstring = a.ReadLine
substr=instr(retstring,"CODE_RETOUR=")
if substr>0 then
signcod=instr(retstring,"=")
valcod=Mid(retstring,signcod+1)
msgbox "valeur du code retour recherché : " & valcod
end if
Loop
a.Close
msgbox "Terminé"
C'est en forgeant qu'on devient forgeron.
Au revoir.
