<!--#include file="conn.asp"-->
<%if session("bjxadmin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>"
response.End
else
if session("flag")>1 then
response.Write "<p align=center><font color=red>您没有此项目管理权限！</font></p>"
response.End
end if
end if
%>
<%dim action
action=request.QueryString("action")
'//保存信息
if action="save" then
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from shop_sys ",conn,1,3
rs("sm1")=trim(request("sm1"))
rs("sm2")=trim(request("sm2"))
rs("sm3")=trim(request("sm3"))
rs("py1")=trim(request("py1"))
rs("py2")=trim(request("py2"))
rs("py3")=trim(request("py3"))
rs("ems1")=trim(request("ems1"))
rs("ems2")=trim(request("ems2"))
rs("ems3")=trim(request("ems3"))
rs("vipid")=trim(request("vipid"))
rs.update
rs.close
set rs=nothing
response.Write "<script language=javascript>alert('系统参数修改成功！');history.go(-1);</script>"
end if%>
<html><head><title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css">
<style><!--
body,td,th {
	color: #000000;
}
body {
	background-color: #C7D4F7;
}
-->
</style></head>
<body>
<table class="tableBorder" width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#FFFFFF">
<form name="form1" method="post" action="sysset.asp?action=save">
<%set rs=server.CreateObject("adodb.recordset")
	  rs.Open "select * from shop_sys",conn,1,1%>
<tr> 
<td colspan="4" align="center" background="../images/admin_bg_1.gif"><b><font color="#ffffff">系统参数设置</font></b></td>
</tr>
<tr > 
<td width="25%"  style="PADDING-LEFT: 20px">送货上门<br>收费标准</td>
<td width="75%" style="PADDING-LEFT: 20px"> 
<input class="wenbenkuang" name="sm1" type="text" size="8" value="<%=trim(rs("sm1"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元/订单<br>普通会员用户购满： 
<input class="wenbenkuang" name="sm2" type="text" size="8" value="<%=trim(rs("sm2"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元/订单免送货费<br>VIP 会员用户购满：
<input class="wenbenkuang" name="sm3" type="text" size="8" value="<%=trim(rs("sm3"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元/订单免送货费</td>
</tr>
<tr > 
<td style="PADDING-LEFT: 20px">普通平邮<br>收费标准</td>
<td style="PADDING-LEFT: 20px">基价：
<input class="wenbenkuang" name="py1" type="text" size="4" value="<%=trim(rs("py1"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元，VIP用户可享受购满
<input class="wenbenkuang" name="py2" type="text" size="4" value="<%=trim(rs("py2"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元 免
<input class="wenbenkuang" name="py3" type="text" size="4" value="<%=trim(rs("py3"))%>" onKeyPress="event.returnValue=IsDigit();" >
元基价的优惠</td>
</tr>
<tr  style="PADDING-LEFT: 20px"> 
<td style="PADDING-LEFT: 20px">邮政速递<br>（EMS）<br>收费标准</td>
<td style="PADDING-LEFT: 20px">基价：
<input class="wenbenkuang" name="ems1" type="text" size="4" value="<%=trim(rs("ems1"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元，VIP用户可享受购满
<input class="wenbenkuang" name="ems2" type="text" size="4" value="<%=trim(rs("ems2"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
元 免
<input class="wenbenkuang" name="ems3" type="text" size="4" value="<%=trim(rs("ems3"))%>" onKeyPress="event.returnValue=IsDigit();" >
元基价的优惠 </td>
</tr>
<tr > 
<td style="PADDING-LEFT: 20px">VIP会员卡的商品ID绑定号</td>
<td style="PADDING-LEFT: 20px"> 
<input class="wenbenkuang" name="VIPID" type="text" size="10" value="<%=trim(rs("VIPID"))%>" ONKEYPRESS="event.returnValue=IsDigit();" >
</td>
</tr>
<tr > 
<td></td>
<td style="PADDING-LEFT: 20px">
<input class="go-wenbenkuang" type="submit" name="Submit" value="提 交">&nbsp;
<input class="go-wenbenkuang" type="reset" name="Submit2" value="恢 复">
</td>
</tr>
</form>
</table>
<%rs.Close
	set rs=nothing%>
<!--#include file="copyright.asp"-->
</body>
</html>
<script>
function IsDigit()
{return ((event.keyCode >= 48) && (event.keyCode <= 57));}
</script>