<%
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.