📄 list.asp
字号:
if (event.srcElement.className == "menuitems") {
event.srcElement.style.backgroundColor = "";
event.srcElement.style.color = "black";
window.status = "";
}
}
function jumptoie5() {
if (event.srcElement.className == "menuitems") {
if (event.srcElement.getAttribute("target") != null)
window.open(event.srcElement.url, event.srcElement.getAttribute("target"));
else
window.location = event.srcElement.url;
}
}
// End -->
</script>
<script language="JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->
</script>
</HEAD>
<BODY
onload="MM_preloadImages('images/print2.png','images/save2.png','images/re_write2.gif','images/home2.png')">
<DIV id=Layer1
style="Z-INDEX: 1; LEFT: 484px; VISIBILITY: hidden; WIDTH: 146px; POSITION: absolute; TOP: 68px; HEIGHT: 33px">
<TABLE cellSpacing=0 cellPadding=1 width="100%" bgColor=#000000 border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width="100%" bgColor=#ffffe6
border=0><TBODY>
<TR>
<TD
class=zi>点击“保存设置”按扭可使您本次阅读的整体设置（文字、字号、背景）得以保留，下次阅读时您就不必再重新设置，以符合您的阅读习惯。</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></DIV>
<div id="Layer2" style="position:absolute; width:19px; height:14px; z-index:2; left: 644px; top: 6px"> </div>
<TABLE cellSpacing=0 borderColorDark=#ffffff cellPadding=0 width=650
align=center borderColorLight=#555555 border=1>
<TBODY>
<TR vAlign=center align=left>
<TD background="images/titleback.png" colSpan=2
height=22 valign="top">
<TABLE cellSpacing=2 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width=40 valign="top"> </TD>
<TD class=zi width=562 valign="middle"><b><font color="#ffffff"><%=rs("title")%></font></b></TD>
<TD class=zi width=18 valign="top"> </TD>
<TD width=16 valign="middle"><a href="javascript:window.close();" title=关闭窗口><img height=14
src="images/close.png" width=16 border=0></a></TD>
</TR></TBODY></TABLE></TD></TR>
<TR vAlign=center align=left>
<TD bgColor=#cccccc colSpan=2 height=30 valign="top">
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width=3
background="images/mainline.gif"></TD>
<TD align=right width=30><a href="http://www.ie586.net" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image5','','images/home2.png',1)"><img name="Image5" border="0" src="images/home.png" width="24" height="22" title=返回页面></a></TD>
<TD align=right width=30><a href="http://210.76.63.207/lb5000/leoboard.cgi" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image4','','images/re_write2.gif',1)"><img name="Image4" border="0" src="images/re_write.gif" width="20" height="19" title=发表评论></a></TD>
<TD width=30>
<div align="center"><a href="#" onClick="window.print();return false"><img src="images/print.png" alt="打印文档" border="0" name="p" onMouseOver="MM_swapImage('p','','images/print2.png',1)" width="24" height="22"></a></div>
</TD>
<TD width=2
background="images/line.gif"></TD>
<TD class=zi vAlign=center width=308><font size="2"> 文字
<SELECT
style="WIDTH: 60px; HEIGHT: 20px; fontsize: 9pt"
onchange=setFontColor(this.value); name=seltextcolor>
<OPTION
value=#000000 selected>黑色</OPTION>
<OPTION
value=#FFFFFF>白色</OPTION>
<OPTION value=#FF0000>红色</OPTION>
<OPTION value=#555555>灰色</OPTION>
<OPTION
value=#00FF00>绿色</OPTION>
<OPTION value=#0000FF>蓝色</OPTION>
<OPTION value=#00cccc>青色</OPTION>
<OPTION
value=#ffff00>黄色</OPTION>
</SELECT>
背景
<SELECT
style="WIDTH: 60px; HEIGHT: 20px; fontsize: 9pt"
onchange=setBgColor(this.value); name=selbkcolor>
<OPTION
value=#FFFFFF selected>白色</OPTION>
<OPTION
value=#000000>黑色</OPTION>
<OPTION value=#FFCCFF>粉红</OPTION>
<OPTION value=#CCCCCC>灰色</OPTION>
<OPTION
value=#CCFFCC>绿色</OPTION>
<OPTION value=#99CCFF>蓝色</OPTION>
<OPTION value=#CCFFFF>青色</OPTION>
<OPTION
value=#FFCCCC>综色</OPTION>
</SELECT>
字号
<SELECT
style="WIDTH: 60px; HEIGHT: 20px; fontsize: 9pt"
onchange=setFontSize(this.value); name=selfontsize>
<OPTION
value=9pt selected>9 pt</OPTION>
<OPTION value=10pt>10 pt</OPTION>
<OPTION value=12pt>12 pt</OPTION>
<OPTION value=14pt>14 pt</OPTION>
<OPTION value=16pt>16 pt</OPTION>
<OPTION
value=19pt>19 pt</OPTION>
</SELECT>
</font></TD>
<TD class=zi width=85><font size="2"><a href="javascript:saveit();" onMouseOver="MM_showHideLayers('Layer1','','show')" onMouseOut="MM_showHideLayers('Layer1','','hide')"><img src="images/save.png" width="23" height="22" name="s" onMouseOver="MM_swapImage('s','','images/save2.png',1)" border="0" align="absbottom"></a>保存设置</font></TD>
<TD class=zi width=2
background="images/line.gif"><font size="2"></font></TD>
<TD class=zi width=164><font size="2"> 人气指数：<font color="#FF0000"><%=rs("hits")%></font>
</font></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR vAlign=center align=left>
<TD bgColor=#cccccc colSpan=2 height=370>
<TABLE height=360 cellSpacing=0 borderColorDark=#999999 cellPadding=5
width=640 align=center bgColor=#ffffff borderColorLight=#ffffff
border=1>
<TBODY>
<TR vAlign=top align=left>
<TD id=thetd style="FONT-SIZE: 10pt">
<div align="left" style="width: 626; height: 132">
<p align="left">
<% if rs("htmlable")<>"" then %>
<%=rs("content")%>
<%else%>
<%=ubbcode(rs("content"))%>
<%end if%>
</p>
</div>
</TD>
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 borderColorDark=#ffffff cellPadding=0 width=650
align=center bgColor=#d7ebff borderColorLight=#555555 border=1>
<TBODY>
<TR vAlign=center align=middle bgColor=#cccccc>
<TD id=notice vAlign=center align=left colSpan=2 height=25> [来源]:
<%if not isnull(rs("writefrom")) then%>
<%=rs("writefrom")%>
<%else%>
不详
<%end if%>
[编辑]: <font color=red>
<%if not isnull(rs("writer")) then%>
<%=rs("writer")%>
<%else%>
不详
<%end if%>
</font> [加入时间]:<%=rs("dateandtime")%>
</TR></TBODY></TABLE>
</BODY>
<br>
<br>
<table width="100%" border="0">
<tr>
<td> <%
rs.close
sql="select title,articleid from article where articleid="&request("id")-1
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<li><font color=#0772B1>上篇文章</font>：已经没有了
<%else%>
<li><font color=#0772B1>上篇文章</font>：<a href="list.asp?id=<%=rs("articleid")%>"><%=rs("title")%></a>
<%end if%>
</li>
<% rs.close
sql="select title,articleid from article where articleid="&request("id")+1
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<li><font color=#0772B1>下篇文章</font>：已经没有了
<%else%>
<li><font color=#0772B1>下篇文章</font>：<a href="list.asp?id=<%=rs("articleid")%>"><%=rs("title")%></a>
<%end if%>
</li>
</td>
<td align="right"><!--#include file="query.asp"--></td>
</tr>
</table>
</TD>
</TR>
<TR>
<TD bgColor="<%=Tabletitlecolor%>" width="50%">□- <%=Nclassname%>热点文章</TD>
<TD bgColor="<%=Tabletitlecolor%>" width="50%">□- 相关文章</TD>
</TR>
<tr>
<td width="50%" valign=top bgColor="<%=Tablebodycolor%>">
<%
dim i
set rs=conn.execute("SELECT top 5 articleid,title,hits,Nclassid FROM article where Nclassid="&Nclassid&" and daifa=1 order by hits desc")
i=1
do while not rs.eof
%>
<%=i%>.<a href="list.asp?id=<%=rs("articleid")%>" title="<%=rs("title")%>" target=_top>
<%if len(rs("title"))>20 then%>
<%=left(rs("title"),20)%>...
<%else%>
<%=rs("title")%>
<%end if%>
</a>[阅读:<font color=red><%=rs("hits")%></font>]<br>
<%
i=i+1
rs.movenext
loop
%>
</td>
<td width="50%" valign=top bgColor="<%=Tablebodycolor%>">
<%
set rs=conn.execute("SELECT top 5 articleid,title FROM article where Nkey='"&key&"' and daifa=1 order by articleid desc")
do while not rs.eof
%>
<a href=list.asp?id=<%=rs("articleid")%>><%=rs("title")%></a><br>
<%
rs.movenext
loop
%>
</td>
</tr>
</table>
</td>
</tr>
</tbody>
</table>
<img src="../newimg/downdown.gif" width="750" height="10"> </div>
<!--#include file="ie586top-2.asp"--></BODY>
</html>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -