<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
function ctime(d)
y=mid(year(d),3,2)
if month(d)>9 then
m=month(d)
else
m="0"&month(d)
end if
if day(d)>9 then
da=day(d)
else
da="0"&day(d)
end if
if hour(d)>9 then
ho=hour(d)
else
ho="0"&hour(d)
end if
if minute(d)>9 then
mi=minute(d)
else
mi="0"&minute(d)
end if
'm=int(month(d))>9?month(d):"0"&month(d)
'da=int(day(d))>9?day(d):"0"&day(d)
ctime=""&m&"-"&da&" "&ho&":"&mi&""
end function
set rs =server.CreateObject("adodb.recordset")
sql = "select * from phone"
rs.open sql,conn,1,1
if not rs.bof then
phone = rs("phone")
end if
rs.close
set rs = nothing
set rs = server.CreateObject("adodb.recordset")
sql = "select * from notic"
rs.open sql,conn,1,1
if not rs.bof then
notic = rs("notic")
end if
rs.close
set rs = nothing
%>
三亚足球国际理财中心：：www.zq5789.com：：专业提供100%协议波胆 协议假球 即时比分
<%
set rs =server.CreateObject("adodb.recordset")
sql = "select top 18 * from footb where tel=false order by datediff('s',time,now()) asc"
rs.open sql,conn,1,1
do while not(rs.bof or rs.eof)
%>
