|
|
威尼斯足球在线
|
 |
 |
QQ: 740887368 |
电话:13642344098 |
Email:740887368@qq.com |
WEB LOGO |
|
|
 |
 |
|
|
 |
|
|
|
 |
 |
| 时间 |
賽事類型 |
上盘 |
让球 |
下盘 |
推荐 |
比分 |
结果 |
| 8-31 |
瑞士超 |
納沙泰爾 |
半球 |
華杜茲 |
華杜茲 |
2-2 |
 |
| 8-30 |
苏超 |
喜百年 |
平手/半球 |
馬瑟韋爾 |
馬瑟韋爾 |
0-1 |
 |
| 8-30 |
荷甲 |
PSV燕豪芬 |
半球/一球 |
烏德勒支
|
PSV燕豪芬 |
5-1 |
 |
| 8-30 |
荷甲 |
維迪斯 |
平手/半球 |
高寧根 |
高寧根 |
0-4 |
 |
| 8-29 |
足协杯 |
哈化柏林 |
球半/两球 |
法克托爾 |
法克托爾 |
1-0 |
 |
| 8-28 |
英联杯 |
韋斯咸 |
球半/两球 |
馬格斯菲特 |
馬格斯菲特 |
1-1 |
 |
| 8-27 |
冠军杯 |
彭拿典奈高斯 |
半球/一球 |
布拉格斯巴達 |
彭拿典奈高斯 |
1-0 |
 |
<%
dim ars,asqlStr,UpTime,DownTime,i
UpTime = DateAdd("d",2,now())
DownTime = DateAdd("d",-17,now())
asqlStr = "SELECT * FROM [MatchAdvice] WHERE ( [MatchTime] BETWEEN #"& DownTime &"# AND #"& UpTime &"# ) AND AdviceType=1 ORDER BY [MatchTime] DESC"
set ars=Server.Createobject("adodb.recordset")
ars.open asqlStr,conn,3,1
if not ars.bof then
ars.movefirst
end if
i = 0
If ars.RecordCount > 0 Then
Do Until ars.Eof
dim MTime,ATeam,Bfen
MTime = Month(ars("MatchTime"))&"-"&Day(ars("MatchTime"))
If DateDiff("n",CDate(ars("FixTime")),Now())> 0 Then
If ars("AdviceTeam") = 1 Then
ATeam = ars("UpTeam")
Elseif ars("AdviceTeam") = 2 Then
ATeam = ars("DownTeam")
Else
ATeam = ars("AdviceRemark")
End If
Else
ATeam = "會員見證"
End If
If Len(ars("MatchScore")) < 2 Then
Bfen = "等待"
Else
Bfen = ars("MatchScore")
End If
%>
<%
ars.MoveNext
i = i + 1
loop
End If
ars.Close
Set ars = Nothing
%>
|
 |
|
 |
 |
时间 |
賽事類型 |
上盘 |
让球 |
下盘 |
推荐
|
比分 |
结果 |
| 8-31 |
意甲 |
阿特蘭大 |
半球 |
錫耶納 |
阿特蘭大 |
1-0 |
 |
| 8-31 |
丹超 |
艾斯堡 |
半球 |
賀森斯 |
賀森斯 |
0-1 |
 |
| 8-30 |
德甲 |
史浩克零四
|
一球/球半 |
波琴 |
波琴 |
1-0 |
 |
| 8-30 |
英超 |
侯城
|
平手 |
韋根 |
韋根 |
0-5 |
 |
| 8-30 |
超霸杯 |
曼聯
|
半球/一球 |
聖彼德斯堡 |
聖彼德斯堡 |
1-2 |
 |
| 8-30 |
德甲 |
卡斯魯厄 |
平手/半球
|
科隆 |
科隆 |
0-2 |
 |
| 8-29 |
足协杯 |
洛辛堡 |
半球/一球 |
佐加頓斯 |
佐加頓斯 |
5-0
|
 |
| 8-28 |
足协杯 |
曼城 |
半球 |
米迪蘭特 |
曼城 |
1-0
|
 |
| 8-28 |
冠军杯 |
基輔戴拿模 |
半球 |
莫斯科斯巴達 |
基輔戴拿模 |
4-1 |
 |
| 8-28 |
冠军杯 |
費倫巴治 |
球半 |
柏迪遜 |
柏迪遜 |
2-1 |
 |
| 8-27 |
英联杯 |
普雷斯頓 |
平手/半球 |
打比郡 |
打比郡 |
0-1 |
 |
| 8-27 |
英联杯 |
伯明翰 |
平手/半球 |
修咸頓
|
伯明翰 |
2-0 |
 |
| 8-26 |
瑞超
|
AIK蘇納 |
平手/半球 |
哈馬比 |
AIK蘇納 |
2-1 |
 |
<%
dim brs,bsqlStr
UpTime = DateAdd("d",2,now())
DownTime = DateAdd("d",-15,now())
bsqlStr = "SELECT * FROM [MatchAdvice] WHERE ( [MatchTime] BETWEEN #"& DownTime &"# AND #"& UpTime &"# ) AND AdviceType=0 ORDER BY [MatchTime] DESC"
set brs=Server.Createobject("adodb.recordset")
brs.open bsqlStr,conn,3,1
if not brs.bof then
brs.movefirst
end if
i = 0
If brs.RecordCount > 0 Then
Do Until brs.eof
dim bMTime,bATeam,bBfen
bMTime = Month(brs("MatchTime"))&"-"&Day(brs("MatchTime"))
If DateDiff("n",CDate(brs("FixTime")),Now())> 0 Then
If brs("AdviceTeam") = 1 Then
bATeam = brs("UpTeam")
Elseif brs("AdviceTeam") = 2 Then
bATeam = brs("DownTeam")
Else
bATeam = brs("AdviceRemark")
End If
Else
bATeam ="會員見證"
End If
If Len(brs("MatchScore")) < 2 Then
bBfen = "等待"
Else
bBfen = brs("MatchScore")
End If
%>
<%
brs.movenext
i = i + 1
loop
End If
brs.close
set brs = nothing
%>
|
 |
|
|