<!--#include file="../../../conn/conn4.asp" -->
<!--#include file="../../../conn/function.asp" -->
<?xml version='1.0' encoding='utf-8'?>
<data>
<%
Set rs= Server.CreateObject("ADODB.RecordSet")
sql="select * from guestbook order by G_id desc"
rs.open sql,conn,1,1
if not rs.eof then
Do while Not rs.eof
if rs("G_Reply")="" then
G_reply="暂时没有回复"
else
G_reply=rs("G_Reply")
end if
response.Write  "<list><name>"&rs("G_name")&"</name><date>"&rs("G_time")&"</date><content><![CDATA["&rs("G_Msg")&"<br>回复："&G_reply&"<br><br>]]></content></list>"
rs.movenext
		loop
	end if
set rs=nothing
%>
</data>