Hi everyone. This is my first time posting anything here. I am new to script too. Currently I work on an loan calculator. Seems like everything is fine except seeing an Microsoft VBScript runtime error '800a0006' “Overflow” error on the initial page load. However the calculator works fine. The error was caused by the Formula:

Tax = Tax/100
APRRate = IntRate/100
Rate = APRRate/12

Total = Round((Price-Rebate-DownPay) * (1+Tax))

Term_Value = Round(Total*Rate/(1-(1+Rate)^(-Term)))

I tried to change Round to Clng, but nothing improved. base on this error, What action I should take to eliminate this error.

Thank you in advance for any suggestion.

It would be helpful to know what values are actually contained in each of your variables.
Overflow occurs when you attempt to put a value into a variable that is too large for the variable.
It is unclear from your code how this could be happening.
However - you could get the Divide by Zero error easily enough.

The Clng would easily get the Overflow error in your scenario, but not the round - round accepts a huge floating point number that you are unlikely to be coming even close to with a loan calculator.

Woody Z http://www.learntoprogramnow.com

Thanks for your quick response.
all value are come from the FORM. the more detail is below:
Dim Price,Rebate,DownPay,Tax,IntRate
Dim Total,Rate,TermP,APRRate

Price = Request("AutoPrice")
Rebate = Request("DRebate")
DownPay = Request("DownPayment")
Tax = Request("SaleTax")
IntRate = Request("InterestRate")

Tax = Tax/100
APRRate = IntRate/100
Rate = APRRate/12

Total = Round((Price-Rebate-DownPay) * (1+Tax))

dim Term_Value
    Term_Value = Round(Total*Rate/(1-(1+Rate)^(-Term)))

I already made sure no 0 value entered into the certain FORM area to avoid the dividing 0's issue. Couldn't figured out which part out of track.

It would probably be a good thing to break down the values used in the Round call into their own variables so you can "response.write" the values out to see what values you are operating on.

dim varDividend
dim varDivisor
varDividend = Total*Rate
varDivisor = 1-(1+Rate)^(-Term)

You can then response.write these two values out to see if they are as expected. Hopefully, this will help narrow things down.

Another exercise is to attempt to cause an Overflow in a simple page with just the code you are experimenting with so you can see what conditions cause this error to be raised.

Woody Z http://www.learntoprogramnow.com

Thanks a lot. I will try the method you suggested.

Thanks for your nicely help. Problem solved. I added a If condition to make sure that the varDivisor<>0, then the error disappeared.
Thank you once again.

Excellent! Thanks for letting us know the solution, that is fantastic!


Woody Z http://www.learntoprogramnow.com