writing to a file (1 Viewer)

Hello

I have a table that looks like this:
Field1 = FirstName
Field2 = Lastname
Field3 = Address

I want the writing to a file that looks like this:
<statics>
<Contact>
<Firstname></FirstName>
<Lastname></Lastname>
<Address></Address>
</contact>
</statics>

etc.

it can be done via vba?

In another post, you've asked to do the same thing via XML using XSD, and been advised to google.

You can write a simple formatted XML by just outputting text. Google vba output to text file

roger

but I need some more help, try to insert into vba, but jeg have a problem with "openrecordset, rst

Dim rst As DAO.Recordset
Open "C:\names.xml" For Output As #1
Set rst = CurrentDb.OpenRecordset("SELECT * FROM tabel1", dbOpenSnapshot)
Print #1, "<statics>"

rst.MoveFirst


Do While Not rst.EOF

Print #1, "<Contact>"
Print #1, "<Firstname>" & rst!fornavn & "</Firstname>"
Print #1, "<Lastname>" & rst!efternavn & "</Lastname>"
Print #1, "<Address>" & rst!adresse & "</Address>"
Print #1, "</Contact>"
rst.MoveNext
Loop
Print #1, "</statics>"
rst.Close
Set rst = Nothing
Close #1