Koneksi aplikasi ke database merupakan bagian yang tak terpisahkan dari sebuah perangkat lunak aplikasi yang kita buat. Sebagai pada blog ini kami fokus pada aplikasi Visual Basic .NET untuk itu kami akan memberikan sebuah kutipan scrip VB .NET melalui modul koneksi.
Detail script programnya dapat anda lihat dibawah ini dimana anda dapat melakukan beberapa penyesuaian dan modifikasi agar dapat berjalan pada logika pemrograman anda. Dan pastikan anda telah mengimport beberapa reference yang dibutuhkan.
Kunjungi Zeekomp.com dan temukan sesuatu yang baru disana...Module koneksi Public conn As New MySql.Data.MySqlClient.MySqlConnection Public Sub open() 'buka koneksi mysql If conn.State = ConnectionState.Closed Then Try Dim Contents As String Contents = My.Computer.FileSystem.ReadAllText("C:\koneksi\config.koneksi") Dim myString As String = Contents conn.ConnectionString = myString conn.Open() If conn.State = ConnectionState.Connecting Then End If Catch ex As MySql.Data.MySqlClient.MySqlException MessageBox.Show(ex.Message, "Error Open Koneksi",MessageBoxButtons.OK, MessageBoxIcon.Error) End Try End If End Sub Public Sub disconnect() 'tutup koneksi mysql Try conn.Close() Catch ex As MySql.Data.MySqlClient.MySqlException MessageBox.Show(ex.Message, "Error Disconnect Koneksi",MessageBoxButtons.OK, MessageBoxIcon.Error) End Try End Sub End Module

0 komentar: