www.gusucode.com > 黑鹰自助链管理系统 1.1 商业版码程序 > adminhymm/admin_template.asp
<!--#include file="mdb.asp"--> <% if session("adminlogin")<>sessionvar then Response.Write("<script language=javascript>alert('你尚未登录,或者超时了!请重新登录');this.location.href='index.asp';</script>") Response.End End if dim id,modify,template id=request("id") modify=request("modify") template=request("template") if modify="yes" then if template="" then Response.Write("<script language=javascript>alert('请输入模板内容!');this.location.href='Admin_template.asp?id="&id&"';</script>") Response.End end if set r=server.createobject("adodb.recordset") r.open "select * from template where id="&id,conn,1,3 if not r.eof then r("id")=id r("template")=template r.update Response.Write("<script language=javascript>alert('模板已成功更改!');this.location.href='Admin_template.asp?id="&r("id")&"';</script>") Response.End else Response.Write("<script language=javascript>alert('无法完成请求!');this.location.href='Admin_template.asp?id="&r("id")&"';</script>") Response.End end if r.close set r=nothing end if %> <HTML> <HEAD> <TITLE>模板修改管理</TITLE> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <LINK REL="stylesheet" HREF="css.css" TYPE="text/css"> </HEAD> <BODY> <form action='Admin_template.asp?id=<%=id%>' method='post'> <% set r=server.createobject("adodb.recordset") r.open "select * from template where id="&id,conn,1,3 if not r.eof then %> <table width="95%" border="0" cellspacing="1" cellpadding="8" align="center" bgcolor="#D3D3D"> <tr><td bgcolor="#D3D3D3" align="center">模板修改管理</td> </tr><tr><td bgcolor="#FFFFFF"> 模板类别: <input name="name" value='<%=r("name")%>' disabled> </td> </tr> <tr><td bgcolor="#FFFFFF"> <textarea cols="100%" rows="25" name="template"><%=r("template")%></textarea> </td> </tr> <tr><td bgcolor="#FFFFFF"> <input type="submit"> </td> </tr> </table> <% end if r.close set r=nothing %> <input name="modify" value="yes" type="hidden"> </form> </BODY> </HTML>