wmcms_board.asp

完美政府版,正版网站解决方案

<SCRIPT> 
<!-- 
window.defaultStatus="<%=gg1%>"; 
//--> 
</SCRIPT>
<script language="JavaScript">
<!--
if (self != top) top.location.href = window.location.href
//-->
</script>
<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" | version == "n3")
	{
		document.write("<marquee style='BOTTOM: 0px; FONT-WEIGHT: 100px; HEIGHT:160px;  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" | version == "n3")
	{
		document.write("</marquee>")
	}
}

function marquee_logo_news()
{
	if (version == "e4")
	{
		document.write("<marquee style='BOTTOM: 0px; FONT-WEIGHT: 1200px; HEIGHT:31px;  TEXT-ALIGN: left; TOP: 0px' id='link_map' scrollamount='2' scrolldelay='10' behavior='alternate' direction='right' border='0' onmouseover='this.stop()' onmouseout='this.start()'>")
	}
}

function marquee3()
{
	if (version == "e4" | version == "n3")
	{
		document.write("<marquee direction='ldft' border='0' onmouseover='this.stop()' onmouseout='this.start()'>")
	}
}

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

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

function marquee6()
{
	if (version == "e4" | version == "n3")
	{
		document.write("</marquee>")
	}
}
function marquee7()
{
	if (version == "e4" | version == "n3")
	{
		document.write("<marquee style='BOTTOM: 0px; FONT-WEIGHT: 100px; HEIGHT:160px;  TEXT-ALIGN: left; TOP: 0px' id='news' scrollamount='1' scrolldelay='10' behavior='loop' direction='up' border='0' onmouseover='this.stop()' onmouseout='this.start()'>")
	}
}
function marquee8()
{
	if (version == "e4" | version == "n3")
	{
		document.write("<marquee style='BOTTOM: 0px; FONT-WEIGHT: 100px; HEIGHT:120px;  TEXT-ALIGN: left; TOP: 0px' id='news' scrollamount='1' scrolldelay='10' behavior='loop' direction='up' border='0' onmouseover='this.stop()' onmouseout='this.start()'>")
	}
}
//-->
</script>
<script language="JavaScript1.2">
<!--
function makevisible(cur,which){
if (which==0)
cur.filters.alpha.opacity=100
else
cur.filters.alpha.opacity=20
}

function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
//-->
</script>


<%if boardtype="1" then%>
           <table width="98%" border="0" cellpadding="0" cellspacing="0">

			  <%
			  
			  
			  
set rsbt=server.CreateObject("ADODB.RecordSet") 
rsbt.Source="select * from "& db_Board_Table &" where inuse=1"
rsbt.Open rsbt.Source,conn,1,1
if not rsbt.EOF then
%>
        
        <tr> 
          <td height="118" align=center> <br> 
            <table width="90%" height="60" border="0" cellpadding="0" cellspacing="0">
		<tr> 
                <td align="center"> 
		
		<%=CutStr(htmlencode4(rsbt("title")),26)%><br><div style='border-top:1px dashed #cccccc;height: 1px;overflow:hidden'></div>

		<script language=JavaScript>marquee8();</script> <%=CheckStr(rsbt("content"))%><br><div style='border-top:1px dashed #cccccc;height: 1px;overflow:hidden'></div>
		<script language=JavaScript>marquee2();</script> <%=rsbt("dateandtime")%><br><div style='border-top:1px dashed #cccccc;height: 1px;overflow:hidden'></div>
		<a href="Board.asp" target="_blank" class=class>以前公告</a><br><div style='border-top:1px dashed #cccccc;height: 1px;overflow:hidden'></div></td>
		</tr>
	</table>
	</td>
        </tr>
        <%else Response.Write "<tr><td align=center><br>暂  无</td></tr>"
		end if
     rsbt.close
      set rsbt=nothing%>
          </table>
          <br>
<%else%>
<DIV id=demoa style="OVERFLOW: hidden; WIDTH: 236px; HEIGHT: 170px"> 
<DIV id=demoa1>                 

<!------------------->

           <table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr><td >
			  <%
set rsbt=server.CreateObject("ADODB.RecordSet") 
rsbt.Source="select * from "& db_Board_Table &"order by ID DESC  "
rsbt.Open rsbt.Source,conn,1,1
do while not rsbt.EOF
titleboard=trim(rsbt("title"))
%>
     

&nbsp;<img src="images/dian.gif" border="0" height="20">&nbsp;<A HREF="Board_news.asp?ID=<%=rsbt("ID")%>" class=class><%=CutStr(htmlencode4(rsbt("title")),30)%></a><div style='border-top:1px dashed #cccccc;height: 1px;overflow:hidden'></div>

<%
rsbt.movenext
loop
rsbt.close
set rsbt=nothing
%>		  
</td></tr>
 </table>
 <!---------------------->


</div> 
<DIV id=demoa2></DIV>

</DIV>		  

<SCRIPT>				 
var speed2=60
demoa2.innerHTML=demoa1.innerHTML
function Marquee2(){
if(demoa2.offsetTop-demoa.scrollTop<=0)
demoa.scrollTop-=demoa1.offsetHeight
else{
demoa.scrollTop++
}
}
var MyMar2=setInterval(Marquee2,speed2)
demoa.onmouseover=function() {clearInterval(MyMar2)}
demoa.onmouseout=function() {MyMar2=setInterval(Marquee2,speed2)}
</script>	
          <br>
<%end if%>