ad_usertype.asp

凡人网络购物系统 v8.0 中文版

<!--#include file="conn.asp"-->
<!--#include file="ad_chk.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=inc/css.css rel=STYLESHEET type=text/css>

<%
usertype_id=request("usertype_id")
if request("action")="add" then
set rs=server.createobject("adodb.recordset")
rs.Open "select * from venshop_usertype",conn,1,3
rs.AddNew
rs("usertype_name")=request("usertype_name")
rs("usertype_zhekou")=request("usertype_zhekou")
rs("usertype_up")=request("usertype_up")
rs.Update
rs.Close
set rs=nothing
response.Redirect "ad_usertype.asp"
end if
if request("action")="edit" then
set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_usertype where usertype_id="&usertype_id&"",conn,1,3
rs("usertype_name")=request("usertype_name")
rs("usertype_zhekou")=request("usertype_zhekou")
rs("usertype_up")=request("usertype_up")
rs.update
rs.close
set rs=nothing
response.Redirect "ad_usertype.asp"
end if
if request("action")="del" then
conn.execute "delete from venshop_usertype where usertype_id="&usertype_id
response.Redirect "ad_usertype.asp"
end if
%>
<table border="0" cellspacing="1" bgcolor="#C8C8C8" cellpadding="5">
  <tr><td align="center" colspan="4" bgcolor="#F0F0F0"><b>用户等级与折扣修改</b></td></tr>
  <tr><td align="center" bgcolor="#FFFFFF">名称</td>
	  <td align="center" bgcolor="#FFFFFF">享受优惠价</td>
	  <td align="center" bgcolor="#FFFFFF">升级所需积分</td>
	  <td align="center" bgcolor="#FFFFFF">操作</td></tr>
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from venshop_usertype",conn,1,1
if rs.eof and rs.bof then
response.write "NO DATA"
else
do while not rs.eof%>
<form method="post" action="ad_usertype.asp?action=edit&usertype_id=<%=rs("usertype_id")%>">
<tr><td align="center" bgcolor="#FFFFFF"><input name="usertype_name" type="text" size="13" value="<%=rs("usertype_name")%>"></td>
	  <td align="center" bgcolor="#FFFFFF"><input name="usertype_zhekou" type="text" size="3" value="<%=rs("usertype_zhekou")%>">%</td>
	  <td align="center" bgcolor="#FFFFFF">
		<input name="usertype_up" type="text" size="5" value="<%=rs("usertype_up")%>"></td>
	  <td align="center" bgcolor="#FFFFFF"><input type="submit" name="Submit" value="修改">&nbsp;&nbsp;<a href=ad_usertype.asp?action=del&usertype_id=<%=rs("usertype_id")%> onClick="return confirm('您确定进行删除操作吗？')">删除</a></td>
</tr></form>
<%
rs.movenext
loop
end if
rs.close
set rs=nothing
conn.close
set conn=nothing%>
</table>
<br>
<table border="0" cellpadding="5" cellspacing="1" bgcolor="#C8C8C8">
<form method="post"  action="ad_usertype.asp?action=add">
  <tr> 
    <td align="center" rowspan="2" bgcolor="#FFFFFF">添加：</td>
    <td align="center" bgcolor="#F0F0F0">名称</td>
    <td align="center" bgcolor="#F0F0F0">享受折扣</td>
    <td align="center" bgcolor="#F0F0F0">升级所需积分</td>
    <td align="center" bgcolor="#F0F0F0"></td>
  </tr>
  <tr> 
    <td align="center" bgcolor="#FFFFFF"><input name="usertype_name" type="text" size="11"></td>
    <td align="center" bgcolor="#FFFFFF"><input name="usertype_zhekou" type="text" size="2">%</td>
    <td align="center" bgcolor="#FFFFFF">
	<input name="usertype_up" type="text" size="5"></td>
    <td align="center" bgcolor="#FFFFFF"><input type="submit" name="Submit2" value="添 加"></td>
  </tr>
  </form></table>
  <br>
<div class="help">
备注：<br>
客户注册成功后默认为第一个等级；<br>享受优惠价，请输入1-100的数字，比如：一般会员 享受优惠价 99％ ，那一般会员在购物时价格会自动乘99％；<br>
升级所需积分：比如：VIP会员 升级所需积分2000，那客户积分达到2000自动升级VIP会员</div><table cellSpacing="0" cellPadding="3" border="0" width="500"><tr><td height="20"></td></tr>
<tr><td bgcolor="#F2F2F2"><p style="LINE-HEIGHT: 150%"><font color="#FF0000">凡人网络购物系统V8.0 版权所有:</font><a target="_blank" href="http://www.venshop.com"><font color="#FF0000">凡人网络VenShop.Com</font></a><font color="#FF0000"><br>客服电话:[phone]&nbsp; QQ:57152557/5404818 Email/Msn:</font><a href="mailto:[e-mail]"><font color="#FF0000">[e-mail]</font></a></td>
</tr></table>