www.gusucode.com > 掌柜网店购物系统 4.0码程序 > admin/editbook.asp

    <!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆!');window.location.href='login.asp';</script>"
response.End
end if
dim bookid
bookid=request.QueryString("id")
%>
<html><head><title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../img/css.css" rel="stylesheet" type="text/css">
<style>
BODY {
SCROLLBAR-FACE-COLOR: #e7e7e7;  
SCROLLBAR-HIGHLIGHT-COLOR: #ffffff;
SCROLLBAR-SHADOW-COLOR: #d4d0c8;
SCROLLBAR-3DLIGHT-COLOR: #FFFFFF;
SCROLLBAR-ARROW-COLOR:  #ffffff;
SCROLLBAR-TRACK-COLOR: #f7f7f7;
SCROLLBAR-DARKSHADOW-COLOR: #e7e7e7; 
}
.style3 {color: #FF6600}
</style>
</head>
<%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>
<body>
<table class="tableBorder" width="96%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
<tr> 
<td align="center" bgcolor="#dfdfdf"><b>修改商品</font></b></td>
</tr>
<tr> 
<form name="myform" method="post" action="saveaddbook.asp?action=edit&id=<%=bookid%>">
<td> 
                                <table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FFFFFF">
                                  <tr bgcolor="#f2f2f2"> 
                                    <td width="30%" align="right">选择分类:</td>
                                    <td>大类:
									<%dim rs1
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 bgcolor="#f2f2f2"> 
                                    <td align="right"><input type="text" name="mch" size="12" value="<%=rs1("mch")%>"></td>
                                    <td> 
                                      <input name="bookname" type="text" id="bookname" size="30" value="<%=trim(rs1("bookname"))%>"> 浮动价 
                                      <select name="fudongjia" size=1>
                                        <%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="#f2f2f2"> 
                                    <td align="right"><input type="text" name="pp" size="12" value="<%=rs1("pp")%>"></td>
                                    <td>
									<input name="pingpai" type="text" id="pingpai" value="<%=trim(rs1("pingpai"))%>">
                                      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.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_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="#f2f2f2"> 
                                  <td align="right"><input type="text" name="isbn1" size="12" value="<%=rs1("isbn1")%>"></td>
								  <td>
								  <input name="isbn" type="text" id="isbn" value="<%=trim(rs1("isbn"))%>"></td>
                                  </tr>
                                  <tr bgcolor="#f2f2f2"> 
                                  <td align="right"><input type="text" name="jj" size="12" value="<%=rs1("jj")%>"></td>
								  <td>
								  <input name="bookchuban" type="text" id="bookchuban" size="8" value="<%=trim(rs1("bookchuban"))%>">
                                      <%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from danwei order by danweiorder ",conn,1,1
%>
                                      <select name="select2" onChange="(document.myform.bookchuban.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
rs_s.close
set rs_s=nothing
%>
                                      </select>
                                    </td>
                                  </tr>
                                  <tr bgcolor="#f2f2f2"> 
                                  <td align="right">
								  <input type="text" name="jg" size="12" value="<%=rs1("jg")%>">
                                    </td>
                                    <td>
		市场价:<input name="shichangjia" type="text" id="shichangjia" size="6" 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="6" 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="6" 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 bgcolor="#f2f2f2"> 
                                    <td align="right">
									<input type="text" name="zl" size="12" value="<%=rs1("zl")%>"></td>
                                    <td>
		库 存: <input name="kucun" type="text" id="kucun" value="<%=rs1("kucun")%>" size="6" 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="6" 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="6" 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 bgcolor="#f2f2f2"> 
                                    <td align="right">
									<input type="text" name="tp" size="12" value="<%=rs1("tp")%>"></td>
                                    <td>
									<input name="bookpic" type="text" id="bookpic" size="30" 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')">
              &nbsp;<font color=#ff0000>**</font> 100×100 </td>
                                  </tr>
                                  <tr bgcolor="#f2f2f2"> 
                                    <td align="right"></td>
                                    <td><input name="zhuang" type="text" id="zhuang" size="30" 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')">
              <font color=#ff0000>**</font> 200×200 (请保持同等比例) </td>
                                  </tr>
                                  <tr bgcolor="#f2f2f2"> 
                                    <td valign="top" align="right">
									<input type="text" name="nr" size="12" value="<%=rs1("nr")%>"></td>
                                    <td><textarea name="bookcontent" cols="66" rows="15" id="bookcontent"><%=HTMLEncode(trim(rs1("bookcontent")))%></textarea>
                                    </td>
                                  </tr>
                                  <tr bgcolor="#f2f2f2"> 
                                    <td align="right"></td>
                                    <td height="30">
									<input name="newsbook" type="checkbox" id="newsbook" 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="tejiabook" value="1" <%if rs1("tejiabook")=1 then%>checked<%end if%>>
									特价 <input type="submit" name="Submit" value="修 改" onClick="return check();"></td>
                                  </tr>
                                </table>
                              </td>
                            </form>
                          </tr>
                        </table>
<%rs1.close
set rs1=nothing
conn.close
set conn=nothing%>
<!--#include file="copyright.asp"-->
</body>
</html>

<SCRIPT LANGUAGE="JavaScript">
<!--
function check()
{
   if(checkspace(document.myform.bookname.value)) {
	document.myform.bookname.focus();
    alert("请输入商品名称!");
	return false;
  }
     if(checkspace(document.myform.shichangjia.value)) {
	document.myform.shichangjia.focus();
    alert("请输入市场价格!");
	return false;
  }
     if(checkspace(document.myform.huiyuanjia.value)) {
	document.myform.huiyuanjia.focus();
    alert("请输入会员价格!");
	return false;
  }
     if(checkspace(document.myform.vipjia.value)) {
	document.myform.vipjia.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>
<%
function HTMLEncode(fString)
	fString = Replace(fString, "</P><P>", CHR(10) & CHR(10))
	fString = Replace(fString, "<BR>", CHR(10))
	HTMLEncode = fString
end function
%>