⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 credits2.asp

📁 中文bux点击站源码。配合其他站点用
💻 ASP
字号:
🔍 
<%@ LANGUAGE = VBScript %>
<!--#include file="conn.asp"-->

<!--#include file="checklogin.asp"-->

<%
  UserName = Request ("UserName")
  If UserName = "" then
     Conn.Close
     Set Conn = nothing
     Session ("Message") = "您必须输入会员用户名才能增加奖励。"
     Response.Redirect "error.asp"
     Response.End
  End if
  rs.Open "Select * From member Where UserName = '" & UserName & "'",Conn
  If rs.EOF Then
     rs.Close
     Set rs = nothing
     Conn.Close
     Set Conn = nothing
     Session ("Message") = "您输入的会员用户名并不存在。"
     Response.Redirect "error.asp"
     Response.End
  End if
  Email = rs ("Email")
  MemberShip = rs ("MemberShip")
  rs.Close
  Set rs = nothing
  Conn.Close
  Set Conn = nothing
%>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link REL="StyleSheet" HREF="../tjscripts.css" TYPE="text/css" MEDIA="screen">
<title><%= SiteTitle %>后台管理系统</title>
</head>

<body topmargin="0" leftmargin="0">

<div align="center">
  <table border="1" cellspacing="1" width="100%" bordercolor="#0033CC">
    <tr>
      <td width="100%" height="31" bgcolor="#FFCC00"><b>增加奖励</b></td>
    </tr>
    <tr>
      <td width="100%">
        <form method="POST" action="credits_do.asp">
          <div align="center">
            <table border="0" cellpadding="0" cellspacing="0" width="95%">
              <tr>
                <td width="10%" align="center" height="30">电子邮件地址</td>
                <td width="10%" align="center" height="30">用户名</td>
                <td width="10%" align="center" height="30">用户级别</td>
                <td width="10%" align="center" height="30">奖励类型</td>
                <td width="15%" align="center" height="30">奖励数额</td>
                <td width="15%" align="center" height="30">奖励时间</td>
                <td width="30%" align="center" height="30">奖励原因备注</td>
              </tr>
              <tr>
                <td align="center" colspan="3"><input type="hidden" name="UserName" value="<%= UserName %>"></td>
                <td align="center" colspan="4"><input type="hidden" name="Email" value="<%= Email %>"></td>
              </tr>
              <tr>
                <td align="center" height="30"><%= Email %></td>
                <td align="center" height="30"><%= UserName %></td>
                <td align="center" height="30"><%= MemberShip %></td>
                <td align="center" height="30"><select size="1" name="CreditsType">
                    <option selected value="Dollars">现金奖励</option>
                    <option value="Points">点数奖励</option>
                  </select></td>
                <td align="center" height="30"><input type="text" name="CreditsAmount" size="5"></td>
                <td align="center" height="30"><input type="text" name="CreditsDate" size="10" value="<%= Date() %>"></td>
                <td align="center" height="30"><textarea rows="2" name="CreditsMemo" cols="20"></textarea></td>
              </tr>
              <tr>
                <td width="100%" align="center" colspan="7" height="30"></td>
              </tr>
              <tr>
                <td width="100%" align="center" colspan="7" height="30">
                  <p><input type="submit" value="按用户名增加奖励" name="Button"></td>
              </tr>
            </table>
          </div>
        </form>
      </td>  
    </tr>
    <tr>
      <td width="100%" align="center"><a href="javascript:history.back();"><b>返回</b></a></td>
    </tr> 
  </table>  
</div>

</body>

</html>

⌨️ 快捷键说明

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