⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pdt_sort.asp

📁 易方4.0程序+邮局接口+序列号+销售系统
💻 ASP
字号:
<!-- #include file="../inc_config.asp" -->
<!-- #include file="LoginCk.asp" -->
<%
Call PopCheck(15)
if Cmd = "Add" then

  If Len(Request("Sign")) = 0 Then
   Call ShowErMsgGo("请填写新商品分类编号!","Pdt_Sort.asp")
   Response.End
  End If
  
	If Conn.Num("EfangPdtSort","PSort_Sign='" & Sign & "'")>0 Then ShowErMsg("产品分类重覆!")
	call Conn.Insert("EfangPdtSort","PSort_Sign,PSort_Name","'" & Sign & "','" & Sign & "'")
	WriteLog "创建商品分类 - " & Sign
	Call ShowErMsgGo("创建产品分类成功!请继续设置其相关内容!","Pdt_SortUpd.asp?Sign="&Sign)
End If
%>
<html>
<head>
<title>商品分类管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link id="style_sheet" href="css/save.css" type="text/css" rel="stylesheet">
	<script language="JavaScript">style_sheet.href = parent.parent.style_sheet.href;</script>
</head>
<script language="JavaScript" src="js/common_Efang.js"></script>
	<body class="NormalPage">
	<form id="form_help" action="help_content.asp" method="get" target="working_area">
		<input name="help_topic" type="hidden" value="商品分类管理">
	</form>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
	<tr>
		<td id="headerToolBar" valign="middle" nowrap style="width:100%; height:22px;"><table cellpadding="0" cellspacing="0" class="HeaderPageControl">
				<tr>
					<td align="left" valign="middle" nowrap height="20">系统设置&gt;&gt; 商品管理 &gt;&gt; <b></b><b></b><b>商品分类管理</b></td>
					<td align="center" valign="middle" nowrap width="10" height="20"></td>
					<td align="right" valign="middle" width="100%" nowrap height="20"></td>
					<td align="center" valign="middle" nowrap width="10" height="20"></td>
					<td align="right" valign="middle" width="60" nowrap height="20"><img id="id_back" alt="返回上一页" onclick="JavaScript:history.back()" onmouseover="JavaScript:this.src=imgBackUp.src" onmouseout="JavaScript:this.src=imgBackDown.src" src="images/toolbar_back.gif" border="0" style="cursor:hand;width:22px; height:20px;"><img id="id_refresh" alt="刷新" onclick="JavaScript:fn_Refresh()" onmouseover="JavaScript:this.src=imgRefreshUp.src" onmouseout="JavaScript:this.src=imgRefreshDown.src" src="images/toolbar_refresh.gif" border="0" style="cursor:hand;width:22px; height:20px;"></td>
					<td align="right" valign="middle" width="25" nowrap height="20"><img src="images/toolbar_help.gif" alt="帮助" width="43" height="20" border="0" id="id_locate" style="cursor:hand;width:22px; height:20px;" onclick="JavaScript:fn_ShowHelp()" onmouseover="JavaScript:this.src=imgHelpUp.src" onmouseout="JavaScript:this.src=imgHelpDown.src"></td>
				</tr>
		</table></td>
	</tr>
	<tr>
		<td valign="top">
			<div id="viewPanel" style="visibility:visible; position:absolute; overflow:auto;">
		<br>  
	    <table width="85%" border="0" align="center" cellPadding="0" cellSpacing="0" class="datalist">
          <th width="114" nowrap class="DataListHeader" height="26">分类编号</th>
          <th width="233" nowrap class="DataListHeader">分类名称</th>
          <th width="65" nowrap class="DataListHeader">修改</th>
          <th width="67" nowrap class="DataListHeader">删除</th>
        <%
Set LData = Conn.Query("EfangPdtSort","Order By PSort_ID")
Do while not (LData.EOF or LData.BOF)
%>
        <tr align="center"> 
          <td width="114" nowrap class="DataListGrid" height="26"><%=LData("PSort_Sign")%> </td>
          <td width="233" nowrap class="DataListGrid"><%=LData("PSort_Name")%> </td>
          <td width="65" nowrap class="DataListGrid" title="修改"><a href="Pdt_SortUpd.asp?Sign=<%=LData("PSort_Sign")%>"><img src="pic/button_edit.png" width="12" height="13" border="0"></a></td>
          <td width="67" nowrap class="DataListGrid"><a href="Pdt_SortUpd.asp?Cmd=Del&Sign=<%=LData("PSort_Sign")%>" onClick="if(!confirm('确认要删此商品分类吗?')){return false;}" title="删除"><img src="pic/button_drop.png" width="11" height="13" border="0"></a> 
          </td>
        </tr>
        <%
LData.movenext 
Loop
Set LData=Nothing
%>
      </table>
<br>
<br>
<table width="510" border="0" align="center" cellpadding="0" cellspacing="0">
   <form name="form1" method="post" action="?Cmd=Add" onSubmit="return CheckForm(this)"><tr> 
    <td>
        新商品分类编号: 
        <input name="Sign" type="text" class="InputOne" id="Admin_User2" maxlength="20">
        <input name="Submit" type="submit" class="ButtonOne" value="创建新商品分类">
        <script language="JavaScript">
function CheckForm(form){
	if (form.Sign.value=="") {
		alert("请填写新商品分类编号!");
		form.Sign.focus();
		return false;
	}
	return true;
}
</script>
      </td>
  </tr></form>
</table>
</div>
		</td>
	</tr>
</table>
<% Call ExitEnd(False) %>
</body>
<script language="JavaScript">
<!--
	document.parentWindow.onresize = fn_RejustViewPanel ;
	fn_RejustViewPanel ( ) ;
	//alert ( document.body.clientWidth + ":" + viewPanel.clientWidth ) ;
//-->
</script>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -