RE:Generar XML desde Access
Publicado por
Raquel (1 intervención) el 20/05/2009 10:30:31
Hola, con Visual Basic lo puedes hacer de la siguiente forma:
Imports System.Data.OleDb
Public Class Form1
Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:RutaBaseDatosAcces.mdb")
Dim cmd As New OleDbCommand
Dim myDA As OleDbDataAdapter
Dim myDataSet As DataSet
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
cmd = New OleDbCommand("SELECT * FROM NombreTabla", con)
If con.State = ConnectionState.Closed Then con.Open()
myDA = New OleDbDataAdapter(cmd)
myDataSet = New DataSet()
myDA.Fill(myDataSet, "NombreTabla")
myDataSet.WriteXml("C:XLfile.xml", XmlWriteMode.WriteSchema)
End Sub
End Class
Saludos.