www.gusucode.com > 运动用品商城网站系统源代码程序 > feyok/ad_changehwj.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," "," ")
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>Back</font></a>"
response.end
else
host=lcase(request.servervariables("HTTP_HOST"))
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_hwj where hw_id="&hw_id&""
rs.open sql,conn,1,3
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("tejia")=1
rs("tjsort")=request("tjsort")
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 editok(editt,"ad_changehwj.asp?hw_id="&hw_id,"ad_delhwj.asp")
end if
else
hw_id=request("hw_id")
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_hwj 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_changehwj.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"> ** <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"> ** </font>VIP会员积分<font color="#FF0000"> </font>
<input type="text" name="hw_jifen3" size="13" 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")%>">
排列序号：<input type="text" name="hw_xu" size="20" class=input value="<%=rs("hw_xu")%>"><font color="#FF0000"> **</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> <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> <img border="0" src="Img/ad_help.gif" class="helpimg" alt="前面输入商品参数，后面输入具体选择值，用/隔开；如：选择尺码 41/41/43/44/45"></td></tr>
<%
set rss=server.CreateObject("adodb.recordset")
rss.open "select * from venshop_sort where sort_id="&sort&"",conn,1,1
zd=split(rss("ziduan"),"##")
ziduan=split(rs("ziduan"),"##")
for i=0 to 49
if zd(i)<>"" then%>
<%
end if
next
rss.close
set rss=nothing
%>
<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," "," ")
response.write htmlc
end if%></textarea>
</td>
</tr>
<tr><td class="s0">详细介绍：</td></tr>
<tr><td align="center" class="s1"><!--#include file="ad_inj.asp"--></td></tr>
<tr><td class="s0"> 商品图片： <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="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"-->