📄 addnews.asp
字号:
<%
if session("admin_name")="" then response.end
%>
<!--#include file="conn.asp"-->
<head>
<link href=../style.css rel=STYLESHEET type=text/css>
</head>
<%
set rs=server.createobject("adodb.recordset")
if request("action")="save" then
newsclass_id=trim(request("newsclass_id"))
news_title=trim(request("news_title"))
news_content=trim(request("news_content"))
if newsclass_id="" or news_title="" or news_content="" then
response.write "输入数据不能为空"
response.write "<br>"
response.write "<a href=addnews.asp>返回</a>"
else
news_title=server.htmlencode(news_title)
news_content=server.htmlencode(news_content)
news_content=replace(news_content," "," ")
news_content=replace(news_content,chr(13)&chr(10),"<br>")
sql="select * from news"
rs.open sql,conn,3,3
rs.addnew
rs("news_title")=news_title
rs("news_content")=news_content
rs("newsclass_id")=newsclass_id
rs.update
rs.close
response.write "新闻添加完成"
response.write "<br>"
response.write "<a href=addnews.asp>返回"
end if
else%>
<table border="0" width="100%" cellspacing="1">
<tr>
<td width="100%">
<form method="POST" action="addnews.asp?action=save">
<table border="0" width="100%" cellspacing="1">
<tr>
<td width="100%">新闻类型<select size="1" name="newsclass_id">
<%
sql="select * from newsclass"
rs.open sql,conn,3,3
if rs.eof then
else
do while not rs.eof%>
<option value="<%=rs("newsclass_id")%>"><%=rs("newsclass_name")%></option>
<%rs.movenext
loop
end if
rs.close
%>
</select></td>
</tr>
<tr>
<td width="100%">新闻标题<input type="text" name="news_title" size="20" class=input></td>
</tr>
<tr>
<td width="100%">新闻内容</td>
</tr>
<tr>
<td width="100%"><textarea rows="14" name="news_content" cols="79" class=input></textarea></td>
</tr>
</table>
<p><input type="submit" value="提交" name="B1" class=input><input type="reset" value="全部重写" name="B2" class=input></p>
</form>
<p> </td>
</tr>
</table>
<%end if
set rs=nothing
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -