Test Egalite string (super basique)
Salut,
Je me remet à faire du VBS et du TestDirector.
Pour faire une démo à un collègue des possibilité d'automatisation de teste à L
l'aide de TestDirector et VBS, je me suis fait un script basic :
Code:
1 2 3 4 5 6 7 8 9 10
| Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Temp\test.txt", 1)
Dim ee
ee = objFile.ReadAll
If LCase(LTrim(ee)) = LCase(LTrim("OK")) Then
'CurrentRun.Status = "Failed"
CurrentRun.Status = "Passed" 'Librairie TD ne pas faire attention
Else
CurrentRun.Status = "Failed" 'Librairie TD ne pas faire attention
End If |
Dans mon fichier j'ai bien OK.
J'ai observé au débuger ma variable ee et elle contient bien OK.
Pourtant le test dégalité me renvois toujours au else. 8O
J'ai crée avec un script mon fichier et j'ai utilisé WriteLine, donc j'ai pensé au problème du retour chariot qui serait pris en compte dans le test dégalité.
Mais normalement avec LCase et Ltrim je ne devrais pas avoir ce genre de problème, non ?