⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 newsadd.asp

📁 一个简单的小程序
💻 ASP
字号:
<!--#include file="Session.asp"-->
<!--#include file="Conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添加新闻</title>
<link  href="css.css" rel="stylesheet" type="text/css">
<script src="Editor/edit.js"></script>
</head>
<body leftmargin="0" topmargin="0">
<div align="center">
      <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0" class="mainmiddle">
        <tr> 
          <td width="29" height="32"> <div align="left"> 
              <p class="maindaohang">&nbsp;</p>
            </div></td>
          <td width="709"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <b><font color="#000000"><b> <span class="bigNavi">添加新闻</span>              </b></font></b></td>
          <td width="8" class="mainrights"></td>
        </tr>
      </table>
	  <form method="POST" name="myform" action="newssave.asp">      
    <table width="95%" height="64" border="0" align="center" cellpadding="3" cellspacing="1" class="tabbgcolor">
      <tr class="tabbgcolorli"> 
        <td width="17%" height="20"> <div align="center">新闻标题</div></td>
        <td width="83%" height="20">  
          <input type="text" name="title" size="36" class="border">
            首页滚动:
<input type="radio" name="gd" value="true">是 
          <input name="gd" type="radio" value="false"  checked>
          否</td>
      </tr>
      <tr class="tabbgcolorli"> 
        <td width="17%" height="20"> <div align="center">来源 </div></td>
        <td width="83%" height="20">  
          <input type="text" name="addman" size="36" class="border" value="本站"> 
          <div align="center"></div></td>
      </tr>
	       <tr class="tabbgcolorli"> 
        <td width="17%" height="20"> <div align="center">文件名</div></td>
        <td height="20" colspan="3">  
          <input type="text" name="thename" size="10" class="border">
          .htm  如填写建议使用拼音,保留空白则程序将按照时间命名!</td>
      </tr>
	  <tr class="tabbgcolorli"> 
        <td width="17%" height="20"> <div align="center">文件头</div></td>
        <td height="20" colspan="3">  
          <input type="text" name="key" size="25" class="border">
          [keywords]       
          <input type="text" name="des" size="25" class="border">
          [description]</td>
      </tr>
      <tr class="tabbgcolorli"> 
        <td width="17%" height="20"> <div align="center">新闻分类</div></td>
        <td width="83%" height="20">  
          <select name="sort" id="sort">
            <%
'=======================================
'88red科技独立开发完成本程序,并提供免费技术支持与升级服务
'官方网站 http://www.88red.com    QQ:8375158  TEL:13964489818
'对于商业客户,本站提供细致周到的各项售后服务;对于盗版客户恕不提供,对于散播本程序者本站将追究其法律责任
'88red科技将陆续开发其他各种先进程序,例如企业网站建站系统等等,对老客户购买其他程序给予最大程度的优惠,欢迎洽谈
'=======================================
			set rs=server.createobject("adodb.recordset")
		   sql="select * from newsclass order by id desc"
		   rs.open sql,conn,1,1
		   if not rs.eof then
		   do while not rs.eof%>
            <option value="<%=rs("id")%>">-<%=rs("newsclass")%>-</option>
            <% rs.movenext
			loop
			end if
			rs.close
			set rs=nothing%>
          </select> </td>
      </tr>
      <tr class="tabbgcolorli"> 
        <td height="20"> <div align="center">内容 
            <input name="Content" type="hidden" value="">
          </div></td>
        <td height="20" style="display:"><div align="center">
            <div align="center">
              <table width="96%" border="0" align="center" cellpadding="2" cellspacing="0" bgcolor="#eaeaea">
                <tr> 
                  <td width="711" align="left"> <select name="select" id="formatSelect" onChange="FormatText('FormatBlock',this[this.selectedIndex].value);this.selectedIndex=0">
                      <option selected>段落格式</option>
                      <option value="&lt;P&gt;">普通</option>
                      <option value="&lt;PRE&gt;">已编排格式</option>
                      <option value="&lt;H1&gt;">标题一</option>
                      <option value="&lt;H2&gt;">标题二</option>
                      <option value="&lt;H3&gt;">标题三</option>
                      <option value="&lt;H4&gt;">标题四</option>
                      <option value="&lt;H5&gt;">标题五</option>
                      <option value="&lt;H6&gt;">标题六</option>
                    </select> <select name="select" onChange="specialtype(this[this.selectedIndex].value);this.selectedIndex=0">
                      <option selected>特殊字体格式 
                      <option value="sup">上标 
                      <option value="sub">下标 
                      <option value="address">地址 
                      <option value="blink">闪烁 
                      <option value="marquee">移动 
                      <option value="marquee2">飞行 
                      <option value="del">删除线 
                      <option value="big">增大字体 
                      <option value="small">减小字体 </select> <img src="images/editor/bold.gif" alt="粗体" width="16" height="16" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('bold', '')"> 
                    <img src="images/editor/italic.gif" alt="斜体" width="16" height="16" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('italic', '')"> 
                    <img src="images/editor/underline.gif" alt="下划线" width="16" height="16" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('underline', '')"> 
                    <img src="images/editor/justifyleft.gif" alt="左对齐" width="16" height="16" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('Justifyleft', '')" > 
                    <img src="images/editor/justifycenter.gif" alt="居中" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('JustifyCenter', '')" > 
                    <img src="images/editor/justifyright.gif" alt="右对齐" width="16" height="16" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('JustifyRight', '')" > 
                    <img src="images/editor/insertorderedlist.gif" alt="项目符号" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('InsertUnorderedList', '')" > 
                    <img src="images/editor/insertunorderedlist.gif" alt="编号" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('insertorderedlist', '')" > 
                    <img src="images/editor/outdent.gif" alt="回退" width="16" height="16" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('Outdent', '')"> 
                    <img src="images/editor/indent.gif" alt="缩进" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('indent', '')"> 
                    <img src="images/editor/fontcolor.gif" alt="字体颜色" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="foreColor()"> 
                    <img src="images/editor/bgcolor.gif" alt="字体突出颜色" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="BackColor()"> 
                    <img src="images/editor/cut.gif" alt="剪切" width="16" height="16"  align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('cut')"> 
                    <img src="images/editor/copy.gif" alt="复制" width="16" height="16"  align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('copy')"> 
                    <img src="images/editor/paste.gif" alt="粘贴" width="16" height="16"  align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('paste')"> 
                    <img src="images/editor/help.gif" alt="使用帮助" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="help()"></td>
                </tr>
                <tr> 
                  <td align="left"> <select name="selectFont" onChange="FormatText('fontname', selectFont.options[selectFont.selectedIndex].value);document.myform.selectFont.options[0].selected = true;"  style="font-family: 宋体; font-size: 9pt" onmouseover="window.status='选择选定文字的字体。';return true;" onmouseout="window.status='';return true;">
                      <option selected>选择字体 
                      <option value="custom">自定义字体 
                      <option value="removeFormat">默认字体 
                      <option value="宋体">宋体 
                      <option value="黑体">黑体 
                      <option value="隶书">隶书 
                      <option value="幼圆">幼圆 
                      <option value="楷体_GB2312">楷体 
                      <option value="仿宋_GB2312">仿宋 
                      <option value="新宋体">新宋体 
                      <option value="华文彩云">华文彩云 
                      <option value="华文仿宋">华文仿宋 
                      <option value="华文新魏">华文新魏 
                      <option value="Arial">Arial 
                      <option value="Arial Black">Arial Black 
                      <option value="Arial Narrow">Arial Narrow 
                      <option value="Century">Century 
                      <option value="Courier New">Courier New 
                      <option value="Georgia">Georgia 
                      <option value="Impact">Impact 
                      <option value="Lucida Console">Lucida Console 
                      <option value="MS Sans Serif">MS Sans Serif 
                      <option value="System">System 
                      <option value="Symbol">Symbol 
                      <option value="Tahoma">Tahoma 
                      <option value="Times New Roman">Times New Roman&nbsp; &nbsp; 
                      <option value="Verdana">Verdana 
                      <option value="Webdings">Webdings 
                      <option value="Wingdings">Wingdings</option>
                    </select> <select language="javascript"  id="FontSize" title="字号大小" onChange="FormatText('fontsize',this[this.selectedIndex].value);" name="select" onmouseover="window.status='选择选定文字的字号大小。';return true;" onmouseout="window.status='';return true;">
                      <option class="heading" selected>字号 
                      <option value="7">一号 
                      <option value="6">二号 
                      <option value="5">三号 
                      <option value="4">四号 
                      <option value="3">五号 
                      <option value="2">六号 
                      <option value="1">七号</option>
                    </select> <img src="images/editor/DELETE.gif" alt="删除" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('DELETE')"> 
                    <img src="images/editor/undo.gif" alt="撤消" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('undo')"> 
                    <img src="images/editor/redo.gif" alt="恢复" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('redo')"> 
                    <img src="images/editor/inserthorizontalrule.gif" alt="普通水平线" width="16" height="16" border="0" align="absmiddle" class=outcolor  style="cursor: hand;" onClick="FormatText('InsertHorizontalRule', '')"> 
                    <img src="images/editor/createlink.gif" alt="超级链接" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('createLink')"> 
                    <img src="images/editor/clear.gif" alt="删除文字格式" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor: hand;" onClick="FormatText('RemoveFormat')"> 
                    <img src="images/editor/table.gif" alt="插入表格" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="fortable()"> 
                    <img src="images/editor/insertimage.gif" alt="插入网上图片,支持格式为:gif、jpg、png、bmp" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="pic1()"> 
                    <img src="images/editor/media.gif" alt="自动插入播放的媒体文件" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="checkType()"> 
                    <img src="images/editor/FIELDSET.gif" alt="插入栏目框" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="FIELDSET()"> 
                    <img src="images/editor/iframe.gif" alt="插入网页" width="16" height="16" border="0" align="absmiddle" class=outcolor style="cursor:hand;" onClick="iframe()"> 
                    <input onClick="setMode(this.checked);" name="viewhtml" type="checkbox" value="ON">
                    查看HTML代码 </td>
                </tr>
              </table>
              <br>
			  		  <script language="javascript">
          document.write ('<iframe src="Textbox.asp?Action=NewsAdd" id="HtmlEditor" width=600 height=300 frameborder=0  class=border align=center></iframe>')
           frames.HtmlEditor.document.designMode = "On";
          </script>
            </div>
          </div>
          <div align="center"> </div></td>
      </tr>
      <tr class="tabbgcolorli"> 
        <td height="20" colspan="2"> <div align="center"></div>
            
          <div align="center"> 
            <input type="submit" onClick="document.myform.Content.value = frames.HtmlEditor.document.body.innerHTML;" value="提交" name="tijiao" class="border">
                 
            <input type="reset" value="重写" name="chongxie" class="border">
          </div></td>
      </tr>
    </table>
	  </form>
    </div>
</body>
</html>

⌨️ 快捷键说明

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