<%
exchangerate = .8
canrate = 1.00
function cur(amn)
cur = "$" & FormatNumber(amn * exchangerate)
end function
function cancur(amn)
cancur = FormatNumber(amn * canrate)
end function
function IIfVr(theExp,theTrue,theFalse)
if theExp then IIfVr=theTrue else IIfVr=theFalse
end function
%>
The above batteries will have different model numbers on the product pages since they are after market replacement batteries which are as good or better than the originals. Survey Equipment Home Page