Log.Message avec donnée de type "Signed 64-bit integer"

Salut à tous,

utilisant un logiciel d'automatisation de tests se nommant TestComplete, j'utilise le VBScript comme langage de programmation.

Dans mes résultats de tests (Logs), j'ai la possibilité depuis un script de tracer dans le log la valeur d'une donnée :

Code:

---

Log.Message(Data)

---

et je voudrais savoir comment afficher dans ce log, une données de type "Signed 64-bit integer" ?

Je vous remercie par avance.

Christophe

bonjour,
petit souci, VBS ne connait qu'un type de données le type variant qui présente différents sous-types
Parmi les sous-types numériques, seuls double et currency sont des valeurs 64bits
le premier est un nombre IEEEE à virgule flottante :aie:
le second est bien un entier signé mais avec un formatage à virgule fixe (4 digits)... :aie:
alors, soit tu peux formater data sous la forme CCur(data) * 10000,
soit les auteurs de testComplete ont prévu une fonction de format du style
FormatInt64(data) capable de renvoyer la valeur sous la forme d'une chaine,
soit la conversion est auto mais ça ne doit pas être le cas sinon tu ne serais pas ici :mrgreen:

Salut à tous,

désolé mais le problème ne venait pas de l'affichage de ma donnée dans le log car la conversion est bien auto comme le dit omen999.

Lorsque je récupère la donnée data dans le log, celle ci s'affiche comme un Signed 64-bit integer et sa valeur est 12884901888.

Au final, je souhaiterai dans mon test faire :

Code:

---

1 2 3 4 5 6 7

myvar = 12884901888   If (data = myvar) Then ... Else ... End If

---

Le problème est que je ne sais pas comment déclarer cette variable myvar comme étant un Signed 64-bit integer donc au final mon "If ... End If" ne marche pas :cry:

une solution ?

et que t'affiche le code suivant ?

Code:

---

MsgBox VarType(data)

---

8 ?

Code:

---

MsgBox VarType(data)

---

m'affiche 20 donc Signed 64-bit integer...


Je suis arrivé à aller un peu plus loin dans ce que je souhaite faire car maintenant j'arrive à faire mon "If...End If"

en fait, j'ai fait

Code:

---

1 2 3 4 5 6 7

myvar = 12884901888   If (CurrencyToStr(data) = CurrencyToStr(myvar)) Then ... Else ... End If

---

par contre mon CurrencyToStr(data) vaut 12 884 901 888,00 € donc est-il possible de le formater autrement pour qu'il s'affiche correctement dans mon log ?

Salut à tous,

c'est bon, j'ai trouvé et encore merci à omen999, voilà ce que je fais :

Code:

---

1 2 3 4 5

If (CCur(data) = CCur(myvar)) Then ... Else ... End If

---

A+