ketikan di tengah malam... klaklikla...

sql="select* from qrymedclaim where medclaimid ='" & trim(session("appspersonid")) & "' and (medclaimsubmitdate >= #"& dtmtemp &"#) order by medclaimno desc"
set rs = db.execute(sql)

If not rs.eof then
%>

<% response.contenttype = "text/xml" %><?xml version="1.0"?>
<medclaimlist>
<% do until rs.eof %>
<medclaim id="<%= trim(rs.fields("medclaimno")) %>">
<personid name="<%= trim(rs.fields("medclaimname")) %>" cc="<%= trim(rs.fields("medclaimccno")) %>">
<%= trim(rs.fields("medclaimid")) %>
</personid>
<period><%= trim(rs.fields("medclaimsubmitdate")) %></period>
...

klaklikla...