Hallo!
Das ist ein allgemeines VBScript-Problem:
Durch "pro = 75" wird die Variable zwar als Variant aber mit dem
Untertyp Integer definiert. VBScript erwartet also f�r "pro" einen
Integer-Wert und rundet alle Operationen entsprechend.
L�sung:
Durch "pro = 75#" wird die Variable mit dem Untertyp Double definiert.
Jetzt wird im Folgenden auch richtig gerechnet.
Allerdings m�sste es bei Deinem Beispielcode funktionieren, da Du ja die
Werte aus der Datenbank nicht direkt der Variablen "pro" zuweist. Kann
es sein, dass Dein Beispielcode nicht exakt dem entspricht, den Du
verwendet hast, als der Fehler auftrat? Wenn doch, dann macht VBScript
noch mehr "falsch" als dokumentiert ist.
Allerdings benutze ich zur Sicherheit immer eine explizite
Typumwandlung, also in Deinem Fall:
If rs1.Fields("i").Value < rs1.Fields("f").Value then pro = 0# else pro
= 75#
Pro = cdbl(rs1.Fields("f").Value) - cdbl(rs1.Fields("i").Value)
Freundliche Gr��e
Joachim van de Bruck
| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
