📄 admin_xg_gg.asp

📁 新世纪影院源码
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="xshjyy.asp"-->
<%'---------程序编写说明-------%> 
<%
'本程序由junping96编写
'程序名称：新世纪影院VOD播放系统（商业版）
'FileName: Admin_xg_gg.asp
'EditDate:2003-12-07
'Editer:junping96
'Email:junping96@163.com
'QQ:       249112913 249114058
'请尊重本人劳动，禁止修改版权，有任何问题请和我联系。
%>
<html>
<head>
<title>文章管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" href="../css/CSS.CSS" type="text/css">
<script language="vbscript">
sub check()
if gg.title.value=empty then
alert"错误,请填写公告标题"
exit sub
end if
if gg.lx.value=empty then
alert"错误请选择公告类型"
exit sub
end if
if gg.titletop.value=empty then
alert"错误，请填写公告内容"
exit sub
end if
gg.submit
end sub
</script>
</head>

<body bgcolor="#FF9900" text="#000000" topmargin="0" leftmargin="0">
<!--#include file="../char.asp"-->
<center>
<%
action=trim(request.querystring("action"))
id=trim(request.querystring("id"))
if id="" then
response.redirect"admin_gg_look.asp"
response.end
end if

if action<>"save" then
%>
<%
set rs=server.createobject("adodb.recordset")
sql="select * from gg where id="&id
rs.open sql,conn,1,1
if rs.eof or bof then
response.write"<script>alert(' 没有发现该公告，无法编辑');history.back(-1);</script>"
response.end
else
%>
  <table width="516" border="0" cellspacing="1" cellpadding="0">
    <form name="gg" method="post" action=admin_xg_gg.asp?id=<%=id%>&action=save>
      <tr> 
        <td height="22" bgcolor="#FFFFFF" align="center" valign="middle" colspan="3">修改公告</td>
      </tr>
      <tr align="center" valign="middle"> 
        <td height="22" bgcolor="#FFFFFF" width="86" align="left">公告标题:</td>
        <td height="22" bgcolor="#FFFFFF" width="267"> 
          <input type="text" name="title" size="30" value=<%=rs("ggtitle")%> class="inputs">
        </td>
        <td height="22" bgcolor="#FFFFFF" align="left" width="159"> 
          <select name="lx">
            <option selected>请选择公告类型</option>
            <option value="系统">系统</option>
            <option value="新闻">新闻</option>
            <option value="活动">活动</option>
          </select>
        </td>
      </tr>
      <tr> 
        <td height="22" bgcolor="#FFFFFF" align="left" valign="middle" colspan="3">公告内容:</td>
      </tr>
      <tr align="center"> 
        <td height="22" bgcolor="#FFFFFF" valign="middle" colspan="3"> 
          <textarea name="titletop" cols="80" rows="21"><%=rs("ggnr")%></textarea>
        </td>
      </tr>
      <tr align="center"> 
        <td height="22" bgcolor="#FFFFFF" valign="middle" colspan="3">(请详细填写以上相关内容)</td>
      </tr>
      <tr align="center"> 
        <td height="22" bgcolor="#FFFFFF" valign="middle" colspan="3"> 
          <input type="button" name="button1" onclick="check" value="提交">
          　　　　　　　　　　　　　　　　　　      
          <input type="reset" name="Submit2" value="重置">
        </td>
      </tr>
      <tr> 
        <td bgcolor="#FFFFFF" align="left" valign="middle" colspan="3">&nbsp;</td>
      </tr>
    </form>
  </table>
  <%
  rs.close
  set rs=nothing
  end if
  %>
<%
else
id=trim(request.querystring("id"))
title=trim(request.form("title"))
lx=trim(request.form("lx"))
titletop=request.form("titletop")
set rs=server.createobject("adodb.recordset")
sql="select * from gg where id="&id
rs.open sql,conn,1,3
rs("ggtitle")=title
rs("lx")=lx
rs("ggnr")=titletop
rs("dateandtime")=date()
rs.update
rs.close
set rs=nothing
response.write "<script language='javascript'>alert(' 公告修改完毕');history.back(-1);</script>"
end if
%>

</center>
</body>
</html>
⌨️ 快捷键说明

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