<% 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 %>

时间	賽事類型	上盘	让球	下盘	推荐	比分	结果
11-9	荷甲	飛燕諾	半球/一球	烏德勒支	飛燕諾	5-2
11-9	意甲	祖雲達斯	半球/一球	切禾	祖雲達斯	2-0
11-8	英冠	錫周三	半球/一球	唐卡士打	錫周三	1-0
11-7	欧协杯	華倫西亞	球半	哥本哈根	哥本哈根	1-1
11-7	欧协杯	桑坦德	平手	史浩克零四	史浩克零四	1-1
11-6	歐冠盃	費倫天拿	平手/半球	拜仁慕尼黑	拜仁慕尼黑	1-1
11-5	歐冠盃	車路士	半球	羅馬	羅馬	1-3
11-4	瑞超	哈馬比	平手/半球	馬模	哈馬比	3-6
11-2	荷甲	維迪斯	半球/一球	海牙	維迪斯	3-1
11-1	德甲	史浩克零四	半球/一球	科特布斯	史浩克零四	2-0
10-31	荷甲	迪加史卓普	平手	烏德勒支	烏德勒支	0-2

<% 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 %>

时间	賽事類型	上盘	让球	下盘	推荐	比分	结果
11-11	意乙	帕爾馬	半球/一球	巴里	巴里	1-1
11-11	丹超	米迪蘭特	一球/球半	維積利	米迪蘭特	2-0
11-11	德乙	費雷堡	半球/一球	聖保利	費雷堡	2-0
11-9	英超	曼城	平手/半球	熱刺	熱刺	1-2
11-9	德甲	史浩克零四	平手	拜仁慕尼黑	拜仁慕尼黑	1-2
11-9	西甲	桑坦德	半球	希杭	桑坦德	1-0
11-8	苏超	登地聯	半球	鴨巴甸	登地聯	2-1
11-8	英超	韋根	半球	史篤城	韋根	0-0
11-6	歐冠盃	曼聯	半球/一球	些路迪	曼聯	1-1
11-6	歐冠盃	聖彼德斯堡	半球/一球	巴迪	巴迪	2-0
11-5	歐冠盃	士砵亭	半球	薩克達	士砵亭	1-0
11-4	瑞超	艾夫斯堡	一球	咸史泰斯	艾夫斯堡	3-0
11-4	意乙	阿斯科利	平手/半球	里米尼	里米尼	1-1
11-2	意甲	拉素	半球/一球	卡坦尼亞	拉素	1-0
11-1	英超	曼聯	两球	侯城	侯城	4-3
10-30	德甲	漢堡	半球	史特加	漢堡	2-0