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

📄 b2b_editproducts.asp

📁 小型网上购物网站
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
if session("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录!');history.go(-1);</script>"
response.End
else
if request.cookies("Buy2Buy")("admin")="" then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('请先登录!');history.go(-1);</script>"
response.End
end if
end if
'限制查看权限管理员
if session("rank")=3 then
conn.close
set conn = nothing
response.Write "<script language='javascript'>alert('您的管理权限未达到此操作等级!');history.go(-1);</script>"
response.End
end if

dim id,rsedit
id=SafeRequest("id",1)

set rsedit=server.CreateObject("adodb.recordset")
rsedit.open "select * from product where id="&id,conn,1,1

%>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.STYLE1 {color: #000000;
	font-weight: bold;
}
.STYLE2 {color: #FF0000}
-->
</style>
<script language="JavaScript" src="calendar.js"></script>
<body>
<table width="99%" border="5" align="center" cellpadding="5" cellspacing="5" bordercolor="#CCCCCC" bgcolor="#FFFFFF">
  <tr> 
    <td background="images/topbg.gif"><span class="STYLE1"><img src="images/pic5.gif" width="28" height="22" align="absmiddle" />您现在所在的位置是: <a href="adminhelp.asp">管理首页</a> -&gt; <span class="STYLE2">管理商品</span></span></td>
  </tr>
  <tr><form name="myform" method="post" action="b2b_saveaddproduct.asp?action=edit&id=<%=id%>">
    <td bgcolor="#FFFFFF">
        <br>
        <table width="98%" border="2" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#CCCCCC">
          <tr> 
            <td width="17%" align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>选择分类:</strong></td>
            <td bgcolor="#FFFFFF"> 
<select name="categoryid">  
<%
sort(0)
dim ii
ii=0
sub sort(selec)
	sql="select * from category where ParentID = "&selec&" order by categoryorder"
	Set Rs1=Conn.Execute(sql)
	do while not rs1.eof
if selec=0 then
%>
<option value="<%=int(rs1("categoryid"))%>" <% if int(rs1("categoryid"))=rsedit("categoryid") Then Response.write("Selected") %>><%=rs1("category")%></option>
<%
else
%>
<option value="<%=int(rs1("categoryid"))%>" <% if int(rs1("categoryid"))=rsedit("categoryid") Then Response.write("Selected") %>><%=string(ii*2," ")%><%=rs1("category")%></option>
<%
end if
ii=ii+1
	sort rs1("categoryid")
ii=ii-1
	rs1.movenext
	loop
rs1.close
Set Rs1 = Nothing
end sub

%>
		</select>            </td>
          </tr>
          <tr>
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品名称: </strong></td>
            <td bgcolor="#FFFFFF"><input name="name" type="text" class="input_sr" id="name" value="<%=trim(rsedit("name"))%>" size="30"></td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品编号:            </strong></td>
            <td bgcolor="#FFFFFF"><input name="code" type="text" class="input_sr" id="code" value="<%=trim(rsedit("code"))%>" size="30"></td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品品牌:            </strong></td>
            <td bgcolor="#FFFFFF"><input name="mark" type="text" class="input_sr" id="mark" value="<%=trim(rsedit("mark"))%>" size="30">
			<%
set rsMark=server.createobject("adodb.recordset")
rsMark.open "select * from b2b_parductppp order by MarkTop ",conn,1,1
%>
              <select name="SelectMark" onChange="(document.myform.mark.value=this.options[this.selectedIndex].value)">
                <option selected>请选择品牌</option>
				<% Do While Not rsMark.Eof %>
                <option value="<% = Trim(rsMark("MarkName")) %>"><% = rsMark("MarkName")%></option>
                <%
rsMark.movenext
Loop
rsMark.close
set rsMark=nothing
%></select></td>
          </tr>
          <tr>
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>供货商信息:</strong></td>
            <td bgcolor="#FFFFFF"><input name="Supplier" type="text" class="input_sr" id="Supplier" value="<%=trim(rsedit("Supplier"))%>" size="30" >
                <select name="selectSupplier" id="selectSupplier" onChange="(document.myform.Supplier.value=this.options[this.selectedIndex].value)">
                  <option selected>请选择供货商</option>
                  <%
				sql="select SupplierName from Supplier Order by SupplierCode"
				set michaelrs=conn.execute(sql)
				while not michaelrs.eof
				%>
                  <option value="<%=Trim(michaelrs("SupplierName"))%>"><%=Trim(michaelrs("SupplierName"))%></option>
                  <%
				michaelrs.movenext
				wend
				%>
              </select></td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>简介关键字:            </strong></td>
            <td bgcolor="#FFFFFF"><input name="introduce" type="text" class="input_sr" id="introduce" value="<%=trim(rsedit("introduce"))%>" size="30"></td>
          </tr>
          <tr bgcolor="#f7f7f7"> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品价格:</strong></td>
            <td height="70" bgcolor="#FFCC00"><table width="100%" border="0" cellspacing="2" cellpadding="2">
              <tr>
                <td>市场价:</td>
                <td>普通会员价:</td>
                <td><%
			  	mSql="select * from b2b_userjb where grpID <> 4 order by grpID"
				set mRs=conn.execute(mSql)
				dim p(3),i
				i=1
				while not mRs.eof
					p(i)=mRs("grpName")
					i=i+1
					mRs.movenext 
				wend
				response.write p(1)&"价"
			  %>
                  :</td>
                <td><%response.write p(2)&"价"%>
                  :</td>
                <td><%response.write p(3)&"价"%>
                  :</td>
                <td>成本价:</td>
              </tr>
              <tr>
                <td><img src="images/pic6.gif" width="22" height="22" align="absmiddle" />
                  <input name="price1" type="text" class="input_sr" id="price1" value="<%=rsedit("price1")%>" size="5">
元</td>
                <td><img src="images/pic6.gif" width="22" height="22" align="absmiddle" />
                  <input name="price2" type="text" class="input_sr" id="price2" value="<%=rsedit("price2")%>" size="5">
元</td>
                <td><img src="images/pic6.gif" width="22" height="22" align="absmiddle" />
                  <input name="price3" type="text" class="input_sr" id="price3" value="<%=rsedit("price3")%>" size="5">
元</td>
                <td><img src="images/pic6.gif" width="22" height="22" align="absmiddle" />
                  <input name="price4" type="text" class="input_sr" id="price4" value="<%=rsedit("price4")%>" size="5">
元</td>
                <td><img src="images/pic6.gif" width="22" height="22" align="absmiddle" />
                  <input name="price5" type="text" class="input_sr" id="price5" value="<%=rsedit("price5")%>" size="5">
元</td>
                <td><img src="images/pic6.gif" width="22" height="22" align="absmiddle" />
                  <input name="price6" type="text" class="input_sr" id="price6" value="<%=rsedit("price6")%>" size="5" />
元</td>
              </tr>
              
            </table>            </td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>库存积分:</strong></td>
            <td bgcolor="#FFFFFF">库 存: 
              <input name="stock" type="text" class="input_sr" id="stock" value="<%=trim(rsedit("stock"))%>" size="6">
              件,赠送积分: 
              <INPUT NAME="score" TYPE="text" class="input_sr" ONKEYPRESS	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))" VALUE="<%=trim(rsedit("score"))%>" SIZE="4"
		ONPASTE		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
		ONDROP		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))">
            分</td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品材质:</strong></td>
            <td bgcolor="#FFFFFF"><input name="grade" type="text" class="input_sr" id="grade" value="<%=trim(rsedit("grade"))%>" size="10">
              <select name="selectMaterial" onChange="(document.myform.grade.value=this.options[this.selectedIndex].value)">
			  <option selected>请选择材质</option>
			  <%
			  	mSql="select * from buy2buyMaterial order by IndexID"
				set mRs=conn.execute(mSql)
				if not (mRs.eof and mRs.bof) then
				while not mRs.eof
			  %>
			   <option value="<% = Trim(mRs("MaterialName")) %>"><% = mRs("MaterialName")%></option>
			  <%
			  		mRs.movenext
			  	wend
				end if
				mRs.close
				set mRs=nothing			  
			  %>
            </select>              </td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品单位:</strong></td>
            <td bgcolor="#FFFFFF"><input name="type" type="text" class="input_sr" id="type2" value="<%=trim(rsedit("type"))%>" size="10">
              <select name="selectUnit" onChange="(document.myform.type.value=this.options[this.selectedIndex].value)">
			  <option selected>请选择单位</option>
			  <%
			  	mSql="select * from buy2buyUnits order by IndexID"
				set mRs=conn.execute(mSql)
				if not (mRs.eof and mRs.bof) then
				while not mRs.eof
			  %>
			   <option value="<% = Trim(mRs("UnitName")) %>"><% = mRs("UnitName")%></option>
			  <%
			  		mRs.movenext
			  	wend
				end if
				mRs.close
				set mRs=nothing			  
			  %>
            </select>              </td>
          </tr>
          <tr>
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品重量: </strong></td>
            <td bgcolor="#FFFFFF"><input name="pweight" type="text" class="input_sr" id="pweight" value="<%=trim(rsedit("pweight"))%>" size="30"></td>
          </tr>
          <tr>
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>附加邮费: </strong></td>
            <td bgcolor="#FFFFFF"><input name="vipprice" type="text" class="input_sr" id="vipprice" value="<%=rsedit("vipprice")%>" size="6">
元</td>
          </tr>
          <tr>
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品缩略图: </strong></td>
            <td bgcolor="#FFFFFF"><input name="spic" type="text" class="input_sr" id="spic" value="<%=trim(rsedit("spic"))%>" size="30">
                <input name="Submit11" type="button" class="input_bot" onClick="window.open('b2b_upimgloads.asp?formname=myform&editname=spic&uppath=../buy2buyupfile&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')" value="上传商品缩图"></td>
          </tr>
          <tr> 
            <td align="right" background="images/topbg.gif" bgcolor="#f4f4f4"><strong>商品原图:            </strong></td>
            <td bgcolor="#FFFFFF"><input name="pic" type="text" class="input_sr" id="pic" value="<%=trim(rsedit("pic"))%>" size="30">
            <input name="Submit11" type="button" class="input_bot" onClick="window.open('b2b_upimgload.asp?formname=myform&editname=pic&uppath=../buy2buyupfile&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')" value="上传商品原图"></td>
          </tr>
          <tr> 
            <td align="right" valign="top" bgcolor="#f4f4f4"><strong> 详细简介:<br>            
            </strong></td>
            <td bgcolor="#FFFFFF">
		  <INPUT type="hidden" name="detail" value="<% = Server.HtmlEncode(rsedit("detail")) %>">	
          <iframe ID="detail" src="htmledit/ewebeditor.asp?id=detail&style=standard" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>		  </td></tr>
          <tr>
            <td align="right" bgcolor="#f4f4f4"><strong>商品类别:</strong></td>
            <td bgcolor="#FFFFFF"><input name="recommend" type="radio" value="1" <%if rsedit("recommend") = 1 then%>checked<%end if%> />
新品上架:如果您选择新品中架,此商品将在首页新品区块显示;<br />
<input type="radio" name="recommend" value="2" <%if rsedit("recommend") = 2 then%>checked<%end if%>/>
首页推荐:此商品将不在新品区块显示,而是直接显示在首页推荐商品区块;<br />
<input type="radio" name="recommend" value="3" <%if rsedit("recommend") = 3 then%>checked<%end if%>/>
暂时下架:对于已发布的商品,如果您需要取消发布(即前台显示),您可以选择此项。
<hr size="0" />
<input name="Submit2" type="submit" class="input_bot" onClick="return check();" value="确认以上修改" /></td>
          </tr>
        </table>
        <br></td>
  </form>
  </tr>
</table>
<%rsedit.close
set rsedit=nothing
conn.close
set conn=nothing%>

<SCRIPT LANGUAGE="JavaScript">
<!--
function check()
{
   if(checkspace(document.myform.name.value)) {
	document.myform.name.focus();
    alert("请输入商品名称!");
	return false;
  }
     if(checkspace(document.myform.price1.value)) {
	document.myform.price1.focus();
    alert("请输入市场价!");
	return false;
  }
  if(checkspace(document.myform.price2.value)) {
	document.myform.putongjia.focus();
    alert("请输入普通会员价!");
	return false;
  }
     if(checkspace(document.myform.vipprice.value)) {
	document.myform.price2.focus();
    alert("请输入VIP会员价!");
	return false;
  }
 
}
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}
//-->
</script>
<script>
	function regInput(obj, reg, inputStr)
	{
		var docSel	= document.selection.createRange()
		if (docSel.parentElement().tagName != "INPUT")	return false
		oSel = docSel.duplicate()
		oSel.text = ""
		var srcRange	= obj.createTextRange()
		oSel.setEndPoint("StartToStart", srcRange)
		var str = oSel.text + inputStr + srcRange.text.substr(oSel.text.length)
		return reg.test(str)
	}
</script>

⌨️ 快捷键说明

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