<%@ CODEPAGE=65001 %>
<%
Session.CodePage = 65001
Response.Charset="utf-8"
%>
<%
flash_width = 756
Flash_height = 274
Flash_Style = 1
if Flash_Style = 0 then
set rs_news=server.createobject("adodb.recordset")
sql="select * from banners"
rs_news.open sql,conn,1,1
files = ""
banners = "/"
texts = "/"
guodu = 0
if not rs_news.EOF then
do while Not rs_news.EOF
banners=banners & rs_news("banner")
files=files & "" & rs_news("img")
rs_news.MoveNext
if not rs_news.eof then
banners=banners & "|"
files=files & "|"
texts=text&"|"
end if
loop
end if
rs_news.close
set rs_news=nothing
call closeconn
%>
var focus_width=<%=flash_width%>;
var focus_height=<%=flash_height%>;
var text_height=0;
var swf_height = focus_height+text_height;
var pics = "<%=files%>";
var banners = "<%=banners%>";
var texts = "<%=texts%>";
document.write('');
<%
end if
if Flash_style = 1 then
set rs_news=server.createobject("adodb.recordset")
sql="select * from banners"
rs_news.open sql,conn,1,1
files = ""
banners = "/"
texts = "/"
guodu = 0
if not rs_news.EOF then
do while Not rs_news.EOF
banners=banners & rs_news("banner")
files=files & "" & rs_news("img")
rs_news.MoveNext
if not rs_news.eof then
banners=banners & "|"
files=files & "|"
texts=text&"|"
end if
loop
end if
rs_news.close
set rs_news=nothing
call closeconn
%>
var swf_width=<%=flash_width%>
var swf_height=<%=flash_height%>
var files='<%=files%>'
var banners='<%=banners%>'
var texts='<%=texts%>'
document.write('');
<%End If%>