📄 editsn.asp
字号:
if (subcat[i][1] == locationid)
{
document.myform.nclassid.options[document.myform.nclassid.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
changelocation3(document.myform.nclassid.options[document.myform.nclassid.selectedIndex].value)
}
function changelocation3(locationid)
{
document.myform.xclassid.length = 0;
var locationid=locationid;
var i;
for (i=0;i < threecount; i++)
{
if (subcat3[i][1] == locationid)
{
document.myform.xclassid.options[document.myform.xclassid.length] = new Option(subcat3[i][0], subcat3[i][2]);
}
}
}
//-->
</script>
<body>
<table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/right_top2.gif">
<tr>
<td width="1%"> </td>
<td width="99%"><table width="100%" border="0" cellspacing="0" cellpadding="5">
<tr>
<td width="30%" style="font-size:14px;color:#ffffff"> <strong><font color="#000000">修改商品</font></strong></td>
<td width="70%" align="right"> </td>
</tr>
</table></td>
</tr>
</table>
<br><form name="myform" method="post" action="saveaddsn.asp?action=edit&id=<%=shopid%>">
<table width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#9DB2D4">
<tr bgcolor="#F0F3F8">
<td width="16%">
<div align="center">选择分类：</div></td>
<td colspan="3">
大类:
<%
dim rs1
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from shop_snsn where shopid="&shopid,conn,1,1
dq_2=rs1("dq")
dq_2=split(dq_2,",")
dq1=dq_2(0)
dq2=dq_2(1)
dq3=dq_2(2)
dq4=dq_2(3)
psdq_2=rs1("psdq")
psdq_2=split(psdq_2,",")
psdq1=psdq_2(0)
psdq2=psdq_2(1)
psdq3=psdq_2(2)
psdq4=psdq_2(3)
rs.open "select * from shop_anclass order by anclassidorder",conn,1,1
if rs.eof and rs.bof then
response.write "请先添加栏目。"
response.end
else
%>
<select name="anclassid" size="1" id="anclassid" onChange="changelocation(document.myform.anclassid.options[document.myform.anclassid.selectedIndex].value)">
<% dim selclass
selclass=rs("anclassid")
do while not rs.eof
response.write "<option value="&rs("anclassid")
if rs1("anclassid")=rs("anclassid") then response.write " selected "
response.write ">"&trim(rs("anclass"))&"</option>"
rs.movenext
loop
end if
rs.close
%>
</select>
小类：
<select name="nclassid" size="1" id="nclassid" onChange="changelocation3(document.myform.nclassid.options[document.myform.nclassid.selectedIndex].value)">
<%rs.open "select * from shop_Nclass where anclassid="&rs1("anclassid"),conn,1,1
if not(rs.eof and rs.bof) then
%>
<%
dim selclass3
selclass3=rs("nclassid")
do while not rs.eof
response.write "<option value="&rs("nclassid")
if rs1("nclassid")=rs("nclassid") then response.write " selected "
response.write ">"&trim(rs("nclass"))&"</option>"
rs.movenext
loop
end if
rs.close
set rs = nothing
%>
</select>
<font color="#FF0000"> </font> 子类：
<select name="xclassid">
<%
rs2.open "select * from shop_xclass where nclassid="&rs1("nclassid"),conn,1,1
if not(rs2.eof and rs2.bof) then
do while not rs2.eof%>
<option value="<%=rs2("id")%>"<%if rs1("xclassid")=rs2("id") then %> selected <%end if %> ><%=rs2("xclass")%></option>
<% rs2.movenext
loop
end if
rs2.close
set rs2= nothing
%>
</select>
</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">
<div align="center">
<input type="text" name="mch" size="12" value="<%=rs1("mch")%>" class="wenbenkuang">
</div></td>
<td colspan="3">
<input name="shopname" class="wenbenkuang" type="text" id="shopname" size="30" value="<%=trim(rs1("shopname"))%>">
浮动价
<select name="fudongjia" size=1 class="wenbenkuang">
<%set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from shop_fudong order by id ",conn,1,1
if rs_s.recordcount=0 then
response.write "请先添加浮动价"
else
while not rs_s.eof
%>
<option value=<%=rs_s("id")%><%if rs1("banci")=rs_s("id") then%> selected<%end if%>><%=rs_s("shuoming")%></option>
<%
rs_s.movenext
wend
end if
rs_s.close
set rs_s=nothing%>
</select>
</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">
<div align="center">
<input type="text" name="pp" size="12" value="<%=rs1("pp")%>" class="wenbenkuang">
</div></td>
<td colspan="3">
<input name="pingpai" type="text" id="pingpai" class="wenbenkuang" size="20" value="<%=trim(rs1("pingpai"))%>">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * From shop_pingpai order by pingpaiorder ",conn,1,1
%>
<select name="select" class="wenbenkuang" onChange="(document.myform.pingpai.value=this.options[this.selectedIndex].value)">
<option selected>请选择品牌</option>
<%
while not rs_s.eof
%>
<option value="<%=rs_s("pingpainame")%>"><%=rs_s("pingpainame")%></option>
<%
rs_s.movenext
wend
rs_s.close
set rs_s=nothing
%>
</select>
</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">
<div align="center">
<input type="text" name="isbn1" class="wenbenkuang" size="12" value="<%=rs1("isbn1")%>">
</div></td>
<td colspan="3">
<input name="isbn" type="text" class="wenbenkuang" id="isbn" size="30" value="<%=trim(rs1("isbn"))%>">
</td>
</tr>
<tr bgcolor="#F0F3F8">
<td width="16%">
<div align="center">
<input type="text" name="jj" class="wenbenkuang" size="12" value="<%=rs1("jj")%>">
</div></td>
<td colspan="3">
<input name="shopchuban" class="wenbenkuang" type="text" id="shopchuban" size="10" value="<%=trim(rs1("shopchuban"))%>">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * From shop_danwei order by danweiorder ",conn,1,1
%>
<select name="select2" class="wenbenkuang" onChange="(document.myform.shopchuban.value=this.options[this.selectedIndex].value)">
<option selected>请选择单位</option>
<%
while not rs_s.eof
%>
<option value="<%=rs_s("danweiname")%>"><%=rs_s("danweiname")%></option>
<%
rs_s.movenext
wend
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -