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

📄 productcatalog.asp

📁 不错的ASP整站源代码。在IIS环境下运行都没有问题
💻 ASP
字号:
<%@language="VBscript"%>
<!--#include file="../checkuser.asp" -->  
<!--#include file="../../include/db_conn.asp" -->
<%
 m_ver = Trim(request("ver"))
 if m_ver="cn" then 
  tmpstr_t="[中文版]"
 elseif  m_ver="en"  then 
 tmpstr_t="[英文版]"
 else
 response.write "错误访问页面,请重试" 
 response.end    
 End If%> 
<html>
<head>
<script language=JavaScript>
function add_sort(formName){
  if(formName.boardname1.value==""){     
      alert("请输入产品目录名!");
      formName.boardname1.focus();
      return false;
      }
  else
		if(formName.parentcatalog.value=="-1"){     
		   alert("请选择一级目录名!");
		   formName.parentcatalog.focus();
		   return false;
		   }
		return true;
}

function edit_sort(formName){
  if(formName.hidCatalogID.value==""){
      alert("请在产品目录列表中选择要修改的产品目录名!");
      return false;
      }
  else if(formName.old_boardname.value==formName.boardname2.value){
      alert("请修改的产品目录名!");
      return false;
      }
  else if(formName.boardname2.value==""){
      alert("请输入新产品目录名!");
      formName.boardname2.focus();
      return false;
      }
  else
      return true;
}

function change_sort(formName,cid){
	//alert(formName.name);
	//alert(cid);
	if(cid!=0){
		formName.action = 'productcatalog.asp';
		formName.submit();
	}
}

function move_sort(formName){
  if(formName.selCatalogSource.value=="0"){
      alert("请选择要移动的产品目录!");
      return false;
      }
  else if(formName.selCatalogTarget.value=="0"){
      alert("第三级的目录只能移动到第二级目录下!");
      return false;
      }
  else
      return true;
}
</script>
<link href="../include/styles.css" rel="stylesheet" type="text/css">
</head>
  <body>
     
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
  <tr bgcolor="#006699"> 
          <td height="35" colspan="3"><div align="center"><span style="font-size:14.9px"><b><font color="#FFFFFF">维 
            护 产 品 类 别<%=tmpstr_t%></font></b></span></div></td>
        </tr>
          <tr>
            <td align="center" bgcolor="#FFFFFF"> 
              <table width="100%" border="0" cellpadding="2" cellspacing="2">
                <tr bgcolor="#CCCCCC"> 
                  <td width="271" height="25" align="center" valign="top" bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="2" cellpadding="2" class="p9" height="199">
              <tr> 
                        <td height="22" bgcolor="#f0f0f0"> 现有产品目录列表:</td>
                      </tr>
                      <tr> 
                        <td valign="top" align=left> 
                        <!--目录树列表列表   -->
      					<!--#include file="include/menutree.asp"-->
                        </td>
                      </tr>
                    </table></td>
                  <td width="461" align="center" valign="top" bgcolor="#FFFFFF"><table width="100%" border="0" cellpadding="2" cellspacing="0" bgcolor="#f0f0f0" class="p9">
              <%
					set adoRS = server.CreateObject("ADODB.RECORDSET")
					set adoRS1 = server.CreateObject("ADODB.RECORDSET")
					set adoRS2 = server.CreateObject("ADODB.RECORDSET")
					sqlstr1 = "SELECT catalogID,CatalogName from ys_product2_Catalog where parentID=catalogiD and version='"&m_ver&"'"
					adoRS.Open sqlstr1,conn

                     %>
                     <!--新增产品类别 开始-->
                     <form name="frm_add" method="post" action="sort_ok.asp" onSubmit="javascript:return add_sort(document.frm_add);">
                      <tr> 
                        
                  <td colspan="2" nowrap bgcolor="#FFFFFF">新增产品类别</td>
                      </tr>
                      <tr> 
                        
                  <td width="75" align="right" nowrap>所属类别: </td>
                        
                  <td nowrap> 
                    <select name="parentcatalog" class="p9">
                          <option selected value="-1">请点击类别名称选择</option>
                            <option value="0">顶级类别</option>
                            <%
							do until adoRS.EOF 
								Response.Write "<option value='"& adoRS("CatalogID") & "'>⊙" & adoRS("catalogname") & "</option>"
 							    adoRS.MoveNext 
							loop
                            adoRS.Close 
                            %>
                          </select></td>
                      </tr>
                      <tr> 
                        
                  <td align="right" nowrap>类别名称: </td>
                        
                  <td nowrap>
<input name="boardname1" type="text" class="Input" size="22"> 
						<input type="hidden" name="sort_action" value="add_new">
						<input type="hidden" name="ver" value="<%=m_ver%>">
                          <input name="Submit2" type="submit" class="Input" value=" 增 加 "></td>
                      </tr>
                      </form>
                     <!--新增产品类别 结束-->
                     
                     <!--变更产品类别名称 开始-->
                     <form name="frm_edit" method="post" action="sort_ok.asp" onSubmit="javascript:return edit_sort(document.frm_edit);">
                      <tr> 
                        
                  <td colspan="2" nowrap bgcolor="#FFFFFF">类别名称修改</td>
                      </tr>
                      <tr> 
                        
                  <td align="right" nowrap>所选原类别: </td>
                        
                  <td nowrap>
<input name="old_boardname" type="text" class="Input" size="22" readonly>  </td>
                      </tr>
                      <tr> 
                        
                  <td align="right" nowrap>更 改 为:</td>
                        
                  <td nowrap> 
                    <input name="boardname2" type="text" class="Input" size="22"> 
                          <input name="Submit22" type="submit" class="Input" value=" 修 改 "></td>
                      </tr>
                    <input type="hidden" name="sort_action" value="edit">
                    <input type="hidden" name="hidCatalogID">
                    <input type="hidden" name="sort_name">
					<input type="hidden" name="ver" value="<%=m_ver%>">
                       </form>
                     <!--变更产品类别名称 结束-->
                     
                  
                    </table>
					<!--产品类别排序 开始-->
					<iframe src="nextnum.asp?ver=<%=m_ver%>" align=center width="100%" id="nextnum" name="nextnum" height="186" marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no></iframe>
					<!--产品类别排序 结束-->                    
                    
                    </td>
                </tr>
              </table> </td>
          </tr>
        </table>
</body>
</html>

⌨️ 快捷键说明

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