Hi
i'm trying to find some code that can genrate asp result to xml sheet
My xml version is <?xml version="1.0" encoding="utf-8" standalone="yes "?>
[CODE=asp]
<%
response.Conten tType = "text/xml"
set conn=Server.Cre ateObject("ADOD B.Connection")
conn.provider=" Microsoft.Jet.O LEDB.4.0;"
conn.open server.mappath( "/db/database.mdb")s ql="select fname,lname from tblGuestBook"
set rs=Conn.Execute (sql)response.w rite("<?xml version='1.0' encoding='ISO-8859-1'?>")
response.write( "<guestbook >")
while (not rs.EOF)
response.write( "<guest>")
response.write( "<fname>" & rs("fname") & "</fname>")
response.write( "<lname>" & rs("lname") & "</lname>")
response.write( "</guest>")
rs.MoveNext()
wendrs.close()
conn.close()
response.write( "</guestbook>")
%>
[/CODE]
thanks in advance
i'm trying to find some code that can genrate asp result to xml sheet
My xml version is <?xml version="1.0" encoding="utf-8" standalone="yes "?>
[CODE=asp]
<%
response.Conten tType = "text/xml"
set conn=Server.Cre ateObject("ADOD B.Connection")
conn.provider=" Microsoft.Jet.O LEDB.4.0;"
conn.open server.mappath( "/db/database.mdb")s ql="select fname,lname from tblGuestBook"
set rs=Conn.Execute (sql)response.w rite("<?xml version='1.0' encoding='ISO-8859-1'?>")
response.write( "<guestbook >")
while (not rs.EOF)
response.write( "<guest>")
response.write( "<fname>" & rs("fname") & "</fname>")
response.write( "<lname>" & rs("lname") & "</lname>")
response.write( "</guest>")
rs.MoveNext()
wendrs.close()
conn.close()
response.write( "</guestbook>")
%>
[/CODE]
thanks in advance
Comment