hover_aboutus_edit.asp

来自「后台默认管理账号密码：admin 后台主要功能如下：一、系统管理：管理员管理」· ASP 代码 · 共 91 行

<!--#include file="toptable.asp"-->
<!--#include file="Inc/articleCHAR.INC"-->
<%
'=================================
'   良精科技企业管理系统
'   QQ在线客服:65961930 82993936
'   咨询定购Tel:010-81991660
'      [e-mail] 
'        www.liangjing.net
'  copyright(c)2001-2008 HoverCms 2007特别版
'=================================
%>
<%if Request.QueryString("no")="eshop" then

id=request("id")
title=request("title")
content=htmlencode2(Request("content"))


If title="" Then
response.write "SORRY <br>"
response.write "请输入更新内容的标题"
response.end
end if
If content="" Then
response.write "SORRY <br>"
response.write "内容不能为空"
response.end
end if


Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Hover_aboutus where id="&id
rs.open sql,conn,1,3

rs("title")=title
rs("content")=content
rs.update
rs.close
response.redirect "Hover_Aboutus.asp"
end if
%>
<%
id=request.querystring("id")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * from  Hover_Aboutus where id="&id, conn,3,3
%>
<!-- #include file="Inc/Head.asp" -->
<BR>
<table width="97%" border="0" align="center" cellpadding="3" cellspacing="1" class="tableBorder">
					<form method="post" action="Hover_Aboutus_edit.asp?no=eshop">
						<input type=hidden name=id value=<%=id%>>
						<tr> 
								  <td  colspan="2"  bgcolor="#FFFFFF" class="title">修改公司栏目信息</td> 					  
						</tr>
						<tr> 
								  <td  colspan="2"  bgcolor="#FFFFFF" class="title2"  >选择您需要更改的公司信息。 </td> 					  
						</tr><tr> 
						  <td width="34%" align="right" bgcolor="#FFFFFF" class="table">栏目名称</td> 
						  <td width="66%" bgcolor="#FFFFFF" class="table"><input type="text" name="title" maxlength="30" size="25" value="<%=rs("title")%>"></td>
					  </tr>
								<tr>
								  <td align="right" bgcolor="#FFFFFF" class="table">UBB代码</td> 
									<td bgcolor="#FFFFFF" class="table"><script src=Inc/eshopcode.js></script> 
								  <!--#include file=Inc/Ubb.inc -->									</td>
								</tr>
								<tr>
								  <td align="right" bgcolor="#FFFFFF" class="table">内&nbsp;&nbsp;容</td> 
									<td height="25" bgcolor="#FFFFFF" class="table">
<textarea name="content" cols="57" rows="12"><%if rs("html")=false then
content=replace(rs("content"),"<br>",chr(13))
content=replace(content,"&nbsp;"," ")
else
content=rs("content")
end if
response.write content%></textarea></td>
								</tr>
								<tr> 
									<td height="25" align="right" bgcolor="#FFFFFF" class="table">图片上传</td>
								    <td height="25" align="center" bgcolor="#FFFFFF" class="table"><iframe name="ad" frameborder=0 width=100% height=25 scrolling=no src=../uploada.asp></iframe></td>
								</tr>
								<tr> 
									<td colspan="2" align="center" class="table"><input name="submit" type="submit" class="btn"  value="确定">
&nbsp;
<input name="reset" type="reset" class="btn"   value="从来"></td>
								</tr>
</form></table>

<BR>
<%htmlend%>