<!--#include file="../../p_inc/Include_func.asp"-->
<!--#include file="../inc/classDbPager.asp"-->
<!--#include file="../inc/public.asp"-->
<!--#include file="../inc/openconn.asp"-->
<!--#include file="config.asp"-->
<%
	str=""	
	str=str&"<qingtiandy_url>"
	Set oRs=conn.Execute("Select * From qingtiandy_tool Order By Id asc ")
	Do While Not oRs.Eof 
		sid=oRs("id")
		sm_type1=oRs("m_type1")
		sm_type2=oRs("m_type2")
		sm_name=oRs("m_name")
		sm_color=oRs("m_color")
		sm_look=oRs("m_look")
		sm_url=oRs("m_url")
		sm_content=oRs("m_content")
		sm_time=oRs("m_time")
		sm_no=oRs("m_no")
		sm_start=oRs("m_start")
		sm_end=oRs("m_end")
		sm_pic=oRs("m_pic")
		sm_province=oRs("m_province")
		sm_city=oRs("m_city")
		sm_name2=oRs("m_name2")
		str=str&sid&"|||"&sm_type1&"|||"&sm_type2&"|||"&sm_name&"|||"&sm_color&"|||"&sm_look&"|||"&sm_url&"|||"&sm_content&"|||"&sm_time&"|||"&sm_no&"|||"&sm_start&"|||"&sm_end&"|||"&sm_pic&"|||"&sm_province&"|||"&sm_city&"|||"&sm_name2&"####"
		oRs.MoveNext
	Loop
	str=str&"</qingtiandy_url>"
	Response.Write str
%>