📄 showatc.asp
字号:
<!--#include file=conn.asp-->
<HTML><HEAD><TITLE>新闻发布系统</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK href="style.css" type=text/css rel=stylesheet>
<BODY style="cursor:url(images/2.gif)">
<DIV align=center>
<!--#include file=top.asp-->
<table width="760" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="27" background="images/top2.gif"> 当前位置：<a href="index.asp">首页</a>
<%rs.open"select * from article where id="&request("id"),conn,1,1
rs2.open"select * from class where id="&rs("bigclsid"),conn,1,1
rs3.open"select * from class where id="&rs("smlclsid"),conn,1,1
%><a href=showcls.asp?id=<%=rs("bigclsid")%>&parent=0><%=rs2("clsname")%></a>>>
<a href=showcls.asp?id=<%=rs("smlclsid")%>&parent=<%=rs("bigclsid")%>><%=rs3("clsname")%></a>
>><font color=#00ccbb>>正文</font>
<%rs.close
rs2.close
rs3.close%></td>
</tr>
</table>
<table width="762" border="0" cellspacing="1" cellpadding="0">
<tr bgcolor="#FFFFFF">
<td width="567" valign="top">
<%rs.open"select * from article where id="&request("id"),conn,1,3
%><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr align="center" >
<td><font size=3 color="#00ccbb"><strong><%=rs("title")%></strong></font></td>
</tr>
<tr align="center">
<td><font color=red><%=rs("sender")%>在<%=rs("sendtime")%>发表，被浏览<font color=#00bbff><%=rs("views")%></font>次</font>
<%if len(rs("content"))>2048 then
num=cint(len(rs("content"))/2048)
if len(rs("content"))>num*2048 then
num=num+1
end if%>
此文章共有 <font color=#00bbff><%=num%></font> 页
<%for i=1 to num%><a href=showatc.asp?id=<%=request("id")%>&p=<%=i%>><%=i%></a><img src="images/f.gif"><%next%>
<%end if%></td>
</tr>
<tr bgcolor="eeeeee"><td><font size=2 style="font-family:Fixedsys ">
<%if request("p")<>"" then
if request("p")=1 then%>
<%=mid(rs("content"),1,2048)%>
<%else%>
<%=mid(rs("content"),(request("p")-1)*2048+1,2048)%>
<%end if%>
<%elseif num<>"" then%>
<%=mid(rs("content"),1,2048)%>
<%else%>
<%=rs("content")%>
<%end if%></strong></font></td></tr>
</table>
</td><%rs("views")=rs("views")+1
rs.update
rs.close
%>
<td width="192" valign="top" bgcolor="#eeeeee"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr bgcolor="#EEEEEE">
<td> <font color="red">相关文章</font></td>
</tr>
<%
rs.open"select * from article where id>"&(request("id")-5)&" and id<"&(request("id")+5),conn,1,1
while not rs.eof%>
<tr bgcolor="#EEEEEE">
<td><img src="images/new01.gif"><a href=showatc.asp?id=<%=rs("id")%>>
<%if len(rs("title"))>10 then%><%=left(rs("title"),10)&"..."%><%else%><%=rs("title")%><%end if%></a></td>
</tr>
<%rs.movenext
wend
rs.close%>
</table></td>
</tr>
</table>
<!--#include file="bottom.asp"-->
</DIV></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -