iOS Question IXML Issue

yejian

Member
Licensed User
Longtime User
Dim x As XMLBuilder
x = x.create("Ysoft")
x = x.element("Ordine") _
.element("Prodotti") _
.attribute("CodBarre", "8001234567890") _
.attribute("Descrizione", "CALICE FLUTE ROSSO CONF.6 440041 *") _
.attribute("PrezzoForn", "10.59") _
.attribute("CodArticoloForn", "HX256356") _
.attribute("Quantita", "22") _
.up() _
.up() _
.up() _
File.WriteString(File.DirDocuments, "1.xml", x.AsString)

The test is successful
I want results

How do?

Dim x As XMLBuilder
x = x.create("Ysoft")
x = x.element("Ordine") _
FOR I= 1 TO 10
.element("Prodotti") _
.attribute("CodBarre", "8001234567890") _
.attribute("Descrizione", "CALICE FLUTE ROSSO CONF.6 440041 *") _
.attribute("PrezzoForn", "10.59") _
.attribute("CodArticoloForn", "HX256356") _
.attribute("Quantita", "22") _
.up() _
NEXT
.up() _
.up() _

File.WriteString(File.DirDocuments, "1.xml", x.AsString)
 
Top