<!--#include file="../inc.asp"-->
<!--#include file="../ydzq.asp"-->
<!--#include file="conn.asp"-->



<%


call head()
Call cardgame("挑战吹牛",yanse6)

Response.write "您目前共有"&myjb&getcent&"<br/>"
dim rs,ssql,id
id=request("id")
if id="" or Isnumeric(id)=false then
call error("ID无效！")
end if
  set rs=Server.CreateObject("ADODB.Recordset")
  ssql="select * from YD_jd where id=" & id & " and op=0 order by id desc"
  rs.open ssql,ydzqconn,1,1
if rs.eof then
response.write "您好,这个吹牛已经被抢走了,赶快再去<a href=""index.asp?saytk="&saytk&"&amp;sid="&sid&""">抢一个</a>来玩吧!<br/>"
Else
id1=rs("useid")
num=rs("num")
  set objgbrs1=Server.CreateObject("ADODB.Recordset")
  ssql1="select name,id from users where id=" & id1
  objgbrs1.open ssql1,conn
Response.write "这是<a href='../uinfo.asp?id=" & id1 & "&amp;sid=" & sid& "'>" & objgbrs1("name") & "(ID:" & id1 & ")</a>的吹牛<br/>-------------<br/>"

Response.write "吹牛内容:"&rs("about")&"<br/>"
Response.write "下注金额为" & rs("paycent") &getcent&"<br/>"
Response.write "请选择您认为正确的答案<br/>"

Response.write "1.<a href='pkgame.asp?id=" & id & "&amp;saytk="&saytk&"&amp;sid="&sid&"&amp;num=1&amp;idss="& id1 &"'>"&rs("about1")&"</a><br/>"
Response.write "2.<a href='pkgame.asp?id=" & id & "&amp;saytk="&saytk&"&amp;sid="&sid&"&amp;num=2&amp;idss="& id1 &"'>"&rs("about2")&"</a><br/>"

Response.write "如果选对答案,您将获得吹牛人赌注95%的金币!"
end if
rs.close
set rs=nothing
ydzqconn.close
set ydzqconn=nothing
conn.close
set conn=nothing
%>
<!--#include file="fanhui.asp"-->
<%
call headsay()
%>
