📄 editnews.asp
字号:
<!--#include file="setup.asp" -->
<%
function htmlencode(str)
if request("special")="true" then
htmlencode=replace(replace(str,chr(13),"<br>"),"'","’")
else
htmlencode=server.htmlencode(str)
htmlencode=replace(replace(htmlencode,chr(13),"<br>"),"'","’")
end if
end function
function htmldecode(str)
htmldecode=replace(replace(str,"<br>",chr(13)),"’","'")
end function
'on error resume next
dim rs,sql
set rs=server.createobject("adodb.recordset")
if request.querystring="save" then
sql="select * from admin where user='"&request("admin")&"' and pwd='"&request("pass")&"'"
rs.open sql,conn,1,1
if rs.bof or rs.eof then
response.write "<center>用户名/密码错！新闻没有保存...</center>"
rs.close
else
response.cookies("admin")=request("admin")
response.cookies("pass")=request("pass")
rs.close
if request("title")="" or request("content")="" then
response.write "<center>没有填写完必须的内容！新闻没有保存...</center>"
else
sql="select * from news where id ="&request("id")
rs.open sql,conn,1,3
rs("cataid")=request("cataid")
rs("title")=request("title")
if request("linktitle")<>"" then rs("linktitle")=request("linktitle")
if request("linkurl")<>"" then rs("linkurl")=request("linkurl")
if request("image")<>"" then rs("image")=request("image")
rs("content")=htmlencode(request("content"))
if request("special2")<>"" then rs("special")=request("special2")
rs.update
rs.close
response.write "<center>新闻已经成功保存了...</center>"
end if
end if
end if
if request("id")="" then
response.redirect "addnews.asp"
else
sql="select * from news where id="&request("id")
rs.open sql,conn,1,1
'response.write err.description
cataid=rs("cataid")
title=rs("title")
linktitle=rs("linktitle")
linkurl=rs("linkurl")
image=rs("image")
content=rs("content")
special=rs("special")
rs.close
end if
%>
<html>
<head>
<title>QbTrade.com修改新闻<%=request("special")%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
</head>
<body bgcolor="#FFFFFF">
<form name="form1" method="post" action="editnews.asp?save">
<div align="center"><font color="#FF0000" face="Arial, Helvetica, sans-serif">QB</font><font face="Arial, Helvetica, sans-serif">Trade.com</font>
- 修改新闻 </div>
<table width="38%" border="1" align="center" bgcolor="#FF9966" cellspacing="0" cellpadding="0" bordercolor="#FFCC66">
<tr>
<td>
<div align="center">管理员名称：
<input type="text" name="admin" value="<%=request.cookies("admin")%>">
</div>
<div align="center">管理员密码：
<input type="password" name="pass" value="<%=request.cookies("pass")%>">
</div>
<div align="center">*注意：必须输入此密码才能修改新闻</div>
</td>
</tr>
</table>
<table width="80%" border="0" align="center" cellpadding="2">
<tr>
<td>
<div align="right">新闻类别：</div>
</td>
<td>
<select name="cataid">
<%
sql="select * from category"
rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.write "<option value='没有类别'>没有类别</option>"
else
do while not rs.eof
response.write "<option value='"&rs("title")&"'"
if rs("title")=cataid then response.write " selected"
response.write ">"&rs("title")&"</option>"
rs.movenext
loop
end if
rs.close
set rs=Nothing
endconnection
%>
</select>
<input type="hidden" name="id" value="<%=request("id")%>">
</td>
</tr>
<tr>
<td>
<div align="right">新闻标题：</div>
</td>
<td>
<input type="text" name="title" size="66" value="<%=title%>">
</td>
</tr>
<tr>
<td>
<div align="right">图片链接：</div>
</td>
<td>
<input type="text" name="image" size="66" value="<%=image%>">
</td>
</tr>
<tr>
<td valign="top">
<div align="right">新闻内容：</div>
</td>
<td>
<textarea name="content" cols="66" rows="8" wrap="VIRTUAL"><%=htmldecode(content)%></textarea>
</td>
</tr>
<tr>
<td>
<div align="right">链接标题：</div>
</td>
<td>
<input type="text" name="linktitle" size="66" value="<%=linktitle%>">
</td>
</tr>
<tr>
<td>
<div align="right">链接地址：</div>
</td>
<td>
<input type="text" name="linkurl" size="66" value="<%=linkurl%>">
</td>
</tr>
<tr>
<td>
<div align="right">使用HTML： </div>
</td>
<td>
<input type="checkbox" name="special" value="true">
如果要使用HTML，请在这里打钩 </td>
</tr>
<tr>
<td>
<div align="right">特别新闻：</div>
</td>
<td>
<input type="checkbox" name="special2" value="true" <%if special then response.write "checked"%>>
是否特别新闻，如果是请打钩 </td>
</tr>
<tr>
<td>
<div align="right"><font color="#FF0000">注意：</font></div>
</td>
<td><font color="#FF0000">请先确定用户名和密码正确，以上新闻标题和新闻内容必须填写，其他可以不填</font></td>
</tr>
<tr>
<td colspan="2">
<div align="center">
<input type="submit" name="Submit" value="保存">
<input type="reset" name="Submit2" value="取消">
<input type="button" name="Submit3" value="返回" onclick="location.href='default.asp'">
</div>
</td>
</tr>
<tr>
<td colspan="2">
<div align="center">[<a href="admin.asp">返回管理</a>] [<a href="default.asp">返回主页</a>]
[<a href="addcata.asp">管理类别</a>] </div>
</td>
</tr>
</table>
</form>
<script language="JavaScript">
document.write("<hr width='80%' size='1'>");
document.write("<div align='center' style=fontsize:9pt;><font face='Verdana, Arial, Helvetica, sans-serif'>");
document.write("<a href=<%=homepage_link%> target=_blank><font color=red><%=homepage_title%></font></a> - <a href=<%=news_location%>\default.asp><font color=black><%=news_title%></font></a><br>");
document.write("<font face='Verdana, Arial, Helvetica, sans-serif' color='#000000'>");
document.write("Copyright</font><font face='Verdana, Arial, Helvetica, sans-serif' color='#FF0000'> ");
document.write("<font color='#0000FF'>©</font></font>");
document.write("<font face='Verdana, Arial, Helvetica, sans-serif' color='#000000'>By ");
document.write("<a href=http://www.qbtrade.com target=_blank>QBTrade<font color='#0000FF'>™</font> Group</a>, 2000.8.30</font><font face='Verdana, Arial, Helvetica, sans-serif'>");
document.write("<br><font color='#000000'>All rights Reserved</font>");
document.write("<br><a href=http://www.qbtrade.com target=_blank><font color='#000000' size=-1>Click here to download the newest version of QBnews</font></a></div>");
</script>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -