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

📄 announceadd.asp

📁 很好的企业网站管理系统!可以适应各种不同的小型企业!
💻 ASP
字号:
<%Admin="UserSee"%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_info.asp"-->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>添 加 站 内 公 告</title>
<style>
td{font-size:9pt;line-height:140%} 
</style>
</head>
<%
dim rs
dim sql
dim count
set rs=server.createobject("adodb.recordset")
sql = "select * from Announce "
rs.open sql,conn,1,1
%><SCRIPT language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
        <%
        count = 0
        do while not rs.eof 
        %>

        <%
        count = count + 1
        rs.movenext
        loop
        rs.close
        %>
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.myform.newsid.length = 0; 

    var locationid=locationid;
    var i;
    for (i=0;i < onecount; i++)
        {
            if (subcat[i][1] == locationid)
            { 
                document.myform.newsid.options[document.myform.newssid.length] = new Option(subcat[i][0], subcat[i][2]);
            }        
        }
        
    }    
</SCRIPT>
<SCRIPT language="javascript">
<!--
function CheckForm()
{
	document.myform.txtcontent.value=document.myform.doc_html.value;
	return true
}
//-->
</SCRIPT>
<body>
<form method="POST" name="myform" action="Announcesave.asp?action=add">
  <TABLE width="80%" border="0" align="center" cellspacing="1" class="tableBorder">
    <TR align="center"> 
      <Th colspan="4" height="25"><b><FONT color="#FFFFFF">添 
        加 站 内 公 告</FONT></b></TD>
    </TR>    
    <tr> 
      <td class="forumrow" width="15%" align="right" valign="top" nowrap><b>公告内容:</b></td>
      <td class="forumrow" width="85%" colspan="3"><font color="#FF0000"> 
        <textarea rows="6" name="newsnote" cols="60" class="smallarea"></textarea>
        </font></td>
    </tr>
    <TR align="center"> 
      <Th colspan="4" height="25"><input type="submit" value=" 添 加 "
  name="cmdok" class="buttonface">&nbsp; <input type="reset" value=" 清 除 "
  name="cmdcancel" class="buttonface"> </TR>
  </TABLE>
</form>
</body>
</html>

⌨️ 快捷键说明

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