Aggiungere record in xml

[Luca1317]

Ho una foto gallery in swf che prende i dati da un file xml, e vorrei aggiungere ogni tanto un'immagine alla gallery scrivendo direttamente nel file xml...l'unico modo che mi viene in mente per farlo:

ad ogni aggiunta di un record prelevo tutti i records dal database (i percorsi delle foto) dopodichè creo il file xml da 0...questo ogni volta che si aggiunge un'immagine

ad es:

creaxml.asp

'Creo il Documento XML 
xmlContent = "<percorsiImmagini>" 
xmlContent = xmlContent & "<Immagine>variabile-record-1</Immagine>" 
xmlContent = xmlContent & "<Immagine>variabile-record-2</Immagine>" 
xmlContent = xmlContent & "<Immagine>variabile-record-3</Immagine>" 
xmlContent = xmlContent & "</percorsiImmagini>"

in questo modo credo non ci siano problemi ma la mia domanda è:

è giusto fare in questo modo o ci sono altri metodi più semplici che non conosco?

[cavicchiandrea]

Secondo me si, come la so io i file xml li puoi leggere o scrivere ma non modificare (inteso come aggiungere) automaticamente, per tanto dovrai re-iscriverli ad ogni modifica/aggiunta.

[Luca1317]

ok...grazie del suppoirto

[agenti]

http://www.w3schools.com/Dom/dom_nodes_add.asp

[Luca1317]

con questo codice:

'---INIZIO RECUPERA DATI IN CICLO DAL DATABASE------------	
	
strDataBasePath = "\mdb-database\database.mdb"
connDATI = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(strDataBasePath) & ";" & "JET OLEDB:Database Password=paperino"
viewuserSQL = "SELECT * FROM DocumentiUt"

'E creo il recordset
Set recDATI = Server.CreateObject ("ADODB.Recordset")
recDATI.Open viewuserSQL, connDATI, 3, 3


'Creo il Documento XML 

xmlContent = "<?xml version=""1.0"" encoding=""UTF-8""?>"&VbCrLf
xmlContent = xmlContent & "<gallery>"&VbCrLf
xmlContent = xmlContent & "<album lgPath=""/"" tnPath=""/"" title=""Porsche"" description=""Album description"" tn=""album1/thumb/1.jpg"">"&VbCrLf

while not recDATI.eof

testo=recDATI("testo")
PercorsoImg1=recDATI("PercorsoImg1")


xmlContent = xmlContent & "[img][/img]"&VbCrLf




recDATI.movenext
wend

xmlContent = xmlContent & "</album>"&VbCrLf
xmlContent = xmlContent & "</gallery>"
'Fine Creazione XML

creo il seguente file xml:

<?xml version="1.0" encoding="UTF-8"?>
<gallery>

<album lgPath="/" tnPath="/" title="Dicembre" description="" tn="/AutoSystem/album1/images/1.jpg">
[img]/AutoSystem/album1/images/1.jpg[/img]
[img]/AutoSystem/album1/images/2.jpg[/img]
[img]/AutoSystem/album1/images/3.jpg[/img]
[img]/AutoSystem/album1/images/4.jpg[/img]
[img]/AutoSystem/album1/images/5.jpg[/img]
</album>

</gallery>

però non riesco a creare un secondo album, cioè non riesco a creare questo file xml:

<?xml version="1.0" encoding="UTF-8"?>
<gallery>

<album lgPath="/" tnPath="/" title="Dicembre" description="" tn="/AutoSystem/album1/images/1.jpg">
[img]/AutoSystem/album1/images/1.jpg[/img]
[img]/AutoSystem/album1/images/2.jpg[/img]
[img]/AutoSystem/album1/images/3.jpg[/img]
[img]/AutoSystem/album1/images/4.jpg[/img]
[img]/AutoSystem/album1/images/5.jpg[/img]
</album>

<album lgPath="/" tnPath="/" title="Novembre" description="" tn="/AutoSystem/album2/images/1.jpg">
[img]/AutoSystem/album2/images/1.jpg[/img]
[img]/AutoSystem/album2/images/2.jpg[/img]
[img]/AutoSystem/album2/images/3.jpg[/img]
[img]/AutoSystem/album2/images/4.jpg[/img]
[img]/AutoSystem/album2/images/5.jpg[/img]
</album>

</gallery>

in pratica dovrei dirgli che deve estrapolarmi i record per ogni "album" (album1, album2 etc...)

[Luca1317]

sto facendo qualche passo in avanti ma ancora non ci sono, mi manca un ultima cosa...

con questo codice (select nella select):

'---INIZIO RECUPERA DATI IN CICLO DAL DATABASE------------	
	
strDataBasePath = "\mdb-database\database.mdb"
connDATI = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(strDataBasePath) & ";" & "JET OLEDB:Database Password=paperino"
viewuserSQL = "SELECT * FROM DocumentiUt"

'SQL2
viewuserSQL2 = "SELECT album FROM DocumentiUt group by album"

'E creo il recordset
Set recDATI = Server.CreateObject ("ADODB.Recordset")
recDATI.Open viewuserSQL, connDATI, 3, 3


'E creo il recordset2
Set recDATI2 = Server.CreateObject ("ADODB.Recordset")
recDATI2.Open viewuserSQL2, connDATI, 3, 3



'Creo il Documento XML 
xmlContent = "<?xml version=""1.0"" encoding=""UTF-8""?>"&VbCrLf
xmlContent = xmlContent & "<gallery>"&VbCrLf

while not recDATI2.eof

album=recDATI2("album")

xmlContent = xmlContent & "<album lgPath=""/"" tnPath=""/"" title=""Porsche"" description="""&album&""" tn=""album1/thumb/1.jpg"">"&VbCrLf

while not recDATI.eof




testo=recDATI("testo")
PercorsoImg1=recDATI("PercorsoImg1")


xmlContent = xmlContent & "[img][/img]"&VbCrLf




recDATI.movenext
wend

xmlContent = xmlContent & "</album>"&VbCrLf

recDATI2.movenext
wend

xmlContent = xmlContent & "</gallery>"
'Fine Creazione XML

riesco ad avere tutti gli album ma solo il primo esce popolato (e con tutti gli elementi, anche quelli di altri album)

<?xml version="1.0" encoding="UTF-8"?>
<gallery>

<album lgPath="/" tnPath="/" title="Porsche" description="album1" tn="album1/thumb/1.jpg">
[img]/album1/images/6485_bg.jpg[/img]
[img]/album1/images/4979_photo_stripes.png[/img]
[img]/album2/images/4979_photo_stripes.png[/img]
[img]/album4/images/4979_photo_stripes.png[/img]
</album>

<album lgPath="/" tnPath="/" title="Porsche" description="album2" tn="album1/thumb/1.jpg">
</album>

<album lgPath="/" tnPath="/" title="Porsche" description="album4" tn="album1/thumb/1.jpg">
</album>

</gallery>