<HTML>
<BODY>
<%
var accountmanager
var account
var name
var password
var withdraw
name =Request("name")
password=Request("password")
withdraw=Request("dollar")
accountmanager =Server.CreateObject("BankManager")
account =accountmanager.open( name, password)
if( account ==null){
Response.Write("Password or user name error, Please try back
before and try again")
}
else
if( withdraw != "")
a = account.withdraw(parseFloat(withdraw))
else
Response.Write("No dollar is to withdraw")
if( a==-1.0 )
Response.Write("This is more than the current balance
of $" + account.balance())
else
Response.Write("Withdraw successfully,now the current
balance is $" + account.balance())
%>
</BODY>
</HTML>