<% @LANGUAGE="VBSCRIPT" CODEPAGE="65001" %>
<!--#include file="../inc.asp"-->
<!--#include file="../ydzq.asp"-->

<%call head()
call saycardd("江湖大厅")

ids=session("id")
Server.ScriptTimeout=999
%>
<!--#include file="conn1.asp"-->
<%Set Rslp = Server.CreateObject("Adodb.Recordset")
			Sqll = "SELECT top 1 pk,ids,pk1 FROM sx order by pk desc"
			Rslp.Open Sqll,liao,1,1%>
PK王ID：<a href='/bbs/uinfo.asp?id=<%=Rslp("ids")%>&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>'><%=Rslp("ids")%></a>(胜<%=Rslp("pk")%>/败<%=Rslp("pk1")%>)<br/>
<a href='ffbb.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>发布挑战</a>|<a href='qqxx.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>取消发布</a><br/>

<%Set Rsl = Server.CreateObject("Adodb.Recordset")
			Sqll = "SELECT top 10 id,txt,lid,tm,yc,name,jg FROM tz order by tm desc"
			Rsl.Open Sqll,liao,1,1
			if not (rsl.bof and rsl.eof)  then 
				if rsl.RecordCount>10 then
					aaaaa=10
				else
					aaaaa=rsl.RecordCount
				end if%>

				==PK竞技场==<br/>

				<%For i=1 to aaaaa
					If Rsl.Eof Then
						exit For
					end if%>
<%if rsl("yc")=0 then%>
					<%=i%>.发布者ID：<a href="/bbs/uinfo.asp?id=<%=rsl("lid")%>&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>"><%=rsl("lid")%></a><br/>挑战金额<%=rsl("txt")%>两银子|
<%if rsl("jg")=0 then
if saytk>1 then
call xlanlj("jjss.asp?id="&rsl("id")&"&amp;sid="&sid&"&amp;saytk="&saytk&"")
call xltjlj("je",""&rsl("txt")&"")
call xlanlj1("接受")
else%>

<anchor>接受<go href="jjss.asp?id=<%=rsl("id")%>&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;lid=<%=rsl("lid")%>" method="post"><postfield name="je" value="<%=rsl("txt")%>" /></go></anchor><br/>
<%end if %>
<%elseif rsl("jg")=1 then%>
[赢]<br/>
<%elseif rsl("jg")=2 then%>
[输]<br/>
<%elseif rsl("jg")=3 then%>
[平]<br/>
<%end if%>
[<%=rsl("tm")%>]<br/>

<%else%>
<%=i%>.发布者：[匿名]<br/>挑战金额<%=rsl("txt")%>两银子|<%if rsl("jg")=0 then%>
<anchor>接受<go href="jjss.asp?id=<%=rsl("id")%>&amp;sid=<%=sid%>&amp;saytk=<%=saytk%>&amp;lid=<%=rsl("lid")%>" method="post"><postfield name="je" value="<%=rsl("txt")%>" /></go></anchor><br/>
<%elseif rsl("jg")=1 then%>
[赢]<br/>
<%elseif rsl("jg")=2 then%>
[输]<br/>
<%elseif rsl("jg")=3 then%>
[平]<br/>
<%end if%>
[<%=rsl("tm")%>]<br/>
<%end if%>

				<%Rsl.MoveNext
				Next
			end if
			Rsl.close
			set rsl=nothing
                         liao.close
			set liao=nothing%>

----------<br/>
<a href="index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">江湖首页</a><br/>
<a href="/bbs/index.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>">社区首页</a><br/>
<%call head1()%>
