money.asp

视频点播系统

  <tr>
      <td align="center" valign="top" bgcolor="#F7F7F7"><table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td align="center"><strong>个人计点用户资费</strong></td>
        </tr>
      </table>
      <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td>100点费用：
            <input name="pop_100p" type="text" class="input1" id="pop_100p" value="<%=agent_pop_100p%>" size="4">
            元　
            　VIP用户费用：
            <input name="vip_100p" type="text" class="input1" id="vip_100p" value="<%=agent_vip_100p%>" size="4">
            元</td>
          </tr>
      </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>300点费用：
                <input name="pop_300p" type="text" class="input1" id="pop_300p" value="<%=agent_pop_300p%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_300p" type="text" class="input1" id="vip_300p" value="<%=agent_vip_300p%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>600点费用：
                <input name="pop_600p" type="text" class="input1" id="pop_600p" value="<%=agent_pop_600p%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_600p" type="text" class="input1" id="vip_600p" value="<%=agent_vip_600p%>" size="4">
      元</td>
          </tr>
      </table>
        <table width="400" height="20" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center"></td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center"><strong>个人包月用户资费</strong></td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>1个月费用：
                <input name="pop_ps1m" type="text" class="input1" id="pop_ps1m" value="<%=agent_pop_ps1m%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_ps1m" type="text" class="input1" id="vip_ps1m" value="<%=agent_vip_ps1m%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>3个月费用：
                <input name="pop_ps3m" type="text" class="input1" id="pop_ps3m" value="<%=agent_pop_ps3m%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_ps3m" type="text" class="input1" id="vip_ps3m" value="<%=agent_vip_ps3m%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>6个月费用：
                <input name="pop_ps6m" type="text" class="input1" id="pop_ps6m" value="<%=agent_pop_ps6m%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_ps6m" type="text" class="input1" id="vip_ps6m" value="<%=agent_vip_ps6m%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="20" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center"></td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center"><strong>网吧包月用户资费</strong></td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>1个月费用：
                <input name="pop_pb1m" type="text" class="input1" id="pop_pb1m" value="<%=agent_pop_pb1m%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_pb1m" type="text" class="input1" id="vip_pb1m" value="<%=agent_vip_pb1m%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>3个月费用：
                <input name="pop_pb3m" type="text" class="input1" id="pop_pb3m" value="<%=agent_pop_pb3m%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_pb3m" type="text" class="input1" id="vip_pb3m" value="<%=agent_vip_pb3m%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="25" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td>6个月费用：
                <input name="pop_pb6m" type="text" class="input1" id="pop_pb6m" value="<%=agent_pop_pb6m%>" size="4">
      元　 　VIP用户费用：
      <input name="vip_pb6m" type="text" class="input1" id="vip_pb6m" value="<%=agent_vip_pb6m%>" size="4">
      元</td>
          </tr>
        </table>
        <table width="400" height="50" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td align="center"><input name="Submit" type="submit" class="button1" value="保存代理商账号充值资费设置">            </td>
          </tr>
        </table></td>
  </tr>
</table>
</form>
<table width="500" height="20" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
<%
end sub
sub save_card()
if request.form("pop_100p")="" or request.form("vip_100p")="" or request.form("pop_300p")="" or request.form("vip_300p")="" or request.form("pop_600p")="" or request.form("vip_600p")="" or request.form("pop_ps1m")="" or request.form("vip_ps1m")="" or request.form("pop_ps3m")="" or request.form("vip_ps3m")="" or request.form("pop_ps6m")="" or request.form("vip_ps6m")="" or request.form("pop_pb1m")="" or request.form("vip_pb1m")="" or request.form("pop_pb3m")="" or request.form("vip_pb3m")="" or request.form("pop_pb6m")="" or request.form("vip_pb6m")="" then
	response.write"<script language=javascript>alert('资费设置中不能有留空的项目');history.back();</Script>"
	response.end
end if
if myobj.chkmoney(request.form("pop_100p"))=false or myobj.chkmoney(request.form("vip_100p"))=false or myobj.chkmoney(request.form("pop_300p"))=false or myobj.chkmoney(request.form("vip_300p"))=false or myobj.chkmoney(request.form("pop_600p"))=false or myobj.chkmoney(request.form("vip_600p"))=false or myobj.chkmoney(request.form("pop_ps1m"))=false or myobj.chkmoney(request.form("vip_ps1m"))=false or myobj.chkmoney(request.form("pop_ps3m"))=false or myobj.chkmoney(request.form("vip_ps3m"))=false or myobj.chkmoney(request.form("pop_ps6m"))=false or myobj.chkmoney(request.form("vip_ps6m"))=false or myobj.chkmoney(request.form("pop_pb1m"))=false or myobj.chkmoney(request.form("vip_pb1m"))=false or myobj.chkmoney(request.form("pop_pb3m"))=false or myobj.chkmoney(request.form("vip_pb3m"))=false or myobj.chkmoney(request.form("pop_pb6m"))=false or myobj.chkmoney(request.form("vip_pb6m"))=false then
	response.write"<script language=javascript>alert('资费格式错误(只能是0-9的数字和小数点)');history.back();</Script>"
	response.end
end if
if CCur(request.form("pop_100p"))<0 or CCur(request.form("vip_100p"))<0 or CCur(request.form("pop_300p"))<0 or CCur(request.form("vip_300p"))<0 or CCur(request.form("pop_600p"))<0 or CCur(request.form("vip_600p"))<0 or CCur(request.form("pop_ps1m"))<0 or CCur(request.form("vip_ps1m"))<0 or CCur(request.form("pop_ps3m"))<0 or CCur(request.form("vip_ps3m"))<0 or CCur(request.form("pop_ps6m"))<0 or CCur(request.form("vip_ps6m"))<0 or CCur(request.form("pop_pb1m"))<0 or CCur(request.form("vip_pb1m"))<0 or CCur(request.form("pop_pb3m"))<0 or CCur(request.form("vip_pb3m"))<0 or CCur(request.form("pop_pb6m"))<0 or CCur(request.form("vip_pb6m"))<0 then
	response.write"<script language=javascript>alert('资费格式错误(只能是0-9的数字和小数点)');history.back();</Script>"
	response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from money_setup where money_type='card'",conn,1,3
rs("pop_100p")=ccur(request.form("pop_100p"))
rs("vip_100p")=ccur(request.form("pop_100p"))
rs("pop_300p")=ccur(request.form("pop_300p"))
rs("vip_300p")=ccur(request.form("vip_300p"))
rs("pop_600p")=ccur(request.form("pop_600p"))
rs("vip_600p")=ccur(request.form("vip_600p"))
rs("pop_ps1m")=ccur(request.form("pop_ps1m"))
rs("vip_ps1m")=ccur(request.form("vip_ps1m"))
rs("pop_ps3m")=ccur(request.form("pop_ps3m"))
rs("vip_ps3m")=ccur(request.form("vip_ps3m"))
rs("pop_ps6m")=ccur(request.form("pop_ps6m"))
rs("vip_ps6m")=ccur(request.form("vip_ps6m"))
rs("pop_pb1m")=ccur(request.form("pop_pb1m"))
rs("vip_pb1m")=ccur(request.form("vip_pb1m"))
rs("pop_pb3m")=ccur(request.form("pop_pb3m"))
rs("vip_pb3m")=ccur(request.form("vip_pb3m"))
rs("pop_pb6m")=ccur(request.form("pop_pb6m"))
rs("vip_pb6m")=ccur(request.form("vip_pb6m"))
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write"<script language=javascript>alert('影卡资费设置保存成功');location.href = '"&filename&"';</Script>"
response.end
end sub
sub save_order()
if request.form("pop_100p")="" or request.form("vip_100p")="" or request.form("pop_300p")="" or request.form("vip_300p")="" or request.form("pop_600p")="" or request.form("vip_600p")="" or request.form("pop_ps1m")="" or request.form("vip_ps1m")="" or request.form("pop_ps3m")="" or request.form("vip_ps3m")="" or request.form("pop_ps6m")="" or request.form("vip_ps6m")="" or request.form("pop_pb1m")="" or request.form("vip_pb1m")="" or request.form("pop_pb3m")="" or request.form("vip_pb3m")="" or request.form("pop_pb6m")="" or request.form("vip_pb6m")="" then
	response.write"<script language=javascript>alert('资费设置中不能有留空的项目');history.back();</Script>"
	response.end
end if
if myobj.chkmoney(request.form("pop_100p"))=false or myobj.chkmoney(request.form("vip_100p"))=false or myobj.chkmoney(request.form("pop_300p"))=false or myobj.chkmoney(request.form("vip_300p"))=false or myobj.chkmoney(request.form("pop_600p"))=false or myobj.chkmoney(request.form("vip_600p"))=false or myobj.chkmoney(request.form("pop_ps1m"))=false or myobj.chkmoney(request.form("vip_ps1m"))=false or myobj.chkmoney(request.form("pop_ps3m"))=false or myobj.chkmoney(request.form("vip_ps3m"))=false or myobj.chkmoney(request.form("pop_ps6m"))=false or myobj.chkmoney(request.form("vip_ps6m"))=false or myobj.chkmoney(request.form("pop_pb1m"))=false or myobj.chkmoney(request.form("vip_pb1m"))=false or myobj.chkmoney(request.form("pop_pb3m"))=false or myobj.chkmoney(request.form("vip_pb3m"))=false or myobj.chkmoney(request.form("pop_pb6m"))=false or myobj.chkmoney(request.form("vip_pb6m"))=false then
	response.write"<script language=javascript>alert('资费格式错误(只能是0-9的数字和小数点)');history.back();</Script>"
	response.end
end if
if ccur(request.form("pop_100p"))<0 or ccur(request.form("vip_100p"))<0 or ccur(request.form("pop_300p"))<0 or ccur(request.form("vip_300p"))<0 or ccur(request.form("pop_600p"))<0 or ccur(request.form("vip_600p"))<0 or ccur(request.form("pop_ps1m"))<0 or ccur(request.form("vip_ps1m"))<0 or ccur(request.form("pop_ps3m"))<0 or ccur(request.form("vip_ps3m"))<0 or ccur(request.form("pop_ps6m"))<0 or ccur(request.form("vip_ps6m"))<0 or ccur(request.form("pop_pb1m"))<0 or ccur(request.form("vip_pb1m"))<0 or ccur(request.form("pop_pb3m"))<0 or ccur(request.form("vip_pb3m"))<0 or ccur(request.form("pop_pb6m"))<0 or ccur(request.form("vip_pb6m"))<0 then
	response.write"<script language=javascript>alert('资费金额不能小于0');history.back();</Script>"
	response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from money_setup where money_type='order'",conn,1,3
rs("pop_100p")=ccur(request.form("pop_100p"))
rs("vip_100p")=ccur(request.form("vip_100p"))
rs("pop_300p")=ccur(request.form("pop_300p"))
rs("vip_300p")=ccur(request.form("vip_300p"))
rs("pop_600p")=ccur(request.form("pop_600p"))
rs("vip_600p")=ccur(request.form("vip_600p"))
rs("pop_ps1m")=ccur(request.form("pop_ps1m"))
rs("vip_ps1m")=ccur(request.form("vip_ps1m"))
rs("pop_ps3m")=ccur(request.form("pop_ps3m"))
rs("vip_ps3m")=ccur(request.form("vip_ps3m"))
rs("pop_ps6m")=ccur(request.form("pop_ps6m"))
rs("vip_ps6m")=ccur(request.form("vip_ps6m"))
rs("pop_pb1m")=ccur(request.form("pop_pb1m"))
rs("vip_pb1m")=ccur(request.form("vip_pb1m"))
rs("pop_pb3m")=ccur(request.form("pop_pb3m"))
rs("vip_pb3m")=ccur(request.form("vip_pb3m"))
rs("pop_pb6m")=ccur(request.form("pop_pb6m"))
rs("vip_pb6m")=ccur(request.form("vip_pb6m"))
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write"<script language=javascript>alert('在线订单资费设置保存成功');location.href = '"&filename&"';</Script>"
response.end
end sub

sub save_agent()
if request.form("pop_100p")="" or request.form("vip_100p")="" or request.form("pop_300p")="" or request.form("vip_300p")="" or request.form("pop_600p")="" or request.form("vip_600p")="" or request.form("pop_ps1m")="" or request.form("vip_ps1m")="" or request.form("pop_ps3m")="" or request.form("vip_ps3m")="" or request.form("pop_ps6m")="" or request.form("vip_ps6m")="" or request.form("pop_pb1m")="" or request.form("vip_pb1m")="" or request.form("pop_pb3m")="" or request.form("vip_pb3m")="" or request.form("pop_pb6m")="" or request.form("vip_pb6m")="" then
	response.write"<script language=javascript>alert('资费设置中不能有留空的项目');history.back();</Script>"
	response.end
end if
if myobj.chkmoney(request.form("pop_100p"))=false or myobj.chkmoney(request.form("vip_100p"))=false or myobj.chkmoney(request.form("pop_300p"))=false or myobj.chkmoney(request.form("vip_300p"))=false or myobj.chkmoney(request.form("pop_600p"))=false or myobj.chkmoney(request.form("vip_600p"))=false or myobj.chkmoney(request.form("pop_ps1m"))=false or myobj.chkmoney(request.form("vip_ps1m"))=false or myobj.chkmoney(request.form("pop_ps3m"))=false or myobj.chkmoney(request.form("vip_ps3m"))=false or myobj.chkmoney(request.form("pop_ps6m"))=false or myobj.chkmoney(request.form("vip_ps6m"))=false or myobj.chkmoney(request.form("pop_pb1m"))=false or myobj.chkmoney(request.form("vip_pb1m"))=false or myobj.chkmoney(request.form("pop_pb3m"))=false or myobj.chkmoney(request.form("vip_pb3m"))=false or myobj.chkmoney(request.form("pop_pb6m"))=false or myobj.chkmoney(request.form("vip_pb6m"))=false then
	response.write"<script language=javascript>alert('资费格式错误(只能是0-9的数字和小数点)');history.back();</Script>"
	response.end
end if
if CCur(request.form("pop_100p"))<0 or CCur(request.form("vip_100p"))<0 or CCur(request.form("pop_300p"))<0 or CCur(request.form("vip_300p"))<0 or CCur(request.form("pop_600p"))<0 or CCur(request.form("vip_600p"))<0 or CCur(request.form("pop_ps1m"))<0 or CCur(request.form("vip_ps1m"))<0 or CCur(request.form("pop_ps3m"))<0 or CCur(request.form("vip_ps3m"))<0 or CCur(request.form("pop_ps6m"))<0 or CCur(request.form("vip_ps6m"))<0 or CCur(request.form("pop_pb1m"))<0 or CCur(request.form("vip_pb1m"))<0 or CCur(request.form("pop_pb3m"))<0 or CCur(request.form("vip_pb3m"))<0 or CCur(request.form("pop_pb6m"))<0 or CCur(request.form("vip_pb6m"))<0 then
	response.write"<script language=javascript>alert('资费格式错误(只能是0-9的数字和小数点)');history.back();</Script>"
	response.end
end if
set rs=server.createobject("adodb.recordset")
rs.open "select * from money_setup where money_type='agent'",conn,1,3
rs("pop_100p")=ccur(request.form("pop_100p"))
rs("vip_100p")=ccur(request.form("pop_100p"))
rs("pop_300p")=ccur(request.form("pop_300p"))
rs("vip_300p")=ccur(request.form("vip_300p"))
rs("pop_600p")=ccur(request.form("pop_600p"))
rs("vip_600p")=ccur(request.form("vip_600p"))
rs("pop_ps1m")=ccur(request.form("pop_ps1m"))
rs("vip_ps1m")=ccur(request.form("vip_ps1m"))
rs("pop_ps3m")=ccur(request.form("pop_ps3m"))
rs("vip_ps3m")=ccur(request.form("vip_ps3m"))
rs("pop_ps6m")=ccur(request.form("pop_ps6m"))
rs("vip_ps6m")=ccur(request.form("vip_ps6m"))
rs("pop_pb1m")=ccur(request.form("pop_pb1m"))
rs("vip_pb1m")=ccur(request.form("vip_pb1m"))
rs("pop_pb3m")=ccur(request.form("pop_pb3m"))
rs("vip_pb3m")=ccur(request.form("vip_pb3m"))
rs("pop_pb6m")=ccur(request.form("pop_pb6m"))
rs("vip_pb6m")=ccur(request.form("vip_pb6m"))
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write"<script language=javascript>alert('代理商账号充值资费设置保存成功');location.href = '"&filename&"';</Script>"
response.end
end sub
%>
</body>
</html>