Filoweb.it

CONVERTIDA I DATI DI UNA TABELLA ACCESS IN UN FILE XML


FB TW G+ 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 G+ 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 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 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