add.asp

来自「这是一套集“新闻、产品、订购、招聘、下载、留言”为一体的企业型后台管理系统」· ASP 代码 · 共 101 行

ASP

101 行

<%
if session("admin_name")="" then
    response.redirect "index.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script LANGUAGE="JavaScript">
function check()
{
 if (document.form1.title.value=="")
  {
   alert("请输入新闻标题！")
   document.form1.title.focus()
   document.form1.title.select()
   return
  }
   document.form1.submit()
}
</script>
</head>
<!--#include file="../inc/adconn.asp"-->
<link rel="stylesheet" type="text/css" href="../style.css">
<body bgcolor="#FFFFFF" marginheight=0 marginwidth=0 leftmargin=5>
<SCRIPT language=javascript>
  var upfile_obj;
  function OnUpFile()
  {
   upfile_obj.src=upfile_obj.lowsrc;
   upfile_obj.src=document.forms["form1"].upfile.value;
  }
</SCRIPT>
<CENTER><form name="form1" method="post" action="savenews.asp">
<INPUT name=upfile onchange=return(OnUpFile()) type=hidden>
  <TABLE width="100%" border="0" cellpadding="4" cellspacing="1" bgcolor="#336699">
    <TR> 
      <TD height=30 colspan=2 background="../images/pics/tile_sub.gif" bgcolor="#e8f4ff"><b>添加新闻</b></TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD width="17%">新闻标题：</TD>
      <TD width="83%"> 
        <input type="text" name="title" size="52"><font color=#ff6600> *</font></TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>新闻分类：</td>
      <TD> 
        <select name="typeid">
        <%dim rs,sql,sel,typeid
	  typeid=request("typeid")
      set rs=server.createobject("adodb.recordset")
      sql="select * from newstype"
      rs.open sql,conn,1,1
      do while not rs.eof
      if typeid=cstr(rs("typeid")) then
         sel="selected"
      else
         sel=""
      end if
      response.write "<option " & sel & " value='"+CStr(rs("typeID"))+"' name=typeid>"+rs("type")+"</option>"+chr(13)+chr(10)
      rs.movenext
      loop
      rs.close
    %> 
    </select><%'=typeid%>
      </TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>推荐新闻：</td>
      <TD> 
        <INPUT name=tj type=radio value="1">推荐&nbsp;&nbsp;<INPUT name=tj type=radio value="0" CHECKED>不推荐</TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>新闻内容：</TD>
      <TD><input type="hidden" name="content" value=""> <IFRAME ID="eWebEditor1" SRC="../eWebEditor/ewebeditor.asp?id=content&style=standard_coolblue" FRAMEBORDER="0" SCROLLING="no" WIDTH="550" HEIGHT="350"></IFRAME><font color=#ff6600> *</font></TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>来源：</TD>
      <TD> 
        <input type="text" name="nfrom" size="30"></TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>是否包含图片：</td>
      <TD> 
        <INPUT name=ispic type=radio value="1">
        包含&nbsp;&nbsp;<INPUT name=ispic type=radio value="0" CHECKED>不包含</TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD> 上传文件： </TD>
      <TD> 
        <iframe name="ad" frameborder=0 width=100% height=50 scrolling=no src=upload.asp></iframe></TD>
  </TR>
    <TR height="30"> 
      <TD colspan="2" align="center" background="../images/pics/tile_sub.gif" bgcolor="#e8f4ff" > 
        <input type="button" value=" 提　交" onclick="check()">
    <input type="button" name="Submit2" value=" 重　执">
  </TR>
</TABLE>
</FORM>
</BODY>
</HTML>

add.asp - 源码说明

本页面展示了「这是一套集“新闻、产品、订购、招聘、下载、留言”为一体的企业型后台管理系统系统维护人员： #################################################」中的 add.asp 源码文件，采用 ASP 编程语言编写，共 101 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与新闻相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?