ASP Source Code

ASP File: deposit.asp

 
   ASP Script
   Comments
   HTML and Text

<%@language=jscript%>
<HTML>
<BODY>
<%
var accountmanager
var account
var name
var password
var deposit
name =Request("name")
password=Request("password")
deposit=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( deposit != "" ){
         a = account.deposit(parseFloat(deposit))
    }else{
         Response.Write("No dollar is to deposit")
    }
    Response.Write("Deposit successfully,now the current balance is $" + account.balance())
}
%>

</BODY>
</HTML>