ASP Source Code

ASP File:query.asp

 
   ASP Script
   Comments
   HTML and Text

<%@language=jscript%>
<HTML>
<BODY>
<%
var accountmanager
var account
var name
var password
name =Request("name")
password=Request("password")
Response.write(typeof(name))
Response.write(typeof(password))
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 {
     Response.Write("The current balance is $" + account.balance())
      }
%>

</BODY>
</HTML>