streaming ud af db til xml-fil

Kunne forestille meg at det vanligste er å bruke IIS og ASP, særlig hvis du skal kombinere flere relasjoner(=tabeller) til et trestrukturert XML-dokument.

Access XP kan visstnok eksportere en accesstabell som XML, men det tror jeg blir XML-dokumenter som ligner accesstabeller: et rotelement som svarer til tabellen, dette inneholder ett element for hver record i tabeller, disse inneholder alle sammen like mange elementer, nemlig ett for hvert felt ti en record.

Noget med i stil:

<html>
<head>
    <title></title>
</head>
<body>

<%
    Dim objFso, f, filespec
   
        Set objConn = Server.CreateObject("ADODB.Connection")
        objConn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("sti/db.mdb")
   
        strSQL = "SELECT * FROM tabel"
        Set objRs = objConn.Execute(strSQL)
   
        Set objFso = CreateObject("Scripting.FileSystemObject")
        filespec = Server.Mappath("tekstfil.xml")
        Set f = objFso.OpenTextFile(filespec,2)
   
        f.Write("<?xml version=""1.0"" encoding=""ISO-8859-1""?>" & vbCrLf & vbTab)
        While Not objRs.EOF
                f.Write("<index>" & vbCrLf & vbTab & vbTab)
                    f.Write("<name>" & vbCrLf & vbTab)
                        f.Write objRs("tabel")
                    f.Write("</name>" & vbCrLf & vbTab)
                f.Write("</index>" & vbCrLf & vbTab)
        objRs.MoveNext()
        Wend
       
        f.Close
%>

</body>
</html>

//>Rune

http://www.magik.dk/vis_funktion.asp?id=5

Thx 4 Poinz

//>Rune