📄 news_add.asp

📁 本源代码为大学生购物网的源代码,欢迎大家的下载,学习与交流

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../Inc/AdminChk.asp"-->
<!--#include file="Conn.asp"-->
<!--#include file="../Inc/FormChk.asp"-->
<!--#include file="../Inc/msgbox.asp"-->
<%
IF Trim(Request("Submit"))<>Empty Then
  Dim StrSql,Rs,title,body,typ
  title=Request.Form("title")
 body=htmlencode2(encodestr(request.Form("Content")))
  typ=request.Form("typ")
  set rs=server.CreateObject("adodb.recordset")
  strsql="select * from [news]"
  rs.open strsql,conn,1,3
  rs.addnew()
  rs("title")=title
  rs("body")=body
  rs("typ")=typ
  rs("HitNum")="0"
  rs("date")=date()
  rs.update
  rs.close
  set rs=nothing
  call msgbox("添加成功","GoUrl","news_list.asp")
  response.End()
End IF
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新闻添加</title><LINK href="../style.css" type=text/css rel=stylesheet>
</head>
<body><!--#include file="top.asp"--><script src="../Inc/ubbcode.js"></script>
<form name="frmAnnounce" method="post" action="" onSubmit=submitonce(this)>
  <table width="100%" border="0" cellspacing="1" cellpadding="0" bgcolor="#0099FF">
    <tr> 
      <td width="93" bgcolor="#FFFFFF"><font color="#0099FF">新闻标题:</font></td>
      <td bgcolor="#FFFFFF">
		<input name="title" type="text" id="title" size="40"></td>
    </tr>
  <tr> 
      <td width="93" bgcolor="#FFFFFF"><font color="#0099FF">新闻类型:</font></td>
      <td bgcolor="#FFFFFF">	  <select name="typ" id="typ">
			  <option value="本站新闻" selected>本站新闻</option><option value="校园资讯" selected>校园资讯</option>
			  <option value='中介信息'>中介信息</option><option value='友情帮助'>友情帮助</option>
              </select></td>
    </tr>
    <tr> 
      <td width="93" bgcolor="#FFFFFF"><font color="#0099FF">新闻内容</font></td>
      <td bgcolor="#FFFFFF"><!--#include file="../Inc/getubb.asp"--> 
           <br>  <textarea name="Content" rows="17" id="Content" cols="63"></textarea></td>
    </tr>
    <tr> 
      <td width="93" bgcolor="#FFFFFF">　</td>
      <td bgcolor="#FFFFFF"><input type="submit" name="Submit" value="提交">
        <input type="reset" name="Submit2" value="重置"></td>
    </tr>
  </table>
</form><!--#include file="copy.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -