<!--#include file="../../../../conn/conn5.asp" -->
<!--#include file="../../../../conn/function.asp" -->
<?xml version="1.0" encoding="gb2312"?>
<Quboid>
<%
server_v40=Request.ServerVariables("QUERY_STRING")
num=instr(server_v40,".") 
S_id=left(server_v40,num-1)
%>
	<setup
	
	sceneMode="fluid" 								
	sceneWidth="800"							
	sceneHeight="400"								
	
	playOnStart="true"
	playDelay="10000"
	playFirst="0"
	
	showTimer="true"
	showButton="true"
	showNavigation="true"
	shuffleEnabled="false"
	
	autoQuality="true"
	smoothingEnabled="false"
	freezeOnLeave="false"
	freezeOnIdle="false"
	
	bgEnabled="true"
	bgAlpha="0"
	bgFirstColor="0xFFFFFF"
	bgSecondColor="0xE2DDD9"
	
	flickrEnabled="false"
	flickrAPI="your flickr API key"
	flickrSet="your flickr photo set"
	
	vidScaleMode="original"
	vidAutoPlay="false"
	vidSeekBarHeight="4"
	vidSeekBarBgColor="0x000000"
	vidSeekBarCacheColor="0x3A3F3E"
	vidSeekBarProgressColor="0x00ADF1"
	vidCustomWidth="640"
	vidCustomHeight="360"
	
	youtubeQuality="large"
	youtubeAutoPlay="false"
	youtubeWidth="640"
	youtubeHeight="360"
	
	scaleFactor="10"
	cameraDistance="400"
	
	depthEnabled="false"
	depthAmount="5000"
	depthMultiplier="20"
	
	startCameraY = "10000"
	smoothMaterial = "true"
	
	wheelRadius="180"
	wheelOffset="80"
	wheelScroll="continuous"
	wheelScrollFactor="200"
	wheelScrollTiltEnabled="false"
	
	wheelCamIdleZoom="5"
	wheelCamIdleFocus="100"
	wheelCamIdleX="0"
	wheelCamIdleY="-20"
	wheelCamIdleZ="-400"
	wheelCamViewZoom="10"
	wheelCamViewFocus="100"
	wheelCamViewDistance="200"
	wheelCamTiltAmount="600"
	wheelCamTiltMaximum="50"
	
	reflectionEnabled="false"
	reflectionY="-100"
	reflectionBlur="2"
	reflectionAlphaStart="0.3"
	reflectionAlphaEnd="0"
	
	cubeDepth="20"
	cubeColor="0xFFFFFF"
	cubeColorRandom="true"
	cubeColorAuto="false"
	cubeShaded="false"
	
	tooltipEnabled="true"
	tooltipTextSize="12"
	tooltipTextColor="0xFFFFFF"
	tooltipBgColor="0x252525"
	tooltipGlowColor="0x252525"
	tooltipGlowAlpha="1"
	tooltipGlowStrength="2"
	tooltipGoBackText="Go Back"
	
	captionTextSize="26"
	captionTextColor="0xFFFFFF"
	captionTitleBgColor="0x0066FF"
	captionDescriptionBgColor="0x5577AA"
	captionBgAlpha="100"
	captionPadding="2"
	captionMargin="40"
	captionSpacing="2"
	captionPosition="BL"
	
	captionShadowEnabled="true"
	captionShadowDistance="4"
	captionShadowAngle="45"
	captionShadowColor="0x000000"
	captionShadowAlpha="0.4"
	captionShadowBlur="8"
	
	contextMenuEnabled="true"
	contextMenuLabel=""
	contextMenuLink=""
	
	></setup>
<%

Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select * from photo where P_sort="&S_id&" order by P_id desc"
rs.open sql,conn,1,1
if not rs.eof then
Do while Not rs.eof
response.Write "<asset><media type='image' path='"&rs("P_path")&"' thumbnail='"&rs("P_thumb")&"' tooltip='"&rs("P_title")&"' color='0x000000' target='_blank'></media><title><![CDATA[<font face='Microsoft Yahei' color='#FFFF00'>"&rs("P_title")&"</font>]]></title><description><![CDATA[<font size='12px' face='Microsoft Yahei' color='#FFFFFF'>"&RemoveHTML(rs("P_content"))&"</font>]]></description></asset>"
rs.movenext
		loop
	end if
set rs=nothing
%>
</Quboid>

