Comment sauvegarder un fichier XML?

[Identifiant]

Considérons que j'ai le code suivant, comment puis-je le sauvegarder dans
un fichier XML et plus précisement sous le répertoire suivant :

FolderPath = Request.ServerVariables("APPL_PHYSICAL_PATH") & "images\"& Session("username")

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
<%
response.ContentType = "text/xml"
set conn=Server.CreateObject("ADODB.Connection") 
conn.provider="Microsoft.Jet.OLEDB.4.0;"
conn.open server.mappath("/db/database.mdb")
sql="select fname,lname from tblGuestBook"
set rs=Conn.Execute(sql)
 
rs.MoveFirst()
 
response.write("<?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()
wend
 
rs.close()
conn.close()
response.write("</guestbook>")
%>

[Immobilis]

Salut,

http://asp.developpez.com/faq/?page=filesystemobject

A+