redeem.asp

中文bux点击站源码。配合其他站点用

<!--#include file="top.asp"-->
<!--#include file="usernavi.asp"-->
<!--#include file="chklogin.asp"-->
<%
  rs.Open "Select * From setup",Conn
  SignupBonus_Redeem = rs ("SignupBonus_Redeem")
  RedeemDescription1 = rs ("RedeemDescription1")
  RedeemDescription2 = rs ("RedeemDescription2")
  RedeemDescription3 = rs ("RedeemDescription3")
  RedeemDescription4 = rs ("RedeemDescription4")
  RedeemDescription5 = rs ("RedeemDescription5")
  RedeemDescription6 = rs ("RedeemDescription6")
  RedeemDescription7 = rs ("RedeemDescription7")
  RedeemDescription8 = rs ("RedeemDescription8")
  RedeemDescription9 = rs ("RedeemDescription9")
  RedeemDescription10 = rs ("RedeemDescription10")
  RedeemDescription11 = rs ("RedeemDescription11")
  RedeemDescription12 = rs ("RedeemDescription12")
  RedeemDescription13 = rs ("RedeemDescription13")
  RedeemDescription14 = rs ("RedeemDescription14")
  RedeemDescription15 = rs ("RedeemDescription15")
  RedeemDescription16 = rs ("RedeemDescription16")
  RedeemDescription17 = rs ("RedeemDescription17")
  RedeemDescription18 = rs ("RedeemDescription18")
  RedeemDescription19 = rs ("RedeemDescription19")
  RedeemDescription20 = rs ("RedeemDescription20")
  RedeemLimit1 = rs ("RedeemLimit1")
  RedeemLimit2 = rs ("RedeemLimit2")
  RedeemLimit3 = rs ("RedeemLimit3")
  RedeemLimit4 = rs ("RedeemLimit4")
  RedeemLimit5 = rs ("RedeemLimit5")
  RedeemLimit6 = rs ("RedeemLimit6")
  RedeemLimit7 = rs ("RedeemLimit7")
  RedeemLimit8 = rs ("RedeemLimit8")
  RedeemLimit9 = rs ("RedeemLimit9")
  RedeemLimit10 = rs ("RedeemLimit10")
  RedeemLimit11 = rs ("RedeemLimit11")
  RedeemLimit12 = rs ("RedeemLimit12")
  RedeemLimit13 = rs ("RedeemLimit13")
  RedeemLimit14 = rs ("RedeemLimit14")
  RedeemLimit15 = rs ("RedeemLimit15")
  RedeemLimit16 = rs ("RedeemLimit16")
  RedeemLimit17 = rs ("RedeemLimit17")
  RedeemLimit18 = rs ("RedeemLimit18")
  RedeemLimit19 = rs ("RedeemLimit19")
  RedeemLimit20 = rs ("RedeemLimit20")
  rs.Close
  rs.Open "Select * From member Where UserName = '" & UserName & "'",Conn
  MemberShip = rs ("MemberShip")
  SignupPoints = rs ("SignupPoints")
  Points = rs ("Points")
  Points1 = rs ("Points1")
  Points2 = rs ("Points2")
  Points3 = rs ("Points3")
  Points4 = rs ("Points4")
  Points5 = rs ("Points5")
  Points6 = rs ("Points6")
  PointsCredits = rs ("PointsCredits")
  PointsDebits = rs ("PointsDebits")
  AllPoints = SignupPoints + Points + Points1 + Points2 + Points3 + Points4 + Points5 + Points6 + PointsCredits - PointsDebits
  SignupBonus = rs ("SignupBonus")
  Dollars = rs ("Dollars")
  Dollars1 = rs ("Dollars1")
  Dollars2 = rs ("Dollars2")
  Dollars3 = rs ("Dollars3")
  Dollars4 = rs ("Dollars4")
  Dollars5 = rs ("Dollars5")
  Dollars6 = rs ("Dollars6")
  DollarsCredits = rs ("DollarsCredits")
  DollarsDebits = rs ("DollarsDebits")
  AllDollars = SignupBonus + Dollars + Dollars1 + Dollars2 + Dollars3 + Dollars4 + Dollars5 + Dollars6 + DollarsCredits - DollarsDebits
  If SignupBonus_Redeem = True Then
     AllDollars_Cashout = AllDollars
  Else
     AllDollars_Cashout = Dollars + Dollars1 + Dollars2 + Dollars3 + Dollars4 + Dollars5 + Dollars6 + DollarsCredits - DollarsDebits
  End If
  rs.Close
  rs.Open "Select * From membership Where MemberShip = " & MemberShip & "",Conn
  MemberShipCn = rs ("MemberShipCn")
  CashOut = rs ("CashOut")
  rs.Close
%>



                
                <!--webbot
                bot="HTMLMarkup" endspan -->           

<div id="contentwrapper">
<div id="maincolumn">
<div class="text">
<h2><strong>申请支付</strong></h2><br />
 <!--#include file="menu.asp"-->

<hr />
         <h2><strong>现金支付申请</strong></h2>                  
		如果您想申请支付您的现金或者使用您的点数做广告，请查看下面的支付列表。<br />
          <% = MemberShipCn %>
          会员现金支付申请(帐户余额至少需要<font color="#FF0000">
          <% = CashOut + 1 %></font>
          元)<br />
     <div align="left"><div id="form">
<fieldset><table width="100%">  <tr><td> 
		<form method="post" action="cashout.asp">
          
            <div align="right">
              <input type="hidden" name="AllDollars" value="<% = AllDollars_Cashout %>" />
              
              <%
             If AllDollars_Cashout >= CashOut And AllDollars_Cashout > 1 Then 
          %>
              <input type="submit" value="现金支付申请" name="Button0" />
              
              <% Else %>
              <input type="submit" value="现金支付申请" name="Button0" disabled="disabled" />
              <%
            End If 
          %>
            </div>
		</form></td></tr>
      </table></fieldset></div></div>
       
        <h2><strong>广告兑换申请</strong></h2>
<p>如果您的帐户内有足够的现金或金币，您可以选择下面的广告类型订购：<br />
只要您帐户内有足够的现金或金币，您可以订购的广告就会在下面出现订购申请按钮。<br />
您可以通过点击按钮，订购您需要的广告。</p>
<p>
<div align="left"><div id="form">
<fieldset>
  <table width="100%" border="0" cellspacing="0" cellpadding="0">
	<% If RedeemDescription3 <> "" And RedeemLimit3 > 0 Then %>
<form method="post" action="redeemads.asp">
    <tr>
      <td height="30"><div align="left">
        <input type="hidden" name="RedeemType" value="Dollars" />
        
        <input type="hidden" name="RedeemDescription" value="<% = RedeemDescription3 %>" />
        
        <input type="hidden" name="RedeemLimit" value="<% = RedeemLimit3 %>" />
        
        <% = RedeemDescription3 %>
      </div></td>
      <td height="30"><% If AllDollars >= RedeemLimit3 And RedeemLimit3 > 0 Then %>
  <input type="submit" value="广告兑换申请" name="Button3" />

  <% Else %>
  <input type="submit" value="广告兑换申请" name="Button3" disabled="disabled" />

  <% End If %></td>
    </tr></form>
<% End If %>
<% If RedeemDescription8 <> "" And RedeemLimit8 > 0 Then %>
<form method="post" action="redeemads.asp">
    <tr>
      <td height="30"><div align="left">
        <input type="hidden" name="RedeemType" value="Dollars" />
        <input type="hidden" name="RedeemDescription" value="<% = RedeemDescription8 %>" />
        <input type="hidden" name="RedeemLimit" value="<% = RedeemLimit8 %>" />
        <% = RedeemDescription8 %>
      </div></td>
      <td height="30"><% If AllDollars >= RedeemLimit8 And RedeemLimit8 > 0 Then %>
  <input type="submit" value="广告兑换申请" name="Button8" />
  <% Else %>
  <input type="submit" value="广告兑换申请" name="Button8" disabled="disabled" />
  <% End If %></td>
    </tr>
	</form>
<% End If %>
<% If RedeemDescription11 <> "" And RedeemLimit11 > 0 Then %>
<form method="post" action="redeemads.asp">
    <tr>
      <td height="30"><div align="left">
        <input type="hidden" name="RedeemType" value="Points" />
        <input type="hidden" name="RedeemDescription" value="<% = RedeemDescription11 %>" />
        <input type="hidden" name="RedeemLimit" value="<% = RedeemLimit11 %>" />
        <% = RedeemDescription11 %>
      </div></td>
      <td height="30"><% If AllPoints >= RedeemLimit11 And RedeemLimit11 > 0 Then %>
  <input type="submit" value="广告兑换申请" name="Button11" />
  <% Else %>
  <input type="submit" value="广告兑换申请" name="Button11" disabled="disabled" />
  <% End If %></td>
    </tr>
	</form>
<% End If %>
  </table>
 </fieldset></div></div> 
		

<hr/>
</div></div></div>
<!--#include file="log.asp"-->
</div>
<!--#include file="footer.asp"-->

</div>
</body>
</html>