📄 domainbalanceisok.asp

📁 直接解压即可都是asp源码超经典的啊

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">
<body leftmargin="0" topmargin="0">
      <TABLE width=758 border=0 align="center" cellPadding=0 cellSpacing=0>
        <TBODY>
          <TR> 
            <TD vAlign=top> 
              <% user_name=session("username")
		     user_id=session("userid")
			 if user_name="" or user_id="" then
			 response.write"<div align=center class=f1>请 走 大 门 进 入！</div>"
			 else
			 savemoney=session("allmoney")
			 Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from savemoney where user_name='"& user_name &"' and user_id="& user_id &""
rs.open sql,conn,3,3
if rs.eof then
%>
              <table width="80%" border="0" align="center" cellpadding="0" cellspacing="0">
                <tr> 
                  <td><div align="center"><img src="images/acc5.gif" width="357" height="203"></div></td>
                </tr>
              </table>
              <% 
			  else
			  if rs("savemoney") < savemoney then
			  %>
              <table width="80%" border="0" align="center" cellpadding="0" cellspacing="0">
                <tr> 
                  <td><div align="center"><img src="images/acc5.gif" width="357" height="203"></div></td>
                </tr>
              </table>
              <%
			  else
			  rs("savemoney")=(rs("savemoney") - savemoney)
			  rs.update
			  newbolo="已结算"
			  typ="domain"
			  set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from domainshopping where user_name='"& user_name &"' and user_id="& user_id &" and bolo='未结算' order by id desc"
rs.open sql,conn,3,3
rs("bolo")=newbolo
rs.update
rs.close
set rs=nothing
set conn=nothing
%>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td><div align="center" class="f1">支 付 成 功！<br>
                <br>
                <span class="f2">您的域名将在24小时内生效！请注意查收您的信息。</span> </div></td>
                </tr>
              </table>
              <% end if %>
              <% end if %>
              <% end if %>
            </TD>
          </TR>
      </TABLE>
     
</body>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -