www.gusucode.com > 凡人网络购物系统 2008源码程序 > Admin/ad_changezp.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
zp_id=request("zp_id")
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_zp where zp_id="&zp_id&""
rs.open sql,conn,1,3
rs("zp_name")=request("zp_name")
rs("zp_price")=request("zp_price")
rs("zp_content")=request("zp_content")
rs("zp_pic")=request("zp_pic")
rs("zp_kucun")=request("zp_kucun")
rs("zp_full")=request("zp_full")
rs.update
rs.close
set rs=nothing

call editok(editt,"ad_changezp.asp?zp_id="&zp_id,"ad_delzp.asp")
else
zp_id=request("zp_id")
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_zp where zp_id="&zp_id&"" 
rs.open sql,conn,1,1
%>
<table border="0" cellpadding="5" cellspacing="0" class="st">
<form name="form" method="post" action="ad_changezp.asp?zp_id=<%=zp_id%>&action=save">
 <tr> 
   <td class="s1">赠品名称:<input type="text" name="zp_name" size="34" class=input value="<%=rs("zp_name")%>"><font color="#FF0000"> **</font></td>
 </tr>
 <tr>
   <td class="s0">满*元赠送该赠品:<input type="text" name="zp_full" size="20" class=input value="<%=rs("zp_full")%>"><font color="#FF0000">&nbsp;**</font></td>
 </tr>
 <tr>
   <td class="s1">赠品市场参考价:<input type="text" name="zp_price" size="20" class=input value="<%=rs("zp_price")%>"><font color="#FF0000"> ** </font>赠品库存数量:<input type="text" name="zp_kucun" size="20" class=input value="<%=rs("zp_kucun")%>"><font color="#FF0000"> **</font></td>
 </tr>
 <tr><td class="s0">详细介绍:</td></tr>
 <tr><td align="center" class="s1"><!--#include file="ad_in.asp"--></td></tr>
 <tr><td class="s0"> 赠品图片:<font color="#FF0000"><input type="text" name="zp_pic" size="41" value="<%=rs("zp_pic")%>"> **</font></td></tr>
 <tr> 
   <td align="center" class="s1"><IFRAME src="upfileother.asp?atype=zp_pic" frameBorder=0 width="95%" height="30" scrolling=no height=21></IFRAME></td>
 </tr>
<tr> 
   <td class="s0">
 <input type="submit" value=" 修改 " name="B1" class=input onClick="document.form.zp_content.value = frames.message.document.body.innerHTML;" >
 <input type="reset" value=" 重写 " name="B2" class=input>
 <input name="zp_content" type="hidden" id="zp_content" value="">
 </td>
</tr></form></table>
<%
rs.close
set rs=nothing
end if
%><!--#include file="ad_bottom.asp"-->