开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB源码(ASP,PHP,...) > 查看源码
editproduct.asp
资源名称：shop2.rar　[点击查看]
上传用户：btntkt
上传日期：2021-04-16
资源大小：5296k
文件大小：15k
源码类别：

WEB源码(ASP,PHP,...)

开发平台：

DOS

editproduct.asp：源码内容
  1. <!--#include file="conn.asp"-->
  2. <%if session("admin")="" then
  3. response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='login.asp';</script>"
  4. response.End
  5. end if
  6. dim bookid
  7. bookid=request.QueryString("id")
  8. if not isnumeric(bookid) then 
  9. response.write"<script>alert(""非法访问!"");location.href=""../index.asp"";</script>"
  10. response.end
  11. end if
  12. %>
  13. <html>
  14. <head>
  15. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  16. <link href="../images/css.css" rel="stylesheet" type="text/css">
  17. </head>
  19. <body>
  20. <%
  21. dim count
  22. set rs=server.createobject("adodb.recordset")
  23. rs.open "select * from ssort order by Nclassidorder",conn,1,1
  24. set rs2=server.createobject("adodb.recordset")
  25. rs2.open "select * from xsort order by xpx",conn,1,1
  26. %>
  27. <script language = "JavaScript">
  28. var onecount;
  29. var threecount;
  30. onecount=0;
  31. threecount=0
  32. subcat3=new Array();
  33. <%
  34. count = 0
  35. do while not rs2.eof 
  36. %>
  37. subcat3[<%=count%>] = new Array("<%= trim(rs2("xclass"))%>","<%= rs2("nclassid")%>","<%= rs2("id")%>");
  38. <%
  39. count = count + 1
  40. rs2.movenext
  41. loop
  42. rs2.close
  43. %>
  44. threecount=<%=count%>;
  45. subcat = new Array();
  46. <%
  47. count = 0
  48. do while not rs.eof 
  49. %>
  50. subcat[<%=count%>] = new Array("<%= trim(rs("nclass"))%>","<%= rs("anclassid")%>","<%= rs("nclassid")%>");
  51. <%
  52. count = count + 1
  53. rs.movenext
  54. loop
  55. rs.close
  56. %>
  57. onecount=<%=count%>;
  58. function changelocation(locationid)
  59.     {
  60.     document.myform.nclassid.length = 0; 
  61.     var locationid=locationid;
  62.     var i;
  63.     for (i=0;i < onecount; i++)
  64.         {
  65.             if (subcat[i][1] == locationid)
  66.             { 
  67.              document.myform.nclassid.options[document.myform.nclassid.length] = new Option(subcat[i][0], subcat[i][2]);
  68.             }        
  69.         } changelocation3(document.myform.nclassid.options[document.myform.nclassid.selectedIndex].value)
  70.     }
  71. function changelocation3(locationid)
  72.     {
  73.     document.myform.xclassid.length = 0;
  74.     var locationid=locationid;
  75.     var i;
  76.     for (i=0;i < threecount; i++)
  77.         {
  78.             if (subcat3[i][1] == locationid)
  79.             { 
  80.              document.myform.xclassid.options[document.myform.xclassid.length] = new Option(subcat3[i][0], subcat3[i][2]);
  81.             }
  82.         }
  83.     } 
  84. //-->
  85. </script>
  86. <table class="tableBorder" width="90%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
  87. <tr> 
  88. <td align="center" background="../images/admin_bg_1.gif"><b><font color="#ffffff">修改商品</font></b></td>
  89. </tr>
  90. <tr> 
  91. <form name="myform" method="post" action="saveaddproduct.asp?action=edit&id=<%=bookid%>">
  92. <td> 
  93.                                 <table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" bgcolor="#FFFFFF">
  94.           <tr > 
  95.             <td width="30%" align="right" bgcolor="fbf4f4">选择分类：</td>
  96.             <td bgcolor="fbf4f4">大类： 
  97.               <%dim rs1
  98. set rs1=server.CreateObject("adodb.recordset")
  99. rs1.open "select * from products where bookid="&bookid,conn,1,1
  100.     rs.open "select * from bsort order by anclassidorder",conn,1,1
  101. if rs.eof and rs.bof then
  102. response.write "请先添加栏目。"
  103. response.end
  104. else
  105. %>
  106. <select name="anclassid" size="1" id="anclassid" onChange="changelocation(document.myform.anclassid.options[document.myform.anclassid.selectedIndex].value)">
  107. <%
  108. dim selclass
  109. selclass=rs("anclassid")
  110. do while not rs.eof
  111. response.write "<option value="&rs("anclassid")
  112. if rs1("anclassid")=rs("anclassid") then response.write " selected "
  113. response.write ">"&trim(rs("anclass"))&"</option>"
  114. rs.movenext
  115. loop
  116. end if
  117. rs.close
  118. %>
  119. </select>
  120. 小类：
  121. <select name="nclassid" size="1" id="nclassid" onChange="changelocation3(document.myform.nclassid.options[document.myform.nclassid.selectedIndex].value)">
  122. <%
  123. rs.open "select * from ssort where anclassid="&rs1("anclassid"),conn,1,1
  124. if not(rs.eof and rs.bof) then
  125. %>
  126. <% 
  127. dim selclass3
  128. selclass3=rs("nclassid")
  129. do while not rs.eof
  130. response.write  "<option value="&rs("nclassid")
  131. if rs1("nclassid")=rs("nclassid") then response.write " selected "
  132. response.write ">"&trim(rs("nclass"))&"</option>"
  133. rs.movenext
  134. loop
  135. end if
  136. rs.close
  137. set rs = nothing
  138. %>
  139. </select>
  140. 子类：
  141. <select name="xclassid">
  142. <%
  143. rs2.open "select * from xsort where nclassid="&rs1("nclassid"),conn,1,1
  144. if not(rs2.eof and rs2.bof) then
  145. do while not rs2.eof%>
  146. <option value="<%=rs2("id")%>"<%if rs1("xclassid")=rs2("id") then%> selected <%end if%> ><%=rs2("xclass")%></option>
  147. <% rs2.movenext
  148. loop
  149. end if
  150. rs2.close
  151. set rs2= nothing
  152. %>
  153. </select> </td>
  154.           </tr>
  155.           <tr > 
  156.             <td align="right" bgcolor="#fbf4f4">商品名称 </td>
  157.             <td bgcolor="fbf4f4"> <input name="bookname" type="text" id="bookname" size="30" value="<%=trim(rs1("bookname"))%>"> 
  158.             </td>
  159.           </tr>
  160.           <tr > 
  161.             <td align="right" bgcolor="#fbf4f4">商品编号</td>
  162.             <td bgcolor="fbf4f4"><input name="grade" type="text" id="grade"  value="<%=trim(rs1("grade"))%>">
  163.               <img src="images/help.gif" alt="商品编号如不填写，系统将自动生成唯一编号" width="14" height="14"></td>
  164.           </tr>
  165.           <tr > 
  166.             <td align="right" bgcolor="#fbf4f4">商品品牌</td>
  167.             <td bgcolor="fbf4f4"><input name="pingpai" type="text" id="pingpai" value="<%=trim(rs1("pingpai"))%>" size="20"> 
  168.               <%
  169.    set rs_s=server.createobject("adodb.recordset")
  170.    rs_s.open "select * from brand order by pingpaiorder ",conn,1,1
  171.    %>
  172.               <select name="select" onchange="(document.myform.pingpai.value=this.options[this.selectedIndex].value)">option selected>请选择品牌 
  173.                 <%
  174.    while not rs_s.eof
  175.    %>
  176.                 <option value="<%=rs_s("pingpainame")%>"><%=rs_s("pingpainame")%></option>
  177.                 <%
  178.    rs_s.movenext
  179.    wend
  180.    rs_s.close
  181.    set rs_s=nothing
  182.    %>
  183.               </select></td>
  184.           </tr>
  185.           <tr > 
  186.             <td align="right" bgcolor="#fbf4f4"> 商品规格 </td>
  187.             <td bgcolor="fbf4f4"> <input name="isbn" type="text" id="isbn" value="<%=trim(rs1("isbn"))%>"></td>
  188.           </tr>
  189.           <tr bgcolor="#fbf4f4" > 
  190.             <td align="right">商品尺码</td>
  191.             <td><input name="chima" type="text" id="chima" value="<%=trim(rs1("chima"))%>" size="30">
  192.               <img src="images/help.gif" alt="请用 / 作为不同颜色的分隔,可为空。不能出现*字等特殊字符" width="14" height="14"> 
  193.             </td>
  194.           </tr>
  195.           <tr bgcolor="#fbf4f4" > 
  196.             <td align="right">商品颜色</td>
  197.             <td><input name="yanse" type="text" id="yanse" value="<%=trim(rs1("yanse"))%>" size="30">
  198.               <img src="images/help.gif" alt="请用 / 作为不同颜色的分隔,可为空。不能出现*字等特殊字符" width="14" height="14"> 
  199.             </td>
  200.           </tr>
  201.           <tr > 
  202.             <td align="right" bgcolor="#fbf4f4"> 商品单位</td>
  203.             <td bgcolor="fbf4f4"> <input name="bookchuban" type="text" id="bookchuban" size="8" value="<%=trim(rs1("bookchuban"))%>"> 
  204.               <%
  205. set rs_s=server.createobject("adodb.recordset")
  206. rs_s.open "select * from unit order by danweiorder ",conn,1,1
  207. %>
  208.               <select name="select2" onChange="(document.myform.bookchuban.value=this.options[this.selectedIndex].value)">
  209.                 <option selected>请选择单位</option>
  210.                 <%
  211. while not rs_s.eof
  212. %>
  213.                 <option value="<%=rs_s("danweiname")%>"><%=rs_s("danweiname")%></option>
  214.                 <%
  215. rs_s.movenext
  216. wend
  217. rs_s.close
  218. set rs_s=nothing
  219. %>
  220.               </select> </td>
  221.           </tr>
  222.           <tr > 
  223.             <td align="right" bgcolor="#fbf4f4">商品价格 </td>
  224.             <td bgcolor="fbf4f4"> 市场价： 
  225.               <input name="shichangjia" type="text" id="shichangjia" size="6" onKeyPress = "return regInput(this, /^d*.?d{0,2}$/, String.fromCharCode(event.keyCode))" 
  226. onpaste = "return regInput(this, /^d*.?d{0,2}$/, window.clipboardData.getData('Text'))"
  227. ondrop = "return regInput(this, /^d*.?d{0,2}$/, event.dataTransfer.getData('Text'))" value="<%=FormatNum(rs1("shichangjia"),2)%>">
  228.               会员价： 
  229.               <input name="huiyuanjia" type="text" id="huiyuanjia" size="6" onKeyPress = "return regInput(this, /^d*.?d{0,2}$/, String.fromCharCode(event.keyCode))" 
  230. onpaste = "return regInput(this, /^d*.?d{0,2}$/, window.clipboardData.getData('Text'))"
  231. ondrop = "return regInput(this, /^d*.?d{0,2}$/, event.dataTransfer.getData('Text'))" value="<%=FormatNum(rs1("huiyuanjia"),2)%>">
  232.               VIP价： 
  233.               <input name="vipjia" type="text" id="vipjia" size="6" onKeyPress = "return regInput(this, /^d*.?d{0,2}$/, String.fromCharCode(event.keyCode))" 
  234. onpaste = "return regInput(this, /^d*.?d{0,2}$/, window.clipboardData.getData('Text'))"
  235. ondrop = "return regInput(this, /^d*.?d{0,2}$/, event.dataTransfer.getData('Text'))" value="<%=FormatNum(rs1("vipjia"),2)%>"></td>
  236.           </tr>
  237.           <tr > 
  238.             <td align="right" bgcolor="#fbf4f4">商品库存 </td>
  239.             <td bgcolor="fbf4f4"> 库 存： 
  240.               <input name="kucun" type="text" id="kucun" value="<%=rs1("kucun")%>" size="6" onKeyPress = "return regInput(this, /^[0-9]*$/, String.fromCharCode(event.keyCode))"
  241. onpaste = "return regInput(this, /^[0-9]*$/, window.clipboardData.getData('Text'))"
  242. ondrop = "return regInput(this, /^[0-9]*$/, event.dataTransfer.getData('Text'))" >
  243.               已销售： 
  244.               <input name="chengjiaocount" type="text" id="chengjiaocount" value="<%=rs1("chengjiaocount")%>" size="6" onKeyPress = "return regInput(this, /^[0-9]*$/, String.fromCharCode(event.keyCode))"
  245. onpaste = "return regInput(this, /^[0-9]*$/, window.clipboardData.getData('Text'))"
  246. ondrop = "return regInput(this, /^[0-9]*$/, event.dataTransfer.getData('Text'))" readonly>
  247.               积 分： 
  248.               <input name="yeshu" type="text" id="yeshu" value="<%=rs1("yeshu")%>" size="6" onKeyPress = "return regInput(this, /^[0-9]*$/, String.fromCharCode(event.keyCode))"
  249. onpaste = "return regInput(this, /^[0-9]*$/, window.clipboardData.getData('Text'))"
  250. ondrop = "return regInput(this, /^[0-9]*$/, event.dataTransfer.getData('Text'))"></td>
  251.           </tr>
  252.           <tr > 
  253.             <td align="right" bgcolor="#fbf4f4">商品图片 </td>
  254.             <td bgcolor="fbf4f4"> <input name="bookpic" type="text" id="bookpic" size="30" value="<%=trim(rs1("bookpic"))%>"> 
  255.               &nbsp; <input type="button" name="Submit2" value="上传小图片" onClick="window.open('../upload.asp?formname=myform&editname=bookpic&uppath=upfile/proimage&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')"> 
  256.             </td>
  257.           </tr>
  258.           <tr > 
  259.             <td align="right" bgcolor="fbf4f4"></td>
  260.             <td bgcolor="fbf4f4"><input name="zhuang" type="text" id="zhuang" size="30" value="<%=trim(rs1("zhuang"))%>"> 
  261.               &nbsp; <input type="button" name="Submit2" value="上传大图片" onClick="window.open('../upload.asp?formname=myform&editname=zhuang&uppath=upfile/proimage&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')"> 
  262.             </td>
  263.           </tr>
  264.           <tr bgcolor="#fbf4f4" > 
  265.             <td align="right">META_DESCRIPTION：</td>
  266.             <td><textarea name="metad" cols="66" rows="2" id="metad"><%=rs1("metad")%></textarea>
  267.               <img src="images/help.gif" alt="可留空，系统自动采用网站设置中的META_DESCRIPTION信息" width="14" height="14"><br>
  268.             </td>
  269.           </tr>
  270.           <tr bgcolor="#fbf4f4" > 
  271.             <td align="right">META_KEYWORDS：</td>
  272.             <td><textarea name="metak" cols="66" rows="2" id="metak"><%=rs1("metak")%></textarea>
  273.               <img src="images/help.gif" alt="可留空，系统自动采用网站设置中的META_KEYWORDS信息" width="14" height="14"><br>
  274.             </td>
  275.           </tr>
  276.           <tr > 
  277.             <td rowspan="2" align="right" valign="top" bgcolor="fbf4f4">详细说明</td>
  278.             <td bgcolor="fbf4f4"> <input type="hidden" name="bookcontent" value="<% = Server.HtmlEncode(rs1("bookcontent")) %>"> 
  279.               <IFRAME ID="bookcontent" SRC="editubb/ewebeditor.asp?id=bookcontent&style=standard" FRAMEBORDER="0" SCROLLING="no" WIDTH="550" HEIGHT="350"></IFRAME></td>
  280.           </tr>
  281.           <tr > 
  282.             <td bgcolor="fbf4f4"><font color="ff0000">上传图片的 <strong>最大 </strong>宽度不能超过 
  283.               550 像素，在不影响网速的情况下建议上传图片大小在 100KB 以内。 </font></td>
  284.           </tr>
  285.           <tr > 
  286.             <td align="right" bgcolor="fbf4f4"></td>
  287.             <td height="30" bgcolor="fbf4f4"> <input name="newsbook" type="checkbox" id="newsbook" value="1" <%if rs1("newsbook")=1 then%>checked<%end if%>>
  288.               新品　 
  289.               <input name="bestbook" type="checkbox" id="bestbook" value="1" <%if rs1("bestbook")=1 then%>checked<%end if%>>
  290.               推荐　 
  291.               <input name="tejiabook" type="checkbox" id="tejiabook" value="1" <%if rs1("tejiabook")=1 then%>checked<%end if%>>
  292.               特价<br>
  293.               　 
  294.               <input type="submit" name="Submit" value="修改保存" OnClick=""></td>
  295.           </tr>
  296.         </table>
  297.       </td>
  298.     </form>
  299. </tr>
  300. </table>
  301. <%rs1.close
  302. set rs1=nothing
  303. conn.close
  304. set conn=nothing%>
  305. <!--#include file="foot.asp"-->
  306. </body>
  307. </html>
  308. <SCRIPT LANGUAGE="JavaScript">
  309. <!--
  310. function check()
  311. {
  312.    if(checkspace(document.myform.bookname.value)) {
  313. document.myform.bookname.focus();
  314.     alert("请输入商品名称！");
  315. return false;
  316.   }
  317.      if(checkspace(document.myform.shichangjia.value)) {
  318. document.myform.shichangjia.focus();
  319.     alert("请输入市场价格！");
  320. return false;
  321.   }
  322.      if(checkspace(document.myform.huiyuanjia.value)) {
  323. document.myform.huiyuanjia.focus();
  324.     alert("请输入会员价格！");
  325. return false;
  326.   }
  327.      if(checkspace(document.myform.vipjia.value)) {
  328. document.myform.vipjia.focus();
  329.     alert("请输入VIP价格！");
  330. return false;
  331.   }
  333. //-->
  334. </script>
  335. <script>
  336. function regInput(obj, reg, inputStr)
  337. {
  338. var docSel = document.selection.createRange()
  339. if (docSel.parentElement().tagName != "INPUT") return false
  340. oSel = docSel.duplicate()
  341. oSel.text = ""
  342. var srcRange = obj.createTextRange()
  343. oSel.setEndPoint("StartToStart", srcRange)
  344. var str = oSel.text + inputStr + srcRange.text.substr(oSel.text.length)
  345. return reg.test(str)
  346. }
  347. </script>
  348. <%
  349. function HTMLEncode(fString)
  350. fString = Replace(fString, "</P><P>", CHR(10) & CHR(10))
  351. fString = Replace(fString, "<BR>", CHR(10))
  352. HTMLEncode = fString
  353. end function
  355. function FormatNum(num,n)
  356. if num<1 then
  357. num="0"&cstr(FormatNumber(num,n))
  358. else
  359. num=cstr(FormatNumber(num,n))
  360. end if
  361. FormatNum=replace(num,",","")
  362. end function
  363. %>