Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Bug ASP/VBScript??

11 réponses
Avatar
Francis Spiesser
Salut à tous,

Je viens de tomber sur un cas des plus étranges...
Que donne chez vous le code :

<%
Dim nPrix

nPrix=19.90

Response.Write (nPrix*100)
Response.Write(" != ")
Response.Write(Int(nPrix*100))
%>

Moi j'ai "1990 != 1989" ! Etonnant, non ?
Ca "marche" aussi avec 19.24 qui donne 1924 != 1923

Ca me fait pareil avec Fix au lieu de Int, avec 100.00 au lieu de 100.
Le seul moyen que j'ai trouvé, c'est de faire :

Response.Write (nPrix*100)
Response.Write(" = ")
Response.Write(Int((nPrix+0.001)*100)), histoire que le Int aie quelque
chose à "INTer"... Mais c'est quand même dingue (et très inquiétant !)

Problème constaté sur Windows XP et sur Windows server 2003...

Et vous ?


FU2 microsoft.public.fr.scripting

--

------------------------------
Francis
(remplacer .nospam par .net dans mon adresse pour me répondre
directement)

"Quand tout baigne, il y a forcément quelque chose qui va couler"

1 réponse

1 2
Avatar
Christophe KERHOUSSE
Cast ta variable !

<%
Dim nPrix

nPrixÌur(19.23)

Response.Write (nPrix*100)
Response.Write(" != ")
Response.Write(Int(nPrix*100))
%>

"Francis Spiesser" a écrit dans le
message de news:
Salut à tous,

Je viens de tomber sur un cas des plus étranges...
Que donne chez vous le code :

<%
Dim nPrix

nPrix.90

Response.Write (nPrix*100)
Response.Write(" != ")
Response.Write(Int(nPrix*100))
%>

Moi j'ai "1990 != 1989" ! Etonnant, non ?
Ca "marche" aussi avec 19.24 qui donne 1924 != 1923

Ca me fait pareil avec Fix au lieu de Int, avec 100.00 au lieu de 100.
Le seul moyen que j'ai trouvé, c'est de faire :

Response.Write (nPrix*100)
Response.Write(" = ")
Response.Write(Int((nPrix+0.001)*100)), histoire que le Int aie quelque
chose à "INTer"... Mais c'est quand même dingue (et très inquiétant !)

Problème constaté sur Windows XP et sur Windows server 2003...

Et vous ?


FU2 microsoft.public.fr.scripting

--

------------------------------
Francis
(remplacer .nospam par .net dans mon adresse pour me répondre
directement)

"Quand tout baigne, il y a forcément quelque chose qui va couler"



1 2