admin_addbooks.asp

php 语言写的c2c商城网站程序

<%
if request.cookies("godbook")("shjianame")="" then
response.Redirect "shjia.asp"
response.End
end if
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function checkkk()
{
     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>
<form name="myform" method="post" action="../admin/saveaddbook.asp?action=add" OnSubmit="return checkkk()">
<table class="tableBorder" width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#D6DBF7">
<tr> 
<td align="center" background="../admin/images/bg_3.gif" height="25" colspan="4"><b><font color="#ffffff">商家商品添加</font></b></td>
</tr>
<%set rs=server.createobject("adodb.recordset")
	rs.open "select * from shjia where username='"&request.cookies("godbook")("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="#D6DBF7"> 
<td width="20%" align="center">选择分类：</td>
<td width="80%"> 
	<%
	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 class="wenbenkuang" name="anclassid" size="1" id="anclassid" onChange="changelocation(document.myform.anclassid.options[document.myform.anclassid.selectedIndex].value)">
<option selected value="<%=rs("anclassid")%>"><%=trim(rs("anclass"))%></option>
<%	dim selclass
	selclass=rs("anclassid")
	rs.movenext
	do while not rs.eof
%>
<option value="<%=rs("anclassid")%>"><%=trim(rs("anclass"))%></option>
	<%
	rs.movenext
	loop
	end if
	rs.close
%>
</select>
小类：
<select class="wenbenkuang" name="Nclassid">
<%rs.open "select * from shop_Nclass where anclassid="&selclass ,conn,1,1
	if not(rs.eof and rs.bof) then
	%>
	<option selected value="<%=rs("NclassID")%>"><%=rs("Nclass")%></option>
	<% rs.movenext
	do while not rs.eof%>
	<option value="<%=rs("NclassID")%>"><%=rs("Nclass")%></option>
	<% rs.movenext
	loop
	end if
	rs.close
	set rs = nothing
%>
	</select>
</td>
</tr>
<tr> 
<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=1 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%> 
    </td>
	<td bgcolor="#D6DBF7"> 
      <input class="wenbenkuang" name="bookname" type="text" id="bookname" size="20">
	  浮动价 
      <select class="wenbenkuang" 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")%> ><%=rs("shuoming")%></option>
        <%
rs.movenext
wend
end if%>
      </select>
</td>
</tr>
<tr> 
<td bgcolor="#D6DBF7" align="center">
<%set rs_s=server.createobject("adodb.recordset")
	rs_s.open "select * from ziduan where ziduanorder=2 ",conn,1,1
	%>
<%=rs_s("ziduanname")%>：
<%rs_s.close
	set rs_s=nothing
	%>
	</td>
	<td bgcolor="#D6DBF7"> 
	<input class="wenbenkuang" name="pingpai" type="text" id="pingpai" size="20">
<%set rs=server.createobject("adodb.recordset")
	rs.open "select * from pingpai order by pingpaiorder ",conn,1,1
	%>
	<select class="wenbenkuang" 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="#D6DBF7" align="center">
<%set rs_s=server.createobject("adodb.recordset")
	rs_s.open "select * from ziduan where ziduanorder=3 ",conn,1,1
	%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
</td>
<td bgcolor="#D6DBF7">
<input class="wenbenkuang" name="isbn" type="text" id="isbn" size="20">
</td>
</tr>
<tr> 
<td bgcolor="#D6DBF7" align="center">
<%set rs_s=server.createobject("adodb.recordset")
	rs_s.open "select * from ziduan where ziduanorder=4 ",conn,1,1
	%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
	</td>
	<td bgcolor="#D6DBF7">
	<input class="wenbenkuang" name="bookchuban" type="text" id="bookchuban" size="5">
	<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from danwei order by danweiorder ",conn,1,1
%>
	<select class="wenbenkuang" 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="#D6DBF7" align="center">
<%set rs_s=server.createobject("adodb.recordset")
	rs_s.open "select * from ziduan where ziduanorder=5 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor="#D6DBF7">市场价：
		<input class="wenbenkuang" 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'))">
		会员价： 
		<input class="wenbenkuang" 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'))">
		VIP 价：
		<input class="wenbenkuang" 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'))">
		元</td>
	</tr>
	<tr> 
	<td bgcolor="#D6DBF7" align="center">
<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=6 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor="#D6DBF7">库存数：
		<input class="wenbenkuang" name="kucun" type="text" id="kucun" value="0" 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 class="wenbenkuang" name="chengjiaocount" type="text" id="chengjiaocount" value="0" 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 class="wenbenkuang" name="yeshu" type="text" id="yeshu" value="0" 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="#D6DBF7" align="center">
<%set rs_s=server.createobject("adodb.recordset")
	rs_s.open "select * from ziduan where ziduanorder=7 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
    </td>
    <td bgcolor="#D6DBF7"> 
	<input class="wenbenkuang" name="bookpic" type="text" id="bookpic" size="20">
	<input class="go-wenbenkuang" 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="#D6DBF7"></td>
    <td bgcolor="#D6DBF7"> 
    <input class="wenbenkuang" name="zhuang" type="text" id="zhuang" size="20">
	<input class="go-wenbenkuang" 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="#D6DBF7" align="center">
	<%
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from ziduan where ziduanorder=8 ",conn,1,1
%>
<%=rs_s("ziduanname")%>：
<%
rs_s.close
set rs_s=nothing
%>
	</td>
	<td bgcolor="#D6DBF7"> 
	<textarea class="wenbenkuang" name="bookcontent" cols="50" rows="10" id="bookcontent"></textarea>
	</td>
	</tr>
	<!--<tr> 
                                    <td valign="top">&nbsp;</td>
                                    <td valign="top"> 
                                      <%
set rs=server.createobject("adodb.recordset")
rs.open "select * from ziduan where ziduanorder=1 ",conn,1,1
%>
                                      <input type="text" name="ml" size="12" value="<%=rs("ziduanname")%>">
                                      <%
rs.close
set rs=nothing
%>
                                    </td>
                                    <td colspan="2"> 
                                      <textarea name="bookmulu" cols="46" rows="8" id="bookmulu"></textarea>
                                    </td>
                                  </tr>-->
<tr>
<td bgcolor="#D6DBF7"></td>
<td bgcolor="#D6DBF7"> 
<input name="newsbook" type="checkbox" id="bestbook" value="1">
新品　 
<input name="bestbook" type="checkbox" id="bestbook" value="1">
推荐　 
<input name="tejiabook" type="checkbox" id="bestbook" value="1">
特价
</td>    
</tr>
<tr> 
<td bgcolor="#D6DBF7"></td>
<td bgcolor="#D6DBF7"> 
<input class="go-wenbenkuang" type="submit" name="Submit" value=" 提交保存 ">
<input class="go-wenbenkuang" onclick="ClearReset()" type=reset name="Clear" value=" 重新填写 ">
</td>
</tr>
</table>
</form>