shjia_inc.asp

商业网站开发有源代码可以运行

</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>
<%dim bookid,rs1
	bookid=request.QueryString("id")
	set rs1=server.CreateObject("adodb.recordset")
	rs1.open "select * from shop_books where bookid="&bookid,conn,1,1
%>
<form name="myform" method="post" action="admin/saveaddbook.asp?action=edit&id=<%=bookid%>">
<table width="100%" border=0 align=center cellpadding=1 cellspacing=1 bgcolor=#FFCC00>
  <tr><td bgcolor=#FFFFEE colspan="2">
      <div align="center"><font color="#FF0000">商家商品修改</font></div>
    </td>
  </tr>
  <%
set rs=server.createobject("adodb.recordset")
rs.open "select * from shjia where username='"&request.cookies("songxf")("shjianame")&"' ",conn,1,1
%>
  <%dim count
set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_Nclass order by Nclassidorder ",conn,1,1%>
<script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
   count = 0
   do while not rs.eof 
%>
subcat[<%=count%>] = new Array("<%= trim(rs("Nclass"))%>","<%= rs("anclassid")%>","<%= rs("Nclassid")%>");
<%
        count = count + 1
        rs.movenext
        loop
        rs.close
%>
		
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.myform.Nclassid.length = 0; 

    var locationid=locationid;
    var i;
    for (i=0;i < onecount; i++)
        {
            if (subcat[i][1] == locationid)
            { //这句不是很理解
             document.myform.Nclassid.options[document.myform.Nclassid.length] = new Option(subcat[i][0], subcat[i][2]);
            }        
        }
        
    }    
</script>
<tr bgcolor="#FFFFFF"> 
                        <td width="15%"> 
                                      <div align="center">选择分类：</div>
                                    </td>
                                    <td colspan="2"> 
                                      <%
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from shop_books where bookid="&bookid,conn,1,1

    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)">
<% 
        do while not rs.eof
%>
                                        <option value="<%=rs("anclassid")%>" <%if rs1("anclassid")=rs("anclassid") then%>selected<%end if%>><%=trim(rs("anclass"))%></option>
                                        <%
        rs.movenext
        loop
	end if
        rs.close
%>
                                      </select>
                                      小类： 
                                      <select name="Nclassid">
                                        <%rs.open "select * from shop_Nclass where anclassid="&rs1("anclassid") ,conn,1,1
do while not rs.eof%>
                                        <option value="<%=rs("NclassID")%>" <%if rs1("nclassid")=rs("nclassid") then%>selected<%end if%>><%=rs("Nclass")%></option>
                                        <% rs.movenext
loop
        rs.close
        set rs = nothing
        
%>
                                      </select>
                                      </td>
                      </tr>
  <tr> 
    <td bgcolor=#FFFFEE width="9%"> 
     <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=1 ",conn,1,1
%>
                                      <input type="text" name="mch" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%> 
    </td>
	<td bgcolor=#FFFFEE width="91%"> 
      <input name="bookname" type="text" id="bookname" size="15" value="<%=trim(rs1("bookname"))%>">
      　浮动价 
      <select name="fudongjia" size=1>
        <%set rs=server.createobject("adodb.recordset")
rs.open "select * from shop_fudong order by id ",conn,1,1
if rs.recordcount=0 then
response.write "请先添加浮动价"
else
while not rs.eof
%>
        <option value=<%=rs("id")%><%if rs1("banci")=rs("id") then%> selected<%end if%>><%=rs("shuoming")%></option>
        <%
rs.movenext
wend
end if%>
      </select>
    </td>
  </tr>
  <tr> 
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=2 ",conn,1,1
%>
                                      <input type="text" name="pp" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor=#FFFFEE> 
      <input name="pingpai" type="text" id="pingpai" size="15" value="<%=trim(rs1("pingpai"))%>">
      <%
set rs=server.createobject("adodb.recordset")
rs.open "select * from pingpai order by pingpaiorder ",conn,1,1
%>
      <select name="select" onchange="(document.myform.pingpai.value=this.options[this.selectedIndex].value)">
        <option selected>请选择品牌</option>
        <%
while not rs.eof
%>
        <option value="<%=rs("pingpainame")%>"><%=rs("pingpainame")%></option>
        <%
rs.movenext
wend
rs.close
set rs=nothing
%>
      </select>
    </td>
  </tr>
  <tr> 
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=3 ",conn,1,1
%>
                                      <input type="text" name="isbn1" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor=#FFFFEE> 
      <input name="isbn" type="text" id="isbn" size="15" value="<%=trim(rs1("isbn"))%>">
    </td>
  </tr>
  <tr> 
    
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=4 ",conn,1,1
%>
                                      <input type="text" name="jj" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor=#FFFFEE> 
      <input name="bookchuban" type="text" id="bookchuban" size="5" value="<%=trim(rs1("bookchuban"))%>">
      <%
set rs=server.createobject("adodb.recordset")
rs.open "select * from danwei order by danweiorder ",conn,1,1
%>
      <select name="select" onchange="(document.myform.bookchuban.value=this.options[this.selectedIndex].value)">
        <option selected>请选择单位</option>
        <%
while not rs.eof
%>
        <option value="<%=rs("danweiname")%>"><%=rs("danweiname")%></option>
        <%
rs.movenext
wend
rs.close
set rs=nothing
%>
      </select>
    </td>
  </tr>
  <tr> 
    
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=5 ",conn,1,1
%>
                                      <input type="text" name="jg" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor=#FFFFEE>市场价 
      <input name="shichangjia" type="text" id="shichangjia" size="5" onKeyPress	= "return regInput(this,	/^\d*\.?\d{0,2}$/,		String.fromCharCode(event.keyCode))" 
		onpaste		= "return regInput(this,	/^\d*\.?\d{0,2}$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^\d*\.?\d{0,2}$/,		event.dataTransfer.getData('Text'))" value="<%=rs1("shichangjia")%>">
        元，会员价 
        <input name="huiyuanjia" type="text" id="huiyuanjia" size="5" onKeyPress	= "return regInput(this,	/^\d*\.?\d{0,2}$/,		String.fromCharCode(event.keyCode))" 
		onpaste		= "return regInput(this,	/^\d*\.?\d{0,2}$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^\d*\.?\d{0,2}$/,		event.dataTransfer.getData('Text'))" value="<%=rs1("huiyuanjia")%>">
        元，VIP价 
        <input name="vipjia" type="text" id="vipjia" size="5" onKeyPress	= "return regInput(this,	/^\d*\.?\d{0,2}$/,		String.fromCharCode(event.keyCode))" 
		onpaste		= "return regInput(this,	/^\d*\.?\d{0,2}$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^\d*\.?\d{0,2}$/,		event.dataTransfer.getData('Text'))" value="<%=rs1("vipjia")%>">
      元</td>
  </tr>
  <tr> 
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=6 ",conn,1,1
%>
                                      <input type="text" name="zl" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor=#FFFFEE>库存： 
      <input name="kucun" type="text" id="kucun" value="<%=rs1("kucun")%>" size="5" onKeyPress	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))"
		onpaste		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))" >
      已销售： 
      <input name="chengjiaocount" type="text" id="chengjiaocount" value="<%=rs1("chengjiaocount")%>" size="5" onKeyPress	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))"
		onpaste		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))" readonly>
      积分： 
      <input name="yeshu" type="text" id="yeshu" value="<%=rs1("yeshu")%>" size="5" onKeyPress	= "return regInput(this,	/^[0-9]*$/,		String.fromCharCode(event.keyCode))"
		onpaste		= "return regInput(this,	/^[0-9]*$/,		window.clipboardData.getData('Text'))"
		ondrop		= "return regInput(this,	/^[0-9]*$/,		event.dataTransfer.getData('Text'))" >
    </td>
  </tr>
  <tr> 
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=7 ",conn,1,1
%>
                                      <input type="text" name="tp" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor=#FFFFEE> 
      <input name="bookpic" type="text" id="bookpic" size="15" value="<%=trim(rs1("bookpic"))%>">
      &nbsp; 
      <input type="button" name="Submit2" value="上传小图片" onClick="window.open('upload_flash.asp?formname=myform&editname=bookpic&uppath=bookpic&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')">
    </td>
  </tr>
  <tr>
    <td bgcolor=#FFFFEE>&nbsp; </td> 
    <td bgcolor=#FFFFEE> 
    <input name="zhuang" type="text" id="zhuang" size="15" value="<%=trim(rs1("zhuang"))%>">
      &nbsp; 
      <input type="button" name="Submit2" value="上传大图片" onClick="window.open('upload_flash.asp?formname=myform&editname=zhuang&uppath=bookpic&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')">
    </td>
  </tr>
  <tr> 
    <td bgcolor=#FFFFEE> 
      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=8 ",conn,1,1
%>
                                      <input type="text" name="nr" size="7" value="<%=rs_s("ziduanname")%>">
                                      <%
rs_s.close
set rs_s=nothing
%>
    </td>
      <td bgcolor=#FFFFEE> <textarea name="bookcontent" cols="42" rows="8" id="bookcontent"><%=trim(rs1("bookcontent"))%></textarea></td>
  </tr>
  <tr> 
    <td bgcolor=#FFFFEE colspan="2"> 
      <div align="center"> 
        <input name="newsbook" type="checkbox" id="bestbook" value="1" <%if rs1("newsbook")=1 then%>checked<%end if%>>
        新品　 
        <input name="bestbook" type="checkbox" id="bestbook" value="1" <%if rs1("bestbook")=1 then%>checked<%end if%>>
        推荐　 
        <input name="tejiabook" type="checkbox" id="bestbook" value="1" <%if rs1("tejiabook")=1 then%>checked<%end if%>>
        特价</div>
    </td>    
  </tr>
  <tr>
  <%rs1.close
set rs1=nothing%>
    <td bgcolor=#FFFFEE colspan="2"> 
      <div align="center"> 
        <input type="submit" name="Submit" value="添 加" onClick="return check();">
	  </div>
    </td>    
  </tr>
</table>
</form>
<%
end sub



sub myziliao()
if request.cookies("songxf")("shjianame")="" then
response.Redirect "shjia.asp"
response.End
end if
%>
<script language=JavaScript>
function IsDigit()
{
  return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';