Membuat File XML dari MySQL

Mengatur agar koneksi database bisa menjadi fleksibel tanpa harus mengikuti wizard pada koneksi database visual studio 2008 yang akan menampilkan data pada crystal report. Dapat dilakukakn beberapa cara atau metode untuk mengakali hal tersebut. Salah satu yang dapat kita gunakan adalah menggunakan bantuan file xml.

File xml disini akan membantu kita untuk menghubungkan crystal report dengan database mysql. Apa keuntungan menggunakan metode ini? bagi saya metode ini memudahkan saya untuk membuat sebuah modul tambahan untuk konfigurasi username dan password database yang apabila menggunakan wizard, maka username dan password bersifat static (tidak dapat dirubah), jadi apabila suatu saat data username kita sudah tidak aman, lantas bagaimana cara mengganti username dan passwordnya? Kunjungi Brozzaholic.com dan temukan korsase dan bross yang sesuai dengan selera anda.

Nah, bagaimana cara mengkonversi isi dari database mysql menjadi sebuah file xml? berikut listing programnya dibawah ini yang dapat anda lihat dibawah ini:

Sub sqlToXML()
Try
disconnect()
open()
Dim ds As New DataSet
Dim ss As New MySqlDataAdapter

Dim query As String = "query_mysql_disini"
ss.SelectCommand = New MySqlCommand(query, conn)
ss.Fill(ds)
If Not Directory.Exists("direktori_penyimpanan") Then
Directory.CreateDirectory("direktori_penyimpanan")
End If
ds.WriteXml("direktori_penyimpanan/nama_file.xml",
  XmlWriteMode.WriteSchema)

Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "sqlToXML")
End Try
End Sub