家庭/个人应用

开发平台：
ASP/ASPX

talk.asp：源码内容
							
<!--#include file="../checkpost.asp"-->
<!--#include file="articleconn.asp" -->
<!--#include file="security.asp"-->
<%
if session("flag")>2 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
%>
<%
if request.form("talk")="" and request.form("talk1")="" then
set rs=server.createobject("adodb.recordset")
sql="select * from talk where id=22" 
rs.open sql,conn,1,1
talk=replace(rs("talk"),"<br>",vbcrlf)
talk=replace(talk,"&nbsp;"," ")
end if
if request.form("talk")<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from talk where id=22" 
rs.open sql,conn,1,3
talk=request.form("talk")
rs("talk")=replace(talk,vbcrlf,"<br>")
rs.update
response.redirect "talk.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>公告管理</title>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<LINK href="inc/Admin_STYLE.CSS" rel="stylesheet" type="text/css">
<SCRIPT language=JavaScript>
<!--
function makenote(id)
	{
var filename="makenote.asp?id="+id;
window.open(filename,"显示窗口","scrollbars=yes,width=300,height=100,status=yes,resizable=no");
}
function makenoteall(id)
	{
var filename="makeallnote.asp";
window.open(filename,"显示窗口","scrollbars=yes,width=300,height=100,status=yes,resizable=no");
}
function dfile(id)
	{
	if(confirm("确定要删除吗?")==true)
{
var filename="delnote.asp?id="+id;
window.open(filename,"显示窗口","scrollbars=yes,width=300,height=100,status=yes,resizable=no");
}
}
function CheckAll(v)
	{
		var i;
		for (i=0;i<document.forms.elements.length;i++)
		{
			var e = document.forms.elements[i];
		        e.checked = v;
		}
	}
	
function OnDelete()
 {
		var del, a, i;
		del = new String("");
		for(i = 0; i < document.forms.elements.length ; i ++)
		{
			var e = document.forms.elements[i];
			if(e.name == 'selAnnounce')
			{
			   if ( e.checked == true)
			   {
		   		a = e.value;
				del = del + a + ";";
			   }
			};
		}
 if(del == "")
		{
			alert("请选择要删除的公告")
		}
else
		{
	if(confirm("确定要删除吗?")==true)
 {
document.forms.submit();
		}
		}
	}
//-->
</SCRIPT>	
</head>
<!--#include file="conn.asp"-->
<%
   	const MaxPerPage=20
   	dim totalPut   
   	dim CurrentPage
   	dim TotalPages
   	dim i,j
   	dim idlist
   	dim title
   	if not isempty(request("page")) then
      		currentPage=cint(request("page"))
   	else
      		currentPage=1
   	end if
  	if not isempty(request("selAnnounce")) then
     		idlist=request("selAnnounce")
     		if instr(idlist,",")>0 then
			dim idarr
			idArr=split(idlist)
			dim id
		for i = 0 to ubound(idarr)
	       		id=clng(idarr(i))
	       		call deleteannounce(id)
		next
     		else
			call deleteannounce(clng(idlist))
     		end if
  	end if 
   	dim sql
   	dim rs
%>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<!--#include file="top1.asp"-->
<br><form method="POST" action="talk.asp">
  <table class="border" width="100%" border="0" align="center" cellpadding="0" cellspacing="1">
    <tr class="title"> 
      <td height="22" colspan="5" align="center" valign="middle"><font color="#FF0000"><b>公告发布修改</b></font></td>
    </tr>
    <tr class="tdbg"> 
      <td colspan="5" align="center" valign="middle">      <div align="center">
        <textarea rows="18" name="talk" cols="79" style="border-style: solid; border-width: 1"><%=talk%></textarea>
      </div></td>
    </tr>
   
    <tr class="tdbg"> 
      <td height="19" colspan="5" align="center" valign="middle">
        <div align="center">
          <input name="submit" type="submit" value="修改">
        </div></td>
    </tr>
  </table>
<table border="0" width="100%" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="100%" align="center">&nbsp; </td>
  </tr>
  <tr> 
    <td width="100%" align="center">
	<%rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body> 
</html>
	

						