בעייה ב VBS עם הפונקציה Rnd ו Int

כתבתי תגובה בנושא הישן שלי… אבל לא עונים לי… ואני צריך את זה דחוף… (חיכיתי כבר יום שלם…)

יש לי בעייה עם הפונקציות Rnd ו Int שב VBScript….

זה כותב לי שגיאה כזאת

קוד:



Error Type:
‏‏שגיאת זמן ריצה של Microsoft VBScript (0x800A01A8)
‏‏דרוש אובייקט: '[number: 8]'







וזה כשאני מנסה להריץ את הפונקציה הזאת

קוד:

Function random()
dim max,min,rand
max=10
min=0
Randomize()
rand=Int((max-min+1)*Rnd+min)
random=rand
end Function






אני לא מבין מה הבעיה… כשהשתמשתי ב Math.Random() ו Math.Round() (ב Js) זה פעל טוב…