announce.asp

庐江二中

<script language=JavaScript>
<!--
//

var version = "other"
browserName = navigator.appName;
browserVer = parseInt(navigator.appVersion);

if (browserName == "Netscape" && browserVer >= 3) version = "n3";
else if (browserName == "Netscape" && browserVer < 3) version = "n2";
else if (browserName == "Microsoft Internet Explorer" && browserVer >= 4) version = "e4";
else if (browserName == "Microsoft Internet Explorer" && browserVer < 4) version = "e3";


function marquee1()
{
if (version == "e4")
{
document.write("<marquee style='BOTTOM: 0px; FONT-WEIGHT: 100px; HEIGHT:110px;  TEXT-ALIGN: left; TOP: 0px' id='news' scrollamount='1' scrolldelay='10' behavior='loop' direction='up' border='0' onmouseover='this.stop()' onmouseout='this.start()'>")
}
}

function marquee2()
{
if (version == "e4")
{
document.write("</marquee>")
}
}

function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<%
Response.Write "<table border=0 cellspacing=0 cellpadding=0 width=100% align=center bgcolor="""&leftBColor&""">"
Response.Write TTitle("right","本站公告")
response.write InTable("bottomr")
Response.Write "<tr><td bgcolor='"&RightCColor&"' background='"&RightCImg&"'><table width=100% border=0 cellspacing=0 cellpadding=8 align=center><tr><td ><table border=0 width=100% cellspacing=0><tr>"

sql="SELECT * FROM Announce where Ischecked=1 and popup<>1 and board<>1 order by id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
Response.Write "<td width=100% align=center>尚无任何公告</td>"
else
Response.Write "<td width=100% >"
%>
<script language=JavaScript>marquee1();</script>
<%
do while not rs.EOF
if not isnull(rs("Title")) then

Response.Write "<table border=0 width=100% cellspacing=2 cellpadding=2 style='TABLE-LAYOUT: fixed'><TR><td width=100% align=center height=20><font color="&AlertFColor&">"&rs("Title")&"</font></td></TR>"
end if
Response.Write "<TR><td width=100% style='WORD-WRAP: break-word'>"&rs("Content")&"</td></TR><TR><td width=100% align=right>"&rs("Author")&"</td></TR><TR><td width=100% align=right>"&DateValue(rs("DateAndTime"))&"</td></TR></table>"
rs.movenext
loop
%>
<script language=JavaScript>marquee2();</script>
<%
Response.Write "</td>"
end if
rs.close
Response.Write "</tr></table></td></tr><tr><td align=right><a href='announcemore.asp' target='_blank'><img src='images/more9.gif' border=0 alt='更多公告'></a></td></tr></table></td></tr>"

if fentitle=2 then
response.write InTable("middle1")
else
response.write InTable("bottomr")
end if
Response.Write "</table>"
%>