<%
Set advrs3=Server.CreateObject("Adodb.RecordSet")
advsql3="select top 1 * from adv where advid=1 order by id desc"
advrs3.Open advsql3,dbconn,1,1
if advrs3.bof and advrs3.eof then
Response.write "欢迎您光临！"
else
if advrs3("isflash")=true then
Response.Write ""
else
response.write ""
end if
end if
advrs3.close
set advrs3=nothing
%>
<%
Set advrs3=Server.CreateObject("Adodb.RecordSet")
advsql3="select top 1 * from adv where advid=1 order by id desc"
advrs3.Open advsql3,dbconn,1,1
if advrs3.bof and advrs3.eof then
Response.write "欢迎您光临！"
else
if advrs3("isflash")=true then
Response.Write ""
else
response.write "