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

📄 productsadd2.asp

📁 管理登录system 管理员:admin 密码:admin888 数据库链接文件: conn.asp 内容数据库前台链接文件 systemconn.asp 内容数据库后台链接文件 sy
💻 ASP
字号:
<!--#include file="check_login.asp"-->
<!--#include file="conn.asp"-->
<script language="Javascript">
function openScript(url, width, height){
	var Win = window.open(url,"openScript",'width=' + width + ',height=' + height + ',resizable=1,scrollbars=yes,menubar=no,status=yes' );
}
function openem()
{ 
openScript('Up1.asp',460,220); 
}
</script>
<%
LPH=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="text.css" rel="stylesheet" type="text/css">

</head>
<body  topmargin="0" leftmargin="0" rightmargin="0" <%=kkk%>>
<!--#include file="top/Ltop02.asp"-->
<table width="99%"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="5"></td>
  </tr>
</table>
<table width="99%"  border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#EFEBEF">
<form name="LPform" method="post" action="Products_save.asp">
  <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">产品名称:</td>
    <td width="87%" height="20" bgcolor="#EBEBEB">
      <input name="Lname" type="text" class="myput" id="Lname" size="35">
      <span class="BLUE">*</span></td>
  </tr>
  <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">产品类别:</td>
    <td height="20" bgcolor="#EBEBEB"><select name="Lsort" class="myput" id="Lsort">
<%  ModifyID=CInt(trim(Request.QueryString("ModifyID")))
    set rs = server.createobject("adodb.recordset")
	rs.source = "select id,content,parentid from deeptree where parentid=0 order by id desc"
    rs.open rs.source,conn,1,1
    if rs.recordcount=0 then
    response.write("没有栏目")
    end if
    while not rs.eof
    Bid=CInt(rs("id"))
	dim MYID3
	MYID3=0
	MYID3=ModifyID
%>
<option <% if MYID3=Bid then response.Write"selected" %> value="<%=Bid%>" style="background-color:#CCCCCC">╋<%=rs("content")%></option>
          <%
           set rss = server.createobject("adodb.recordset")
           rss.source = "select id,content,parentid from deeptree where parentid="&Bid
           rss.open rss.source,conn,1,1
           while not rss.eof
           Cid=CInt(rss("id"))
		   dim MYID2
			MYID2=0
			MYID2=ModifyID
           %>
           <option  <% if MYID2=Cid then response.Write "selected" %> value="<%=Bid%>-<%=Cid%>" style="background-color:#DDDDDD">&nbsp;&nbsp;┣<%=rss("content")%></option>
                <%
                 set rsss = server.createobject("adodb.recordset")
                 rsss.source = "select id,content,parentid from deeptree where parentid="&Cid
                 rsss.open rsss.source,conn,1,1
                 while not rsss.eof
	             Did=CInt(rsss("id"))
				 MYID=ModifyID
                 %>
                <option  <%if MYID=Did then response.Write "selected" %> value="<%=Bid%>-<%=Cid%>-<%=rsss("id")%>" style="background-color:#EEEEEE">&nbsp;&nbsp;&nbsp;&nbsp;├<%=rsss("content")%></option>
                 <%
                    rsss.movenext
                    wend
                    rsss.Close
                    set rsss=nothing
           rss.movenext
           wend
           rss.Close
	       set rss=nothing
  rs.movenext
  wend
  rs.close
  set rs=nothing
%>
</select>
      <span class="BLUE">*</span>(注意目录级别)</td>
  </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">产品价格:</td>
    <td height="20" bgcolor="#EBEBEB"><input name="LPrice" type="text" class="myput" id="LPrice" value="¥时价" size="20">
    (如:¥168.00)</td>
  </tr>
   <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE"> 产品编号:</td>
    <td height="20" bgcolor="#EBEBEB"><input name="LPH" type="text" class="myput" id="LPH" value="N<%=LPH%>" size="20">
    (编号不能相同,如果不明确请不要修改)</td>
  </tr>
    <tr>
      <td height="20" align="right" bgcolor="#DEDFDE">&nbsp;内容查看权限:</td>
      <td height="20" bgcolor="#EBEBEB"><span style="BORDER-BOTTOM:#CCCCCC 1px solid;">
        <select name="GroupID" class="myput" id="GroupID">
          <% 
set rsUG = server.createobject("adodb.recordset")
	rsUG.source = "select * from Nweb_UGroup order by GroupLevel "
    rsUG.open rsUG.source,conn,1,1
    if rsUG.recordcount=0 then
       response.write("没有栏目")
    end if
    while not rsUG.eof
%>
          <option value="<%=rsUG("GroupID")%>" style="background-color:#cccccc;" >┠&nbsp;<%=rsUG("GroupName")%></option>
          <%
        rsUG.movenext
    wend
    rsUG.close
set rsUG=nothing
%>
        </select>
        <input type="radio" checked name="Exclusive" value="<">
隶属
<input type="radio"  name="Exclusive" value="=">
专属 (隶属:权限值≥可查看,专属:权限值=可查看) </span></td>
    </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE"> 生 产 商:</td>
    <td height="20" bgcolor="#EBEBEB"><input name="LManufacturer" type="text" class="myput" id="LManufacturer" size="35"></td>
  </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">销 售 商:</td>
    <td height="20" bgcolor="#EBEBEB"><input name="LSellManufacturer" type="text" class="myput" id="LSellManufacturer" size="35"></td>
  </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">查询关键词:</td>
    <td height="20" bgcolor="#EBEBEB"><input name="LKeyWord" type="text" class="myput" id="LKeyWord" size="35" maxlength="10">
(检索该关键词可以找到该产品,最多能写10个汉字)</td>
  </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">是否发布:</td>
    <td height="20" bgcolor="#EBEBEB"><input name="LPutout" type="radio" value="1" checked>
      <input type="radio" name="LPutout" value="0">
      否 (选 <strong>是</strong> 时表立即发布,否则暂存于数据库中)</td>
  </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">是否为新出产品:</td>
    <td height="20" bgcolor="#EBEBEB"><input type="radio" name="LNewProduct" value="1">
  <input name="LNewProduct" type="radio" value="0" checked>
否 (选 <strong>是</strong> 时自动归类到 <strong>新出产品</strong> 中去)</td>
  </tr>
    <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">是否为热门产品:</td>
    <td height="20" bgcolor="#EBEBEB"><input type="radio" name="LHot" value="1">
  <input name="LHot" type="radio" value="0" checked>
否 (选 <strong>是</strong> 时自动归类到 <strong>热门产品</strong> 中去)</td>
  </tr>
      <tr>
    <td width="13%" height="20" align="right" bgcolor="#DEDFDE">是否为推荐产品:</td>
    <td height="20" bgcolor="#EBEBEB"><input type="radio" name="LCommend" value="1">
  <input name="LCommend" type="radio" value="0" checked>
否 (选 <strong>是</strong> 时自动归类到 <strong>推荐产品</strong> 中去)</td>
  </tr>
	<tr>
      <td height="20" align="right" bgcolor="#DEDFDE"><strong>上传产品主图</strong>:</td>
      <td height="20" bgcolor="#EBEBEB"><input name="LPattern" type="text" class="myput" id="LPattern" value="<%=imagePath%>" size="60">
    [<a href="JavaScript:openem()"><strong><font color="#0000ff">上传图片</font></strong></a>]大小200×200为最佳</td>
    </tr>
    <tr>
    <td height="20" align="right" bgcolor="#DEDFDE">产品详细介绍:</td>
    <td height="20" bgcolor="#EBEBEB"><span class="BLUE">*</span> 利用本编辑工具,可以编辑图文并茂的产品介绍,也可上传多幅图片和制作表格等。</td>
    </tr>
    <tr valign="top" bgcolor="#EBEBEB">
      <td height="20" colspan="2">
	  <INPUT type="hidden" name="content1" value="">
      <IFRAME ID="NwebEditor1" src="../WebEditor/eWebEditor.asp?id=content1" frameborder="0" scrolling="no" width="550" height="350"></IFRAME>      </td>
    </tr>
    <tr bgcolor="#DEDFDE">
      <td height="50" style='BORDER-BOTTOM: #333333 1px solid'>&nbsp;</td>
      <td height="50" style='BORDER-BOTTOM: #333333 1px solid'><input type="submit" name="Submit" value=" 添 加 ">
        <input type="reset" name="Submit2" value=" 重 置 "></td>
    </tr>
  </form>
</table>
</body>
</html>

⌨️ 快捷键说明

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