Filoweb.it

CONVERTIDA I DATI DI UNA TABELLA ACCESS IN UN FILE XML


FB TW whatsapp RSS FEED News letter
ASP
CONVERTIDA I DATI DI UNA TABELLA ACCESS IN UN FILE XML


<%

set conn = Server.CreateObject(" ADODB.Connection" )

conn.Open strconn

set rs = conn.Execute(" SELECT * FROM tabella" )

Dim strXML

strXML = " <xml>"

Do While rs.EOF<>True

strXML = strXML & " <row>"

For Each Item In rs.Fields

strXML = strXML _

& " <" & Item.name & " >" _

& Item.value _

& " </" & Item.name & " >"

Next

strXML = strXML & " </row>"

rs.MoveNext

Loop

strXML = strXML & " </xml>"

' libero risorse

rs.Close

Set rs = Nothing

conn.Close

set conn = Nothing

%>

<%

rs.Save Response, adPersistXML ' -1

%>
FB TW whatsapp RSS FEED News letter

filoweb.it è il sito personale di Filippo Brunelli
(c) 2017 Filippo Brunelli
Le immagini ed i testi contenuti nel sito filoweb.it sono di proprietà di Filippo Brunelli salvo diversamente indicato.
L'uso delle immagini e del testo è gratuito per uso personale ed è subbordinato alla citazione della fonte.
Brunelli Filippo declina ogni responsabilità per l'uso che viene fatto delle informazioni presenti nel sito filoweb.it.
FILOWEB.it Piccolo quaderno degli appunti. Argomento: ASP, Titolo:CONVERTIDA I DATI DI UNA TABELLA ACCESS IN UN FILE XML. Altri script riguardano: CSS, Jscript, .net, Classic Asp, HTML, Jquery, varie, url rewrite, pagina protetta da password, ecc. Altro su https://www.filoweb.it