sendnews.asp

来自「软件信息如下: 软件名称:郑州聚鑫打包带厂网站源代码免费版 软件版本:V」· ASP 代码 · 共 49 行

ASP
49
字号
<% myself=request.servervariables("path_info")%>
<!--#include file="../inc/conn.asp" -->
<!--#include file="checkadmin_top.asp" -->
<%
if request("submit")="确认添加" then
newstitle=request("newstitle")
newscontent=request("newscontent")
if newstitle="" or newscontent="" then
Response.Write("<script language=""javascript"">alert('标题和内容不能为空!');location='"&myself&"';</script>")
Response.End()
else
 CommandText="insert into news(newstitle,newscontent,senddate) Values('"&newstitle&"','"&newscontent&"','"&date()&"')"
Conn.Execute CommandText
response.redirect"upfile5.asp"
end if
end if
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../inc/test.css" type="text/css">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<table width="75%" border="0" cellspacing="1" cellpadding="5" bgcolor="#000000">
  <form name="form2" method="post" action="">
    <tr> 
      <td bgcolor="#F1f1f1" colspan="2"> <div align="center">站点动态添加</div></td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF" width="40%" align="center">新闻标题:</td>
      <td bgcolor="#FFFFFF"> <input name="newstitle" type="text" id="newstitle"> </td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF" align="center">新闻内容:</td>
      <td bgcolor="#FFFFFF"> <textarea name="newscontent" cols="40" rows="15" wrap="VIRTUAL" id="newscontent"></textarea> 
      </td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF" align="center" colspan="2"> <input type="submit" name="Submit" value="确认添加"> 
      </td>
    </tr>
  </form>
</table>
</body>
</html>
<!--#include file="checkadmin_bottom.asp" -->

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?