<%@ Language=VBScript %>

' set checking on so that we have to dimension our variables before we can use them
Option Explicit

' dimension our variables first
dim amount, rate, value

' get the values passed from the form
amount = Request("amount")
rate = Request("exchangerate")

'calculate the amount in the new currency
value = amount * rate
<TITLE>Currency Converter</TITLE>
You entered <%=amount%>.<br>
The converted amount is <%=value%>.