Export Database Ke Xml Dengan Vb.Net
selamat malam sahabat blogger semuanya, kembali lagi bersama saya guzko di blog yang sederhana ini. Sesuai dengan judulnya kali ini saya akan sharing mengenai bagaimana caranya melakukan export database ke XML.
pada tutorial ini, saya akan melanjutkan aplikasi yang saya share sebelumnya ialah wacana “Membuat Aplikasi CRUD dengan VB.Net dan MS Access”. Pada aplikasi itu akan saya tambahkan satu fungsi ialah untuk export database. Bagi agan yang ingin mendownload source code dari tutorial saya wacana crud, sanggup download disini.
oke, langsung saja gan begini penampakan aplikasinya sesudah saya tambahkan satu button untuk export lagi…
oke langsung saja klik 2x button export dan tambahkan instruksi sederhana berikut ini :
Private Sub cmdExport_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdExport.Click Dim tanya As Integer tanya = MsgBox("Database akan di-export ke XML pada direktori aplikasi ini. Apakah yakin ingin export ?", vbQuestion + vbYesNo, "Guzko Tutorial") If tanya = vbYes Then Try Dim ds As New Data.DataSet() Dim da As New System.Data.OleDb.OleDbDataAdapter("SELECT * FROM tbKaryawan", cnnOLEDB) da.Fill(ds) ds.WriteXml(System.Environment.CurrentDirectory & "\dataKaryawan.xml", Data.XmlWriteMode.WriteSchema) MsgBox("Database berhasil di-export. dataKaryawan.xml berhasil dibuat", vbInformation, "Guzko Tutorial") Catch ex As Exception MsgBox("Unknown Error : " & ex.Message, vbCritical, "Guzko Tutorial") End Try End If End Sub
oke selesai gan, silahkan dicoba jalankan. karenanya ibarat ini gan :
oke dech gan, sekian dulu tutorial singkat dari saya….,
biar ada manfaatnya gan…,lain kali saya sambung lagi tutorialnya.
seee … uuuuu
Sumber http://guz-kopyok.blogspot.com/