manageuserlevel.asp

来自「网店批发系统,很好很强大,很好很强大很好很强大」· ASP 代码 · 共 140 行
ASP
140 行
<!--#include file="conn.asp"-->
<!--#include file="checkAdmin.asp"-->
<!--#include file="../inc/check_inc.asp"-->
<!--#include file="../inc/page_inc.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="css/css.css" rel="stylesheet" type="text/css" />
<title>会员等级管理</title>
</head>

<body>
<!--#include file="inc/ManageUserLevel_inc.asp"-->
<table width="97%" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td width="20%" height="24" align="center" class="listtop">会员名称</td>
	<td width="20%" align="center" class="listtop">会员等级</td>
	<td width="20%" align="center" class="listtop">享受折扣</td>
	<td width="20%" align="center" class="listtop">升级所需积分</td>
	<td width="20%" align="center" class="listtop">操作</td>
  </tr>
<%
	if Num <> -1 then
		for j = 0 to Num
%>
<form name="EditForm" method="post" action="ManageUserLevel.asp?action=edit&ID=<%=Level(4,j)%>">
  <tr onMouseOver="this.style.backgroundColor='#FBF9F4';" onMouseOut="this.style.backgroundColor='#FFFFFF'">
    <td width="20%" height="24" align="center" class="listitem"><input name="LevelName" type="text" class="input_text" value="<%=Level(0,j)%>" size="10" /></td>
	<td width="20%" align="center" class="listitem"><input name="LevelOrder" type="text" class="input_text" value="<%=Level(1,j)%>" size="5" /></td>
	<td width="20%" align="center" class="listitem"><input name="LevelNum" type="text" class="input_text" value="<%=Level(2,j)%>" size="5" />
	  %</td>
	<td width="20%" align="center" class="listitem"><input name="LevelJifen" type="text" class="input_text" value="<%=Level(3,j)%>" size="5" /></td>
	<td width="20%" align="center" class="listitem">
		<input name="submit" type="submit" class="Button" value="修改" /> 
		<input type="button" class="Button" value="删除" onClick="window.location.href='ManageUserLevel.asp?action=del&ID=<%=Level(4,j)%>'" />
	</td>
  </tr>
</form>
<%
		next
	end if
%>
</table>

<table width="97%" border="0" cellpadding="0" cellspacing="0">
	<form name="LevelForm" method="post" action="ManageUserLevel.asp?action=add">
	  <tr>
	    <td align="center">&nbsp;</td>
	    <td align="center">&nbsp;</td>
	    <td align="center">&nbsp;</td>
	    <td align="center">&nbsp;</td>
	    <td align="center">&nbsp;</td>
      </tr>
	  <tr>
		<td width="20%" height="24" align="center" class="listtitle">
		会员名称	    </td>
		<td width="20%" align="center" class="listtitle">
		会员等级</td>
		<td width="20%" align="center" class="listtitle">
		享受折扣</td>
		<td width="20%" align="center" class="listtitle">
		升级所需积分</td>
		<td width="20%" align="center" class="listtitle">操作</td>
	  </tr>
	  <tr>
	    <td height="24" align="center" class="listitem"><input name="LevelName" type="text" class="input_text" value="" size="10" />	    </td>
	    <td align="center" class="listitem">
	      <input name="LevelOrder" type="text" class="input_text" value="<%
if Num <> -1 then
	Response.Write Level(1,Num)+1
else
	Response.Write "1"
end if
		  %>" size="5" />	    </td>
	    <td align="center" class="listitem">
	      <input name="LevelNum" type="text" class="input_text" value="100" size="5" />
%</td>
	    <td align="center" class="listitem">
	      <input name="LevelJifen" type="text" class="input_text" value="100" size="5" />	    </td>
	    <td align="center" class="listitem">
	      <input name="submit" type="submit" class="Button" value="添加"  onclick="return check();"/>	    </td>
      </tr>
	</form>
</table>
<script language="javascript">
	function check()
	{
		//alert(document.LevelForm.LevelOrder.value);
		
		if(document.LevelForm.LevelName.value == "")
		{
			alert('会员名称不能为空');
			return false;
		}
		
		if(isNaN(document.LevelForm.LevelOrder.value))
		{
			alert('会员等级必须为数字型');
			return false;
		}
		
		if(document.LevelForm.LevelOrder.value == "")
		{
			alert('会员等级不能为空');
			return false;
		}
		
		if(isNaN(document.LevelForm.LevelNum.value))
		{
			alert('享受折扣必须为数字型');
			return false;
		}
		
		if(document.LevelForm.LevelNum.value == "")
		{
			alert('享受折扣不能为空');
			return false;
		}
		
		if(isNaN(document.LevelForm.LevelJifen.value))
		{
			alert('升级所需积分必须为数字型');
			return false;
		}
		
		if(document.LevelForm.LevelJifen.value == "")
		{
			alert('升级所需积分不能为空');
			return false;
		}
		
		return true;
		
	}
</script>
<!--#include file="inc/closeconn_inc.asp"-->
</body>
</html>
⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?
manageuserlevel.asp

manageuserlevel.asp - 源码说明

⌨️ 快捷键说明
