<!--#include file="../../../../conn/conn5.asp" -->
<!--#include file="../../../../conn/function.asp" -->
<%
server_v40=Request.ServerVariables("QUERY_STRING")
num=instr(server_v40,".") 
S_id=left(server_v40,num-1)
%>
<?xml version="1.0" encoding="gb2312"?>

<data
buttonColor="0x000000"
buttonOverColor="0x222222"
readbuttonColor="0x999999"
readbuttonOverColor="0xffffff"
controlBarColor="0xffffff"
controlBarOverColor="0xcc3366"
scrollColor="0xcc3366"
trackColor="0x333333"
txtColor="0x999999"
txtOverColor="0xffffff"
counterText1="Displaying"
counterText2="News"
newsWidth="700"
newsHeight="150"
thumbWidth="130"
thumbHeight="130"
textLength="600">	
	
<%
Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select * from news where N_sort="&S_id&" order by N_id desc"
rs.open sql,conn,1,1
if not rs.eof then
Do while Not rs.eof
response.Write "<item><media>image</media><image>"&rs("N_pic")&"</image><youtube></youtube><videoWidth></videoWidth><videoHeight></videoHeight><description><![CDATA[<font size='20' face='Microsoft Yahei'>"&rs("N_title")&"</font><br><font color='#00ffff'>"&rs("N_date")&"</font><br>"&RemoveHTML(rs("N_content"))&"]]></description><thumb><![CDATA[<font size='20' face='Microsoft Yahei'>"&rs("N_title")&"</font><br><font color='#00ffff'>"&rs("N_date")&"</font><br>"&left(LoseHtml(rs("N_content")),140)&"...]]></thumb></item>"
rs.movenext
		loop
	end if
set rs=nothing
%>

</data>

