pay.asp

网站短信平台 www.easy366.com 人才 房源

<!--#include file="top.asp"-->
<!--#include file="../inc/md5.asp"-->

<%
id=session("id")
pay=int(request("pay"))
zruser=trim(request("zruser"))

if request("action")="save" then
if zruser="" then
	response.write "<script>alert('请输入转入用户');history.go(-1);</Script>"
	Response.End 
elseif pay="" then
	response.write "<script>alert('请输入转帐金额');history.go(-1);</Script>"
	Response.End
elseif pay=<"0" then
	response.write "<script>alert('请正确输入转帐金额');history.go(-1);</Script>"
	Response.End 
 

	
else

set rs=server.createobject("adodb.recordset")
sql="select * from es_smsuser where es_user='"&zruser&"'"
	rs.open sql,conn,1,1
	zrid=rs("es_id")
	if rs.eof and rs.bof then                     
	response.write "<script>alert('转入用户名错误,请重新输入');history.go(-1);</Script>"
	Response.End 
end if


set rs=server.createobject("adodb.recordset")
sql="select * from es_smsuser where es_id="&id&""
	rs.open sql,conn,1,1
	if rs("es_pay")<pay then                     
	response.write "<script>alert('您的余额不足,请重新输入');history.go(-1);</Script>"
	Response.End 
end if

'从会员帐户扣除费用
conn.execute("update es_smsuser set es_pay=es_pay-"&pay&" where es_id="&id)
'从会员帐户增加费用
conn.execute("update es_smsuser set es_pay=es_pay+"&pay&" where es_id="&zrid)

response.write"<script>alert('转帐成功');window.open('pay.asp','_self');</script>"
response.end
end if
end if

	
%>
<%usertopview%>

    <table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
      <tr>
<td width="172" valign=top bgcolor=#efefef>
<!--==============-->
<!--#include file="left.asp"-->
<!--==============-->
</td>
<td width="728" align="center" valign=top>
<!--==============-->
<table width="500" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td>
<!--####################################-->
                <table width="546" border="0" cellspacing="1" cellpadding="0" bgcolor=#CCCCCC>
                  <tr>
                    <td height=33 background="img/tt2.gif">　　<font color=black>用户冲值</font>　　　</td>
  </tr>
  <tr>
    <td bgcolor=#ffffff height=25>
<!--======-->
<table width="71%" border="0" cellspacing="0" cellpadding="0" align=center>
<form name="addform" method="post" action="../pay/pay.asp" onSubmit="return checkdata()">
  <tr>
    <td width="44%" align=center height=40>输入冲值条数</td>
	<td width="56%">
	<input name="pay" type="text" size="21" maxlength="40" onpropertychange="if(/\D/g.test(value))value=value.replace(/\D/g,'')" style="ime-mode:disabled" ondragenter="return false"></td>
  </tr>
  <tr>
    <td width="44%" align=center height=40>请选择支付方式</td>
	<td width="56%">
	<select size="1" name="zhifu">
                                <option value="0">请选择支付方式</option>
                                <option value="1" selected>支付宝</option>
                                <option value="2">财付通</option>
                                <option value="3">网银在线</option>
                              </select></td>
  </tr>
  <tr>
    <td height=30 align="center" colspan="2"><input type="submit" name="Submit" value="冲　值" class="input1"></td>
  </tr>
	<input type="hidden" name="user" value="<%=session("useradmin")%>">
</form>
</table>
<!--======-->
	</td>
  </tr>
</table>
                <table width="547" border="0" cellspacing="1" cellpadding="0" bgcolor=#CCCCCC>
                  <tr>
    <td height=33 background="img/tt2.gif">　　<font color=black>用户转帐</font></td>
  </tr>
  <tr>
    <td bgcolor=#ffffff height=25>
<!--======-->
<table width="71%" border="0" cellspacing="0" cellpadding="0" align=center>
<form name="addform" method="post" action="pay.asp?action=save" onSubmit="return checkdata()">
   <tr>
    <td width="44%" align=center height=40>转入会员名称</td>
	<td width="56%">
	<input type="type" name="zruser" size="20">
                              <font color="#FF0000"><br>
                              您要转给的会员名</font></td>
  </tr>
 <tr>
    <td width="44%" align=center height=40>输入冲值条数</td>
	<td width="56%">
	<input name="pay" type="text" size="21" maxlength="40" onpropertychange="if(/\D/g.test(value))value=value.replace(/\D/g,'')" style="ime-mode:disabled" ondragenter="return false"></td>
  </tr>
  <tr>
    <td height=30 align="center" colspan="2"><input type="submit" name="Submit" value="转　帐" class="input1"></td>
  </tr>
	<input type="hidden" name="user" value="<%=session("useradmin")%>">
</form>
</table>
<!--======-->
	</td>
  </tr>
</table>

<!--####################################-->
	</td>
  </tr>
<tr><td height=25></td></tr>
</table>
<!--==============--></td>
</tr>
</table>
<!--====== bottom ========-->
<!--====== bottom ========-->
    <table width="100%" border="0" cellspacing="0" cellpadding="0" style="border:0px #cccccc solid;">
      <tr>
        <td width="30%" align="right" valign="middle"><img src="../images/index_04.gif" alt=""></td>
        <td width="70%" align="left"><%=citybottom%></td>
  </tr>
</table>

				  </body>
</html>