<%@ LANGUAGE = "VBScript"

ENABLESESSIONSTATE = False %>

<%

'Here we request the numeric percentages(%) of

'discount, ie: 2, 5, 10, 20, etc.:

percent_discount = "10"

'For multiplication, let's see if we need to

'add a zero after the decimal:

If Len(percent_discount) > 1 Then pd = "."&percent_discount&"" Else pd = ".0"&percent_discount&""

%>

<%

normal_cost = "50"

discounted_cost = normal_cost - (normal_cost * pd)

%>

Normal Cost: <%=FormatCurrency(normal_cost)%>

Discounted Cost: <%=FormatCurrency(discounted_cost)%>