📄 yh.asp

📁 宁波娱乐在线城市,丰富的内容版块
💻 ASP
字号:
<!--#include file="YHLib.asp"-->
<%

  ret = Command("400|")
  if GetPart(ret,1) <> "0" then
          ShowError 4,GetPart(ret,2)
          Response.Write("<SCRIPT>window.close()</SCRIPT>")
          Response.End
  end if
   if Request.QueryString("tag") <> "" then
     select case Request.QueryString("tag")
            case "0"                            
              buf = Command("401|"&Request.QueryString ("金钱")) 
              if GetPart(buf,1) <> 0 then
                  Response.Write("<SCRIPT>window.parent.alert('"&GetPart(buf,2)&"')</SCRIPT>")
              else
                  Response.Write ("<SCRIPT>window.parent.alert('你的钱已成功存入银行！')</SCRIPT>")
                  Response.Write ("<SCRIPT>window.parent.location.replace('yh.asp')</SCRIPT>")
              end if
          case "1"
              buf = Command("402|"&Request.QueryString ("金钱"))
              if GetPart(buf,1) <> 0 then
                  Response.Write("<SCRIPT>window.parent.alert('"&GetPart(buf,2)&"')</SCRIPT>")
              else
                  Response.Write ("<SCRIPT>window.parent.alert('你的钱已从银行中取出！')</SCRIPT>")
                  Response.Write ("<SCRIPT>window.parent.location.replace('yh.asp')</SCRIPT>")
              end if
          case "2"
              buf = Command("403|")
              if GetPart(buf,1) <> "0" then
                  Response.Write("<SCRIPT>window.parent.alert('"&GetPart(buf,2)&"')</SCRIPT>")
              else
                  Response.Write ("<SCRIPT>window.parent.alert('恭喜，贷款成功!')</SCRIPT>")
                  Response.Write ("<SCRIPT>window.parent.location.replace('yh.asp')</SCRIPT>")
              end if 
           case "3"
              buf = Command("404|")
              if GetPart(buf,1) <> 0 then
                  Response.Write("<SCRIPT>window.parent.alert('"&GetPart(buf,2)&"')</SCRIPT>")
              else
                  Response.Write ("<SCRIPT>window.parent.alert('恭喜，还款成功!')</SCRIPT>")
                  Response.Write ("<SCRIPT>window.parent.location.replace('yh.asp')</SCRIPT>")
              end if
            case "4"
               buf = Command("405|"&Request.QueryString ("昵称")&"|"&Request.QueryString ("金钱"))
              if GetPart(buf,1) <> 0 then
                  Response.Write("<SCRIPT>window.parent.alert('"&GetPart(buf,2)&"')</SCRIPT>")
              else
                  Response.Write ("<SCRIPT>window.parent.alert('恭喜，转帐成功!')</SCRIPT>")
                  Response.Write ("<SCRIPT>window.parent.location.replace('yh.asp')</SCRIPT>")
              end if
          end select
          Response.End        
      end if                      

    ini = Command("406|")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<style type="text/css">
<!--
.p9 {  font-family: "宋体"; font-size: 9pt}
.TButton {  font-family: "宋体"; font-size: 9pt;cursor:hand;HEIGHT: 22px; WIDTH: 66px}
A:link{font-size:9pt;COLOR:black;TEXT-DECORATION: none}
A:visited {font-size:9pt;COLOR:black;TEXT-DECORATION: none}
A:hover {font-size:9pt;COLOR: red; TEXT-DECORATION: underline}
-->
</style>
<title>社区银行</title>
<script ID="clientEventHandlersJS" LANGUAGE="javascript">
<!--
window.resizeTo(screen.availWidth,screen.availHeight);

function sx() {
    window.location.reload();
}

function bGB_onclick() {
    window.close ();
}

function bCR_onclick(t) {
    if (tCK.value =='') {
    window.parent.alert("请输入存款金额！");
    return(false);
    }
    iHIDE.location.replace('yh.asp?tag='+t+'&金钱='+tCK.value);
    tCK.value = '';
}

function bJC_onclick(t) {
    if (tJK.value =='') {
    window.parent.alert("请输入取款金额！");
    return(false);
    }
    iHIDE.location.replace('yh.asp?tag='+t+'&金钱='+tJK.value);
    tJK.value = '';
}

function bDK_onclick(t) {
    iHIDE.location.replace('yh.asp?tag='+t);
}

function bHD_onclick(t) {
    iHIDE.location.replace('yh.asp?tag='+t);
}

function bQD_onclick(t) {
    if (tJQ.value =='') {
    window.parent.alert ("请输入转帐的金额！");
    return(false);
    }
    if (tNC.value =='') {
    window.parent.alert ("请输入接受转帐的昵称！");
    return(false);
    }
    iHIDE.location.replace('yh.asp?tag='+t+'&金钱='+tJQ.value+'&昵称='+tNC.value);
    tJQ.value = '';
    tNC.value = '';
}

function bYHGL_onclick() {
     l = screen.width/2-360/2;
     t = screen.height/2-180/2;
     window.open('yhgl.asp','','scrollbar=no,toolbar=no,menubar=no,location=no,status=no,resizable=no,width=360,height=180,left='+l+',top='+t);
}

function tJK_onkeypress() {
    if (event.keyCode<45 || event.keyCode>57) {
        event.returnValue = false;
    } 
}

function tCK_onkeypress() {
    if (event.keyCode<45 || event.keyCode>57) {
        event.returnValue = false;
    } 
}

function tJQ_onkeypress() {
    if (event.keyCode<45 || event.keyCode>57) {
        event.returnValue = false;
    } 
}

//-->
</script>
</head>
<body bgcolor="#FFFFFF">
<p align="center"><img src="images/yh.gif" WIDTH="600" HEIGHT="60"></p>
<table border="0" cellspacing="1" cellpadding="5" align="center"  width="80%" bgcolor="#FFFFFF">
  <tr> 
    <td class="p12" height="6" bgcolor="#CDE1ED">&nbsp; </td>
  </tr>
  <tr> 
    <td class="p9" height="40" bgcolor="#F7F7F7"> 
      <p><span class="p9"><span class="p9">　你当前拥有的金钱为：<%=GetPart(ret,2)%>元　　你的银行存款为：<span class="p9"><%=GetPart(ret,3)%>元<span class="p9">　　你的银行贷款为：<span class="p9"><%=GetPart(ret,4)%>元</span></span></span></span></span></p>
    </td>
  </tr>
  <tr> 
    <td class="p9" height="40" bgcolor="#EFEFEF"><span class="p9"><span class="p9">　我要存款　</span> 
      <span class="p9"> 
      <input type="text" name="tCK" id="tCK" size="10" class="p9" LANGUAGE=javascript onkeypress="return tCK_onkeypress()">
      元</span> 
      <input type="button" name="bCR" id="bCR" value="存入" class="TButton" style="BACKGROUND-COLOR: #FFFFEF; BORDER-BOTTOM: buttonhighlight 1px solid; BORDER-LEFT: buttonhighlight 1px solid; BORDER-RIGHT: buttonhighlight 1px solid; BORDER-TOP: buttonhighlight 1px solid; COLOR: black;border-color:#999999" LANGUAGE="javascript" onclick="return bCR_onclick(0)">
      <span class="p9">　</span></span></td>
  </tr>
  <tr> 
    <td class="p9" height="40" bgcolor="#F7F7F7"><span class="p9">　我要取款　<span class="p9"> 
      <input type="text" name="tJK" id="tJK" size="10" class="p9" LANGUAGE=javascript onkeypress="return tJK_onkeypress()">
      </span>元 
      <input type="button" name="bJC" id="bJC" value="取出" class="TButton" style="BACKGROUND-COLOR: #FFFFEF; BORDER-BOTTOM: buttonhighlight 1px solid; BORDER-LEFT: buttonhighlight 1px solid; BORDER-RIGHT: buttonhighlight 1px solid; BORDER-TOP: buttonhighlight 1px solid; COLOR: black;border-color:#999999" LANGUAGE="javascript" onclick="return bJC_onclick(1)">
      </span></td>
  </tr>
  <td class="p9" height="40" bgcolor="#EFEFEF"><span class="p9">　我要转帐　<span class="p9"> 
      从我的帐户中取出 
      <input type="text" name="tJQ" id="tJQ" class="p9" size="10" LANGUAGE=javascript onkeypress="return tJQ_onkeypress()">
      元转入 
      <input type="text" name="tNC" id="tNC" class="p9" size="10">
      的帐户&nbsp; 
      <input type="button" name="bQD" value="确定" class="TButton" style="BACKGROUND-COLOR: #FFFFEF; BORDER-BOTTOM: buttonhighlight 1px solid; BORDER-LEFT: buttonhighlight 1px solid; BORDER-RIGHT: buttonhighlight 1px solid; BORDER-TOP: buttonhighlight 1px solid; COLOR: black;border-color:#999999" LANGUAGE="javascript" onclick="return bQD_onclick(4)">
      </span></span></td>
  </tr>
  <td class="p9" height="40" bgcolor="#F7F7F7"><span class="p9"> 　 
      <input type="button" id="bDK" name="bDK" value="我要贷款" class="TButton" style="BACKGROUND-COLOR: #FFFFEF; BORDER-BOTTOM: buttonhighlight 1px solid; BORDER-LEFT: buttonhighlight 1px solid; BORDER-RIGHT: buttonhighlight 1px solid; BORDER-TOP: buttonhighlight 1px solid; COLOR: black;border-color:#999999" LANGUAGE="javascript" onclick="return bDK_onclick(2)">
      <span class="p9"> </span> 　<span class="p9"> 
      <input type="button" id="bHD" name="bHD" value="我要还贷" class="TButton" style="BACKGROUND-COLOR: #FFFFEF; BORDER-BOTTOM: buttonhighlight 1px solid; BORDER-LEFT: buttonhighlight 1px solid; BORDER-RIGHT: buttonhighlight 1px solid; BORDER-TOP: buttonhighlight 1px solid; COLOR: black;border-color:#999999" LANGUAGE="javascript" onclick="return bHD_onclick(3)">
      <br>
      </span></span></td>
  </tr>
  <tr> 
    <td class="p9" height="10"> 
      <table width="100%" border="0" cellpadding="2" cellspacing="4">
        <tr class="p9"> 
          <td width="19%">　银行使用说明：</td>
          <td width="81%"><br>
            1、银行每天的存款利息为<%=GetPart(ini,2)%>‰。<br>
            2、银行为每个社区用户提供贷款机会，每次可贷款金钱<%=GetPart(ini,3)%>，并将扣除你的魅力值100，如果你的魅力值小于0，将不能贷款。在你还款的同时，将恢复你的100点魅力。<br>
            3、只有经验满<%=GetPart(ini,4)%>的会员才可使用转帐功能。
            <br>
          </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr bgcolor="#CDE1ED"> 
    <td class="p9" height="30"> 
      <div align="center">
        <% if UCase(Request.Cookies("NC")) = UCase(Application("NC")) then
               Response.Write("<input type=button name=bYHGL value=银行管理 class=TButton style='BACKGROUND-COLOR: #FFFFEF; BORDER: 1px solid black;COLOR: black' LANGUAGE=javascript onclick='return bYHGL_onclick()'>")
           end if
        %>
        <input type="button" id="bGB" name="bGB" value="关闭" class="TButton" style="BACKGROUND-COLOR: #FFFFEF; BORDER: 1px solid black;COLOR: black" LANGUAGE="javascript" onclick="return bGB_onclick()">
      </div>
    </td>
  </tr>
</table>
<%Response.Write(GetCopyright())%>
<iframe id="iHIDE" style="HEIGHT: 0px; WIDTH:0px;VISIBILITY: hidden"></iframe>
</body>
</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -