VBscript : chaine de caractere
Résolu/Fermé
chguignard
Messages postés
4
Date d'inscription
vendredi 4 août 2006
Statut
Membre
Dernière intervention
1 octobre 2010
-
27 nov. 2006 à 09:34
chguignard - 24 févr. 2008 à 09:32
chguignard - 24 févr. 2008 à 09:32
A voir également:
- VBscript : chaine de caractere
- Vbscript download - Télécharger - Édition & Programmation
- Problème avec VBScript ✓ - Forum VB / VBA
- Vbscript shutdown - Forum VB / VBA
- Microsoft VBScript - Forum Windows 7
- Pause vbscript ✓ - Forum VB / VBA
2 réponses
carbon3
Messages postés
470
Date d'inscription
mercredi 20 février 2008
Statut
Membre
Dernière intervention
6 janvier 2013
73
22 févr. 2008 à 18:02
22 févr. 2008 à 18:02
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.
