📄 gkgl.asp

📁 手机群发工具
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!--#include file="czconn.asp"-->
<!--#include file="function.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML xmlns="http://www.w3.org/1999/xhtml">
	<HEAD>
	 <title>系统公告管理</title>
	 <script language="javascript">
if(top==self){
location.href="admini.asp";
}
</script>
	 	<SCRIPT language=JAVASCRIPT src="bj/editfunc.js"></SCRIPT>
		<SCRIPT language=JAVASCRIPT src="bj/colorSelect.js"></SCRIPT>
		<META http-equiv=Content-Type content="text/html; charset=gb2312">
		<STYLE type=text/css>
						A {
					FONT-SIZE: 12px
				}
				IMG {
					BORDER-TOP-WIDTH: 0px; BORDER-LEFT-WIDTH: 0px; BORDER-BOTTOM-WIDTH: 0px; BORDER-RIGHT-WIDTH: 0px
				}
				TD.icon {
					VERTICAL-ALIGN: middle; WIDTH: 24px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				TD.sp {
					VERTICAL-ALIGN: middle; WIDTH: 8px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				TD.xz {
					VERTICAL-ALIGN: middle; WIDTH: 47px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				TD.bq {
					VERTICAL-ALIGN: middle; WIDTH: 49px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				DIV A.n {
					PADDING-RIGHT: 2px; DISPLAY: block; PADDING-LEFT: 2px; PADDING-BOTTOM: 2px; COLOR: #000000; LINE-HEIGHT: 16px; PADDING-TOP: 2px; HEIGHT: 16px; TEXT-DECORATION: none
				}
				DIV A.n:hover {
					BACKGROUND: #e5e5e5
				}
		</STYLE>
		<STYLE type=text/css>
				.ico {
					VERTICAL-ALIGN: middle; WIDTH: 24px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				.ico2 {
					VERTICAL-ALIGN: middle; WIDTH: 27px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				.ico3 {
					VERTICAL-ALIGN: middle; WIDTH: 25px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				.ico4 {
					VERTICAL-ALIGN: middle; WIDTH: 8px; HEIGHT: 24px; TEXT-ALIGN: center
				}
				BODY {
	MARGIN: 0px;
	background-color: #FFFFFF;
				}
		</STYLE>

		<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
	    <link href="css.css" rel="stylesheet" type="text/css">
	</HEAD>
	<BODY>
	
	<%
dim action,id,filename
action=trim(request("action"))
filename="gkgl.asp"
select case action
        case "zhi"
		   call zhi()    
		  case "edits"
		  call edits() 
		 case "edit"
		 call edit()  
	    case else
	      call main()
end select

sub edits()
nam=request("youfu")
m1=request("m1")
m2=request("m2")
m=request("mmm")
set rs3=server.CreateObject("ADODB.RecordSet")
 sql3="select * from czgl where id="&session("agentId")
 rs3.open sql3,conn,1,3
 if m1=m then
 rs3("glymm")=m2
 end if 
  rs3("czgly")=nam
  rs3.update
  rs3.close
  response.write"<script>alert('修改成功!');location.href='"&filename&"?action=edit';</script>"
end sub

sub zhi()
lr= request("gglr")
set rs3=server.CreateObject("ADODB.RecordSet")
 sql3="select * from czgl where id=1" 
 rs3.open sql3,conn,1,3
  rs3("gklr")=lr
  rs3.update
  rs3.close
  response.write"<script>alert('修改成功!');location.href='"&filename&"?action=reset';</script>"
end sub

sub main()

if session("lv")=1 then
set rs3=server.CreateObject("ADODB.RecordSet")
sql3="select * from czgl where id=1" 
rs3.open sql3,conn,1,1
%>
	<form action="gkgl.asp?action=zhi" name="abc" method="post">
		<table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="27" align="center" background="img/ai.jpg" class="nazhi">系统公告管理</td>
          </tr>
        </table>
		<TABLE style="BORDER-RIGHT: #c5c5c5 1px solid; BORDER-TOP: #c5c5c5 1px solid; BORDER-LEFT: #c5c5c5 1px solid; BORDER-BOTTOM: #c5c5c5 1px solid;FONT-SIZE:12px" cellSpacing=0 cellPadding=0 width="100%" background=bj/bg.gif border=0>
			<TBODY>
			<TR>
			  <TD style="PADDING-LEFT: 5px" height=31>
					<TABLE cellSpacing=0 cellPadding=0 border=0>
						<TBODY>
						<TR>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=剪切 onClick="format('Cut')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/1.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=复制 onClick="format('Copy')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/2.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=粘贴 onClick="format('Paste')" onmouseout=fSetBorderMouseOut(this)	height=20 src="bj/3.gif" width=20></TD>
							<TD class=ico><IMG height=20 src="bj/line.gif" width=4></TD>
							<TD class=ico2><IMG onmousedown=fSetBorderMouseDown(this) id=imgFontface onmouseover=fSetBorderMouseOver(this) title=字体 onClick="fGetEv(event);fDisplayElement('fontface','')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/4.gif" width=25></TD>
							<TD class=ico2><IMG onmousedown=fSetBorderMouseDown(this) id=imgFontsize onmouseover=fSetBorderMouseOver(this) title=字号 onClick="fGetEv(event);fDisplayElement('fontsize','')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/5.gif" width=25></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=加粗 onClick="format('Bold');" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/6.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=斜体 onClick="format('Italic');" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/7.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=下划线 onClick="format('Underline')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/8.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=左对齐 onClick="format('Justifyleft')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/9.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=中间对齐 onClick="format('Justifycenter')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/10.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=右对齐 onClick="format('Justifyright')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/11.gif" width=20></TD>
							<TD class=ico><IMG onmousedown=fSetBorderMouseDown(this) onmouseover=fSetBorderMouseOver(this) title=数字编号 onClick="format('Insertorderedlist')" onmouseout=fSetBorderMouseOut(this) height=20 src="bj/12.gif" width=20></TD>
12 下一页
⌨️ 快捷键说明

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