www.gusucode.com > 运动用品商城网站系统源代码程序 > feyok/ad_changehwaddt.asp

    <!--#include file="conn.asp"-->
<!--#include file="ad_chk.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=inc/css.css rel=STYLESHEET type=text/css>
<body topmargin="5" leftmargin="5" rightmargin="5" bottommargin="5">
<%
if Request.Cookies("venshop")("admin_class")<>0 and Request.Cookies("venshop")("admin_class")<>1 then
response.write "你没有这个权限!"
response.end
end if
%>
<%
if request("action")="save" then
hw_id=request("hw_id")
    if not(isnumeric(request("hw_price1"))) or not(isnumeric(request("hw_price2"))) or not(isnumeric(request("hw_price3"))) or not(isnumeric(request("hw_kucun"))) or not(isnumeric(request("hw_jifen"))) or not(isnumeric(request("hw_jifen3"))) then
        errmsg="<br>"+"<li>价格、库存、积分必须为数字且不能为空"
        founderr=true
    end if
    
    if request("hw_name")="" then
        errmsg=errmsg+"<br>"+"<li>名称不能为空"
        founderr=true
    end if
    
    if  not(isnumeric(request("hw_buys"))) then
        errmsg=errmsg+"<br>"+"<li>够买数量不能为除数字之外的其它字符"
        founderr=true
    end if
    
    if not(isnumeric(request("hw_xu"))) then
        errmsg=errmsg+"<br>"+"<li>排列序号不能为除数字之外的其它字符"
        founderr=true
    end if
    
    if request("hw_content2")="" then
        errmsg=errmsg+"<br>"+"<li>详细介绍不能为空"
        founderr=true
    end if
    
    if request("hw_pic")<>"" and instr(request("hw_pic"),"*")=0 then
        errmsg=errmsg+"<br>"+"<li>商品图片必须以*号分割,否则将会出错"
        founderr=true
    end if
hw_content=request("hw_content")
hw_content=replace(hw_content," ","&nbsp;")
hw_content=replace(hw_content,chr(13)&chr(10),"<br>")

if founderr=true then
response.write errmsg
response.write "<br>"
response.write "<a href=# onClick=history.go(-1)><font color=#ff0000>>></font></a>"
response.end
else

host=lcase(request.servervariables("HTTP_HOST"))

set rs=server.createobject("adodb.recordset")
sql="select top 1 * from venshop_hwt"
rs.open sql,conn,1,3
rs.addnew
rs("pinpai_id")=1
rs("sort_id")=1
rs("nsort_id")=1
rs("hw_name")=request("hw_name")
rs("hw_keyword")=request("hw_keyword")
rs("hw_weight")=request("hw_weight")
rs("hw_yunfei")=request("hw_yunfei")
rs("hw_buys")=request("hw_buys")
rs("hw_price1")=request("hw_price1")
rs("hw_price2")=request("hw_price2")
rs("hw_price3")=request("hw_price3")
rs("hw_kucun")=request("hw_kucun")
rs("hw_jifen")=request("hw_jifen")
rs("hw_jifen3")=request("hw_jifen3")
rs("hw_sn")=request("hw_sn")
rs("hw_xu")=request("hw_xu")
rs("hw_content")=hw_content
rs("hw_content2")=request("hw_content2")
rs("kxaa")=request("kxaa")
rs("kxab")=request("kxab")
rs("kxba")=request("kxba")
rs("kxbb")=request("kxbb")
if request("hw_pic")<>"" then
rs("hw_pic")=request("hw_pic")
else
rs("hw_pic")="*img/noimage.jpg"
end if
rs("tjindex")=1
rs("tjsort")=request("tjsort")
rs("tejia")=request("tejia")
rs("hw_date")=now()
rs("ziduan")=request("ziduan0")
for i=1 to 49
rs("ziduan")=rs("ziduan")&"##"&request("ziduan"&i)
next
rs.update
rs.close
set rs=nothing
call addok(addt,"ad_changehwaddt.asp?hw_id="&hw_id,"ad_delhwt.asp")


end if
else
hw_id=request("hw_id")
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_hwt where hw_id="&hw_id&"" 
rs.open sql,conn,1,1
sort=rs("sort_id")
nsort=rs("nsort_id")
%>
<table border="0" cellpadding="5" cellspacing="0" class="st">

<form name="form" method="post" action="ad_changehwaddt.asp?hw_id=<%=hw_id%>&action=save">
<tr> 
  <td class="s0">产品名称:<input type="text" name="hw_name" size="20" class=input value="<%=rs("hw_name")%>"><font color="#FF0000"> 
** </font>购买次数:<input type="text" name="hw_buys" size="20" class=input value="<%=rs("hw_buys")%>"><font color="#FF0000">&nbsp;** <img border="0" src="Img/ad_help.gif" class="helpimg" alt="购买数量:该商品被购买的次数,理论上都是0,如果您想让商品在热销排行显示可以改大"></font></td>
</tr>
<tr><td class="s1">关 键 字:<input type="text" name="hw_keyword" size="20" class=input value="<%=rs("hw_keyword")%>"><img border="0" src="Img/ad_help.gif" class="helpimg" alt="为空时默认为商品名称">
<%if yunfei=2 then%>商品运费:<input type="text" name="hw_yunfei" size="20" class=input value="<%=rs("hw_yunfei")%>"><%else%><input type="hidden" name="hw_yunfei" value="<%=rs("hw_yunfei")%>"><%end if%>
<%if yunfei=3 then%>商品重量:<input type="text" name="hw_weight" size="20" class=input value="<%=rs("hw_weight")%>"><%else%><input type="hidden" name="hw_weight" value="<%=rs("hw_weight")%>"><%end if%>
</td></tr>
<tr>
  <td class="s0">市场价格:<input type="text" name="hw_price1" size="20" class=input value="<%=rs("hw_price1")%>"><font color="#FF0000"> 
**</font>
    普通会员价格:<input type="text" name="hw_price2" size="20" class=input value="<%=rs("hw_price2")%>"><font color="#FF0000"> ** </font>VIP会员价格 <input type="text" name="hw_price3" size="20" class=input value="<%=rs("hw_price3")%>"> 
	<font color="#FF0000"> **</font></td>
</tr>
<tr>
  <td class="s1">产品库存:<input type="text" name="hw_kucun" size="20" class=input value="<%=rs("hw_kucun")%>"><font color="#FF0000"> 
**</font>
   普通会员积分:<input type="text" name="hw_jifen" size="14" class=input value="<%=rs("hw_jifen")%>">
</font><font color="#FF0000"> **&nbsp;</font>VIP会员积分<font color="#FF0000"> </font>
	<input type="text" name="hw_jifen3" size="15" class=input value="<%=rs("hw_jifen3")%>"><font color="#FF0000"> 
	**<img border="0" src="Img/ad_help.gif" class="helpimg" alt="商品库存:商品的总量,积分:客户购买该商品后会获得此积分"></font></td>
</tr>
<tr>
  <td class="s0">产品编号:<input type="text" name="hw_sn" size="20" class=input value="<%=rs("hw_sn")%>">&nbsp;&nbsp;&nbsp; 排列序号:<input type="text" name="hw_xu" size="20" class=input value="<%=rs("hw_xu")%>"><font color="#FF0000">&nbsp;**</font>
<img border="0" src="Img/ad_help.gif" class="helpimg" alt="请输入数字,越大显示越靠前"></td>
</tr>
<tr><td class="s1">
<input type="text" name="kxaa" size="6" class=input value="<%=rs("kxaa")%>">:<input type="text" name="kxab" size="20" class=input value="<%=rs("kxab")%>">
<font color="#FF0000">可选参数一</font>&nbsp;<img border="0" src="Img/ad_help.gif" class="helpimg" alt="前面输入商品参数,后面输入具体选择值,用/隔开;如:选择尺码 41/41/43/44/45"></td></tr>
<tr><td class="s0">
<input type="text" name="kxba" size="6" class=input value="<%=rs("kxba")%>">:<input type="text" name="kxbb" size="20" class=input value="<%=rs("kxbb")%>"><font color="#FF0000"> 
可选参数二</font>&nbsp;<img border="0" src="Img/ad_help.gif" class="helpimg" alt="前面输入商品参数,后面输入具体选择值,用/隔开;如:选择尺码 41/41/43/44/45"></td></tr> 
 
 
<tr> 
  <td class="s0"> 简单介绍:</td>
</tr>
<tr> 
  <td valign="top" class="s1"> 
    <textarea rows="4" name="hw_content" cols="80"><%if rs("hw_content")<>"" then
htmlc=replace(rs("hw_content"),"<br>",chr(13))
htmlc=replace(htmlc,"&nbsp;"," ")    
response.write htmlc
end if%></textarea>
  </td>
</tr>
<tr><td class="s0">详细介绍:</td></tr>
<tr><td align="center" class="s1"><!--#include file="ad_int.asp"--></td></tr>
<tr> 
  <td class="s0"> 商品图片:&nbsp; <img border="0" src="Img/ad_help.gif" class="helpimg" alt="可以输入多个图片,必须用*号隔开"></td>
</tr>
<tr> 
  <td class="s1"> 
    <textarea rows="2" name="hw_pic" cols="80"><%=rs("hw_pic")%></textarea><font color="#FF0000"> **</font></td>
</tr>
<tr> 
  <td class="s0">
<IFRAME src="upfile.asp?atype=hw_pic" frameBorder=0 width="95%" height="30" scrolling=no height=21></IFRAME><img border="0" src="Img/ad_help.gif" class="helpimg" alt="点击“浏览”选择要上传的图片,然后点击“上传”"></td>
</tr>
<tr> 
  <td class="s1">推荐商品:
  <%if rs("tjindex")=0 then%>
  是<input type="radio" name="tjindex" value="1">否<input type="radio" name="tjindex" value="0" checked>
  <%else%>
  是<input type="radio" name="tjindex" value="1" checked>否<input type="radio" name="tjindex" value="0">
  <%end if%>
  <img border="0" src="Img/ad_help.gif" class="helpimg" alt="即:推荐商品">
  </td>
</tr>
<tr> 
  <td class="s0">类别推荐:
  <%if rs("tjsort")=0 then%>
  是<input type="radio" name="tjsort" value="1">否<input type="radio" name="tjsort" value="0" checked>
  <%else%>
  是<input type="radio" name="tjsort" value="1" checked>否<input type="radio" name="tjsort" value="0">
  <%end if%>
  <img border="0" src="Img/ad_help.gif" class="helpimg" alt="分类下推荐商品">
  </td>
</tr>
<tr> 
  <td class="s1">是否特价:
  <%if rs("tejia")=0 then%>
  是<input type="radio" name="tejia" value="1">否<input name="tejia" type="radio" value="0" checked>
  <%else%>
  是<input type="radio" name="tejia" value="1" checked>否<input name="tejia" type="radio" value="0">
  <%end if%>
  <img border="0" src="Img/ad_help.gif" class="helpimg" alt="特价商品">
  </td>
</tr>
<tr> 
  <td class="s0">
<input type="submit" value=" 修改 " name="B1" class=input onClick="document.form.hw_content2.value = frames.message.document.body.innerHTML;" >
<input type="reset" value=" 重写 " name="B2" class=input>
<input name="hw_content2" type="hidden" id="hw_content2" value="">
</td>
</tr></form></table>
<%
rs.close
set rs=nothing
end if
%><!--#include file="ad_bottom.asp"-->