<!-- #include VIRTUAL="/bbs/inc.asp" -->
<%call ling()

'=============================
call head()
Call cardgame("即时比分",yanse)
%>
<!--#include file="conn.asp"-->
篮球赛事>><a href='default_l.asp?sid=<%=sid%>&amp;saytk=<%=saytk%>'>足球赛事</a><br/>
<% 
Response.write "即时比分|<a href=""default_w.asp?id="&sid&"&amp;saytk="&saytk&""">完场比分</a><br/>"
dim newmid,gettxt
newmid=request("mid")
Dim Url,Html,start,over,body,wap,wstr,str
if newmid<>"" then
Url="http://bwap.7m.cn/Live/default.aspx?ecd=1&mid="&newmid&"&amp;saytk="&saytk&""
gettxt="<a href=""default.aspx?ecd=1&amp;saytk="&saytk&""">返回</a>"
else
Url="http://bwap.7m.cn/Live/default.aspx?ecd=1&amp;saytk="&saytk&""
gettxt="<a href=""../default.aspx?ecd=1&amp;saytk="&saytk&""">返回</a>"
end if
wstr=getHTTPPage(Url)
start=Instr(wstr,"<p></p>")
over=Instr(wstr,gettxt)
body=mid(wstr,start,over-start)
'------------------------------------------------
body = replace(body,"</p>	<p>","<br/>")
body = replace(body,"<p align=""left"">","")
body = replace(body,"<p align=""center"">","")
body = replace(body,"<p>","")
body = replace(body,"</p>","")
body = replace(body,".aspx",".asp")
body = replace(body,"default.asp?","default_r.asp?sid="&sid&"&amp;saytk="&saytk&"&amp;")

'--------------------------------------------------
Response.write body
Response.write "<a href=""default_r.asp?sid="&sid&"&amp;saytk="&saytk&""">[即时比分]</a>|<a href=""default_w.asp?sid="&sid&"&amp;saytk="&saytk&""">[完场比分]</a><br/><a href=""default_l.asp?sid="&sid&"&amp;saytk="&saytk&""">[返回直播首页]</a><br/><a href=""../index.asp?sid="&sid&"&amp;saytk="&saytk&""">球彩</a>&gt;<a href=""../bbs/show.asp?sid="&sid&"&amp;saytk="&saytk&""">地盘</a>&gt;<a href=""/bbs/index.asp?sid="&sid&"&amp;saytk="&saytk&""">社区首页</a><br/>(c) "&Request.ServerVariables("SERVER_NAME")&"["&String(2-Len(hour(now)),"0") & hour(now) &":"&String(2-len(minute(now)),"0") & minute(now)&"]"
call headsay()%>

