gonggao_add.asp

来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 121 行

ASP
121
字号
<!--#include file="../inc/conn.asp"--><%'┌─  风云ASP在线  ────────────────────────┐'│                                                                 │'│  作者:赵振波.	http://www.fyasp.com	    				    │'│                                                                 │'│   Q Q:176189168  										   	    │'│                                                                 │'│ Email:fy96@163.com                                             │'│                                                                 │'│ 程序定做,系统开发,网站制作,提供高质量的网络产品、技术和服务!│'│                                                                 │'│                                                                 │'└───────────────────  http://www.fyasp.com ──┘%>
<%
If session("manager")="" Then
  Response.Redirect("manage.asp")
  Response.end
 End If
%>
<html>
<!-- DW6 -->
<head>
<title>后台管理系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../ht.css" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>

<body bgcolor="#666666" text="#000000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!-- ImageReady Slices (index.psd) -->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td><img src="../images/ht_01.gif" width=778 height=62 usemap="#Map" border="0"></td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" background="../images/htbj.gif">
  <tr> 
    <td valign="top" align="left" width="145" height="395">
      <!--#include file="List.asp" -->
    </td>
    <td height="395" align="center" valign="top"> <br> <table width="621" border="0" cellspacing="0" cellpadding="0" height="98">
        <tr> 
          <td align="center" valign="top"> <table width="606" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="../images/httable_01.gif" width=606 height=17></td>
              </tr>
              <tr> 
                <td background="../images/httable_02.gif" height="268"> <div align="center"> <center> 
                  <table width="297" height="45" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td> <div align="center"><a href="gonggao_del.asp">[公告删除、修改]</a>&nbsp;</div></td>
                      <td><div align="center"><a href="gonggao_add.asp">[公告添加] 
                          </a> </div></td>
                    </tr>
                  </table>
                  <form name="form1" method="post" action="gonggao_add_ok.asp">
                    <table width="86%" height="145" border="0" align="center" cellpadding="0" cellspacing="1">
                      <tr>
                        <td class="black">公告标题:</td>
                        <td height="30" class="black"><input name="ggtext" type="text" id="ggtext"></td>
                      </tr>
                      <tr> 
                        <td class="black">公告内容:</td>
                        <td height="30" class="black">&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="30" colspan="2" class="black"> <div align="center"></div>
                          <INPUT type="hidden" name="content" value=" "> <IFRAME ID="eWebEditor" src="web/ewebeditor.asp?id=content&style=s_coolblue" frameborder="0" scrolling="no" width="550" height="350"></IFRAME> 
                        </td>
                      </tr>
                      <tr> 
                        <td width="18%" valign="middle" class="black">&nbsp;</td>
                        <td width="82%" valign="middle" height="50" class="black">&nbsp; 
                          <div align="center"> 
                            <input type="submit" value=" 添加 " name="B1" onClick="javascript:return checklogin();">
                            <script language=VBScript>
function checklogin()
	if form1.content.value=""  then
		msgbox "请输入公告内容!",0,"信息输入不完整!"
		form1.content.focus
		checklogin=false
		exit function
	end if

	checklogin=true
end function
</script>
                          </div></td>
                      </tr>
                    </table>
                  </form></td>
              </tr>
              <tr> 
                <td><img src="../images/httable_04.gif" width=606 height=19></td>
              </tr>
            </table></td>
        </tr>
      </table></td>
  </tr>
</table>
<table width="778" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td><img src="../images/ht_04.gif" width="778" height="4"></td>
  </tr>
</table>
<!-- End ImageReady Slices -->
<map name="Map">
  <area shape="rect" coords="630,36,775,56" href="http://www.fyasp.com" target="_blank">
</map>
</body>
</html>

⌨️ 快捷键说明

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