?? manage_editnews.asp
字號(hào):
<!--#include file="admin.asp"-->
<!--#include file="conn.asp"-->
<%if Request.QueryString("no")="eshop" then
id=request("id")
title=request("title")
content=server.htmlencode(Trim(Request("content")))
If title="" Then
response.write "SORRY <br>"
response.write "請(qǐng)輸入更新內(nèi)容的標(biāo)題"
response.end
end if
If content="" Then
response.write "SORRY <br>"
response.write "內(nèi)容不能為空"
response.end
end if
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from Conews where id="&id
rs.open sql,conn,1,3
rs("title")=title
rs("content")=content
rs.update
rs.close
response.redirect "Manage_News.asp"
end if
%>
<%
id=request.querystring("id")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Conews where id="&id, conn,3,3
%>
<html>
<head>
<title>管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="Admin_Style.css" rel="stylesheet" type="text/css">
</head>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top">
<br>
<table width="708" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25"> <div align="center" style="background-image: url('../Images/topbg1.gif')"><strong>修改新聞</strong></div></td>
</tr>
<tr>
<form method="post" action="Manage_editnews.asp?no=eshop">
<input type=hidden name=id value=<%=id%>>
<td><div align="center">
<table width="100%" border="0" cellspacing="2" cellpadding="3">
<tr>
<td width="8%" height="25" bgcolor="#E1F4EE"> <div align="center">標(biāo) 題</div></td>
<td width="62%" bgcolor="#E1F4EE"><input type="text" name="title" maxlength="30" size="25" value="<%=rs("title")%>"></td>
</tr>
<tr>
<td height="22" bgcolor="#E1F4EE">
<div align="center">UBB代碼</div></td>
<td bgcolor="#E1F4EE"><script src=../Inc/eshopcode.js></script>
<!--#include file=../Inc/Ubb.inc -->
</td>
</tr>
<tr>
<td height="25" bgcolor="#E1F4EE"><div align="center">內(nèi) 容</div></td>
<td height="25" bgcolor="#E1F4EE">
<textarea name="content" cols="66" rows="12"><%if rs("html")=false then
content=replace(rs("content"),"<br>",chr(13))
content=replace(content," "," ")
else
content=rs("content")
end if
response.write content%></textarea></td>
</tr>
<tr>
<td height="25" colspan="2" bgcolor="#E1F4EE">
<div align="center">
<input type="reset" value="從來(lái)">
</div></td>
</tr>
<tr>
<td colspan="2" bgcolor="#E1F4EE">圖片上傳</td>
</tr>
<tr>
<td colspan="2" bgcolor="#E1F4EE"><div align="center">
<iframe name="ad" frameborder=0 width=100% height=50 scrolling=no src=../uploada.asp></iframe>
</div></td>
</tr>
</table>
</div></td></form>
</tr>
</table>
<br>
<br>
</td>
</tr>
</table>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -