ad_edit.asp 凡人网络购物系统 2008源码程序 - ASP源码程序

www.gusucode.com > 凡人网络购物系统 2008源码程序 > Admin/ad_edit.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  then
response.write "你没有这个权限!"
response.end
end if
%>
<%
if request("action")="edit" then
if request("title")="" then
response.write "标题不能为空"
response.end
elseif request("nr")="" then
response.write "内容不能为空"
response.end
end if
title=request("title")
nr=request("nr")
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_book where id="&request.querystring("id")
rs.open sql,conn,1,3
rs("title")=title
rs("nr")=nr
ids=rs("typeid")
rs.update
rs.close
set rs=nothing
call editok(editt,"ad_edit.asp?id="&request.querystring("id"),"ad_booktype.asp?id="&ids)
end if
set rs=server.createobject("adodb.recordset")
sql="select * from venshop_book where id="&request.querystring("id")
rs.open sql,conn,1,1%>
<table border="0" cellpadding="5" cellspacing="0" class="st">
<form name="form" method="post" action="ad_edit.asp?action=edit&id=<%=request.querystring("id")%>">
<tr><td colspan="2" class="sa"><b>内容修改</b></td></tr>
<tr><td class="s1">标题：</td><td class="s1"><input type="text" name="title" size="50" value="<%=trim(rs("title"))%>"></td></tr>
<tr><td class="s0">内容： </td><td class="s0"></td></tr>
<tr><td colspan="2" class="s1"><!--#include file="ad_in.asp"--></td></tr>
<tr><td colspan="2" align="center" class="s0"><input type="submit" value="提交信息" name="B1" class=input onClick="document.form.nr.value = frames.message.document.body.innerHTML;" >
<input name="nr" type="hidden" id="nr" value=""></td>
</tr></form></table>
<%rs.close
set rs=nothing
%><!--#include file="ad_bottom.asp"-->