📄 bbslist.asp
字号:
<!--#include file="islogin.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="../include/ubb.asp"-->
<%
bbsid=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from BBS where id="+bbsid
rs.open sql,conn,1,3
Reid=rs("id")
Member=rs("Member")
MemberID=rs("MemberID")
addtime=rs("addtime")
title=rs("title")
content=rs("content")
rs("hits")=rs("hits")+1
hits=rs("hits")
tu=rs("tu")
rs.update
rs.close
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/css.css" rel="stylesheet" type="text/css">
<title></title>
<style type="text/css">
<!--
@import url("../style/admin.css");
.style1 {
font-size: 18px;
font-weight: bold;
}
.style2 {font-size: 18px; font-weight: bold; color: #0000FF; }
.style266 {
color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 20px;
MARGIN-bottom: 20px;
LINE-HEIGHT: 20px;
}
.style3 { color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 20px;
MARGIN-bottom: 20px;
LINE-HEIGHT: 20px;
}
.style4 { color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 10px;
MARGIN-bottom: 10px;
LINE-HEIGHT: 20px;
}
.style6 { color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 20px;
MARGIN-bottom: 20px;
LINE-HEIGHT: 20px;
}
.style7 {color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 10px;
MARGIN-bottom: 10px;
LINE-HEIGHT: 20px;
}
.style8 {color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 10px;
MARGIN-bottom: 10px;
LINE-HEIGHT: 20px;
}
.style10 { color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 20px;
MARGIN-bottom: 20px;
LINE-HEIGHT: 20px;
}
.style11 {color: #000000;
MARGIN-TOP: 6px;
FONT-SIZE: 12px;
MARGIN-left: 20px;
MARGIN-top: 12px;
MARGIN-right: 10px;
MARGIN-bottom: 10px;
LINE-HEIGHT: 20px;
}
-->
</style></head>
<body>
<table width="800" border="0" cellpadding="0" cellspacing="0" class="table_1">
<tr>
<td height="30" align="center" class="table_1_top"><h1><%=title%></h1></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><table width="100%" border="0" align="center" cellpadding="3" cellspacing="0" class="table_1_inc">
<tr bgcolor="#F8F8FA" >
<td>
<div class="style4">作者：<%=Member%> 发布时间：<%=addtime%> 浏览次数：<%=hits%> </div></td>
<td width="123" align="right"><span class="style11">
<input type="submit"onClick="javascript:history.go(-1)" name="Submit" value="返回前一页">
</span></td>
</tr>
<tr bgcolor="#F8F8FA" >
<td colspan="2"><div class="style266"><% if tu<>"" then %><img src="../<%=tu%>"><br><%end if%><%=txt(content)%></div></td>
</tr>
<tr bgcolor="#F8F8FA" >
<td colspan="2"> </td>
</tr>
</table></td>
</tr>
</table>
<!--评论开始-->
<%
page=request.querystring("page")
set rs=server.createobject("adodb.recordset")
sql="select * from BBSre where ReID="&ReID&""
rs.open sql,conn,1,1
on error resume next
maxjilu=rs.recordcount
perpage=10'每页显示记录数
t=page*perpage
rs.absoluteposition=t+1
f=t+perpage
ww=0
for i=t+1 to f
ww=ww+1
%>
<br><table width="800" border="0" cellpadding="3" cellspacing="0" class="table_1">
<tr bgcolor="#F8F8FA" >
<td class="formbox-comment"><span class="style8"><%=rs("ReMember")%> 回复时间：<%=rs("retime")%></span></td>
</tr>
<tr bgcolor="#F8F8FA" >
<td bgcolor="#F8F8FA"><div class="style10"><%=txt(rs("re"))%></div></td>
</tr>
</table>
<%
rs.movenext
if rs.eof then
exit for
rs.close
set rs=nothing
end if
next
tt=page*perpage
if page<0 then
page=0
end if
if tt>=maxjilu then
ttt=page-1
end if
if maxjilu-tt<perpage then
ttt=page-1
else
ttt=page
end if
u=1
do while u*perpage<maxjilu
u=u+1
loop
session("page")=ttt
set conn=nothing
%>
<br><table width="800" border="0" cellpadding="3" cellspacing="0" class="table_1">
<tr bgcolor="#F8F8FA" >
<td><div style="text-align:left;background-color:#e6e6e6; height:20px;padding-top:2px;font-size:12px;">找到<font color="#FF0000"><%=maxjilu%></font>条| <a href="?id=<%=bbsid%>&page=0">首页</a>-<a href="?id=<%=bbsid%>&page=<%=(page-1)%>">上页</a>-<a href="?id=<%=bbsid%>&page=<%=(page+1)%>" >下页</a>-<a href="?id=<%=bbsid%>&page=<%=(u-1)%>" >末页</a>
<%
if ttt<=5 then
uu=0
while uu<u
%>
<a href="?id=<%=bbsid%>&page=<%=(uu)%>"><%=(uu+1)%></a>
<%uu=uu+1
wend
else%>
<a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt-6)%>">[<%=(ttt-5)%>]</a> <a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt-5)%>">[<%=(ttt-4)%>]</a> <a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt-4)%>">[<%=(ttt-3)%>]</a> <a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt-3)%>">[<%=(ttt-2)%>]</a> <a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt-2)%>">[<%=(ttt-1)%>]</a> <a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt-1)%>" >[<%=(ttt)%>]</a> <a style="color:blue" href="?id=<%=bbsid%>&page=<%=(ttt)%>">[<%=(ttt+1)%>]</a>
<%end if%>
</div></td>
</tr>
</table>
<br>
<!--评论结束-->
<table width="800" border="0" cellpadding="3" cellspacing="0" class="table_1">
<tr bgcolor="#F8F8FA" >
<td><form name="form1" method="post" action="BBSList_resave.asp?Reid=<%=Reid%>&page=<%=(u-1)%>">
<table width="99%" border="0" align="center" cellpadding="3" cellspacing="2">
<tr>
<td><textarea name="re" cols="100%" rows="6" id="re"></textarea></td>
</tr>
<tr>
<td><input type="submit" name="Submit" value=" 回 复 "> </td>
</tr>
</table>
</form></td>
</tr>
</table>
</body>
</html>
<!--#include file="MenuRight.asp"-->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -