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

📄 ggao.asp

📁 易方4.0程序+邮局接口+序列号+销售系统
💻 ASP
字号:
<!-- #include file="../inc_config.asp" -->
<!-- #include file="LoginCk.asp" -->
<%
Call PopCheck(14)
if Cmd = "Add" then
	GGao_Title = Request("GGao_Title")
	If Conn.Num("EfangGGao","GGao_Title='" & GGao_Title & "'")>0 Then
		ShowErMsg("公告标题重覆!") : Response.End
	End If
	call Conn.Insert("EfangGGao","GGao_Title","'"&GGao_Title&"'")
	WriteLog "发布公告 - " & GGao_Title
	TmStr = Conn.QueryItem("EfangGGao","GGao_ID","GGao_Title='"&GGao_Title&"'")
	Call ShowErMsgGo("新公告创建成功!请继续填写相关内容!","GGao_Upd.asp?GGao_ID=" & TmStr)
End If
%>
<html>
<head>
<title>公告管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link id="style_sheet" href="css/save.css" type="text/css" rel="stylesheet">
	<script language="JavaScript">style_sheet.href = parent.parent.style_sheet.href;</script>
<%=Efs_Cfg_PHeader%>
</head>
<script language="JavaScript" src="js/common_Efang.js"></script>
	<body class="NormalPage">
	<form id="form_help" action="help_content.asp" method="get" target="working_area">
		<input name="help_topic" type="hidden" value="公告管理">
	</form>
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
	<tr>
		<td id="headerToolBar" valign="middle" nowrap style="width:100%; height:22px;"><table cellpadding="0" cellspacing="0" class="HeaderPageControl">
				<tr>
					<td align="left" valign="middle" nowrap height="20">系统设置&gt;&gt; 系统参数设置 &gt;&gt; <b></b><b>公告管理</b></td>
					<td align="center" valign="middle" nowrap width="10" height="20"></td>
					<td align="right" valign="middle" width="100%" nowrap height="20"></td>
					<td align="center" valign="middle" nowrap width="10" height="20"></td>
					<td align="right" valign="middle" width="60" nowrap height="20"><img id="id_back" alt="返回上一页" onclick="JavaScript:history.back()" onmouseover="JavaScript:this.src=imgBackUp.src" onmouseout="JavaScript:this.src=imgBackDown.src" src="images/toolbar_back.gif" border="0" style="cursor:hand;width:22px; height:20px;"><img id="id_refresh" alt="刷新" onclick="JavaScript:fn_Refresh()" onmouseover="JavaScript:this.src=imgRefreshUp.src" onmouseout="JavaScript:this.src=imgRefreshDown.src" src="images/toolbar_refresh.gif" border="0" style="cursor:hand;width:22px; height:20px;"></td>
					<td align="right" valign="middle" width="25" nowrap height="20"><img src="images/toolbar_help.gif" alt="帮助" width="43" height="20" border="0" id="id_locate" style="cursor:hand;width:22px; height:20px;" onclick="JavaScript:fn_ShowHelp()" onmouseover="JavaScript:this.src=imgHelpUp.src" onmouseout="JavaScript:this.src=imgHelpDown.src"></td>
				</tr>
		</table></td>
	</tr>
	<tr>
		<td valign="top">
			<div id="viewPanel" style="visibility:visible; position:absolute; overflow:auto;">
		  <br>
	    <table width="85%" border="0" align="center" cellPadding="0" cellSpacing="0" class="datalist">
          <th width="38%" height="25" align="center" nowrap class="DataListHeader">公告标题</th>
          <th width="12%" height="25" align="center" nowrap class="DataListHeader">是否显示</th>
          <th width="20%" align="center" nowrap class="DataListHeader">显示时间</th>
          <th width="19%" height="25" align="center" nowrap class="DataListHeader">创建时间</th>
          <th width="11%" align="center" nowrap class="DataListHeader">操作</th>

        <%
Set GGData=Conn.Query("EfangGGao","Order By GGao_CTime")
Do while not (GGData.EOF or GGData.BOF)
%>
        <tr> 
          <td width="38%" height="25" align="center" nowrap class="DataListGrid"><%=GGData("GGao_Title")%></td>
          <td width="12%" align="center" nowrap class="DataListGrid"> 
            <%
If GGData("GGao_Enable")=True Then
Response.Write "显示"
Else
Response.Write "不显示"
End If
%>
          </td>
          <td width="20%" align="center" nowrap class="DataListGrid"><%=GGData("GGao_STime")%> </td>
          <td width="19%" align="center" nowrap class="DataListGrid"> <%=GGData("GGao_CTime")%></td>
          <td width="11%" align="center" nowrap class="DataListGrid"> <a href="GGao_Upd.asp?GGao_ID=<%=GGData("GGao_ID")%>" class="CommonFace">修改</a></td>
        </tr>
        <%
GGData.movenext 
Loop
Set GGData=Nothing
%>
      </table>
      <br> <br> <table width="80%" border="0" align="center" cellpadding="0" cellspacing="0">
        <form name="form1" method="post" action="?Cmd=Add" onSubmit="return CheckForm(this)"><tr> 
          <td> 
              标题 : 
              <input name="GGao_Title" type="text" class="InputOne" id="GGao_Title" size="30" maxlength="20">
              <input name="Submit" type="submit" class="ButtonOne" value="创建新公告">
              <script language="JavaScript">
function CheckForm(form){
	if (form.GGao_Title.value=="") {
		alert("请填写新公告标题!");
		form.GGao_Title.focus();
		return false;
	}
	return true;
}
</script>
            </td>
        </tr></form>
      </table>
	  </div>
		</td>
	</tr>
</table>
<% Call ExitEnd(False) %>
</body>
<script language="JavaScript">
<!--
	document.parentWindow.onresize = fn_RejustViewPanel ;
	fn_RejustViewPanel ( ) ;
	//alert ( document.body.clientWidth + ":" + viewPanel.clientWidth ) ;
//-->
</script>
</html>

⌨️ 快捷键说明

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