<!--#include file="../../../../conn/conn5.asp" -->
<!--#include file="../../../../conn/function.asp" -->
<?xml version="1.0" encoding="gb2312"?>
<home>

    <settings
	
		 videoType = "youtube"
		 vimeoVideoWidth = "550"
		 vimeoAutoPlay = "true"
	
         playIntro="false"
		 showControls="true"
		 videoPath= "0UjsXo9l6I8"
		 videoBufferTime = "5"
		 videoHeight="350"
		 videoVolume=".5"
		 skipIntroButton = "true"
		 skipIntroText = "SKIP INTRO"
		 videoControlsLoadBarColor = "CCFF00"
		 videoControlsLoadBarAlpha = ".2"
		 videoControlsProgressBarColor = "CCFF00"
		 videoControlsProgressBarAlpha = ".8"
		 volumeSlideBarColor = "CCFF00"
		 volumeSlideBarAlpha = ".2"
		 youTubeVideoAspectRatio = "5:3"
		 youTubeVideoAspectQuality = "hd720"
		 
		 playRotator="true"
		 rotatorImageWidth = "900"
		 rotatorImageHeight = "400"
		 preloaderColor = "CCFF00"
		 preloaderAlpha = "0.3"
		
		 bgColor = "1B1B1B"	  
		 bgAlpha = ".5"	
		 
		 controlsIconColor = "FFFFFF"
		 controlsIconAlpha = "1"
		 controlsBgColor = "1B1B1B"
		 controlsBgOverColor = "CCFF00"
		 controlsBgAlpha = ".5"
		 
		 
    />

    <rotator>
	<%
Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select * from slide order by S_id desc"
rs.open sql,conn,1,1
if not rs.eof then
Do while Not rs.eof
response.Write "<image><path slideShowDelay = '6'>"&rs("S_pic")&"</path><title bgColour='1b1b1b' bgAlpha='.6' Ypos='300' Xpos='10'><![CDATA[<font color='#CCFF00'>"&rs("S_title")&"</font>]]></title><description bgColour='21211F' bgAlpha='.55' txtWidth='800'><![CDATA[<font face='Microsoft Yahei' color='#ffffff' size='16'>"&rs("S_content")&"</font>]]></description></image>"
rs.movenext
		loop
	end if
set rs=nothing		
		%>
	</rotator>
</home>