Hubungkan ke Database MySQL jarak jauh Menggunakan VB.Net
Untuk menghubungkan vb.net ke basis data MySql jarak jauh; Apa pun versi VB.Net yang mungkin Anda gunakan, lakukan saja langkah-langkah berikut.
1) Unduh Mysql Connector/Net dari url (https://dev.mysql.com /downloads/connector/net/ )
2) Pasang konektor; secara default konektor akan dipasang di jalur (C:\Program Files\MySQL\Connector Net 6.9.6) itu versi yang saya instal.
3) Buka VB.Net IDE dan mulai proyek baru.
4) Tambahkan "Mysql.Data.dll" sebagai referensi ke proyek Anda, yang dapat Anda temukan di jalurnya (C:\Program Files\MySQL\Connector Net 6.9.6\Assemblies\v4.5);
5) Siapkan formulir koneksi Anda seperti yang ditunjukkan pada gambar ini;
6) Buat kelas bernama "Database" dan tulis kode berikut.
Kode kelas basis data
Mengimpor MySql.Data.MySqlClient
Basis Data Kelas Publik
Private _connection As New MySqlConnection
Private _errormessge As String
Private _servername As String
Private _databasename As String
Private _userid As String
Private _password As String
Public WriteOnly Property ServerName() As String
Set(ByVal value As String)
_servername = value
End Set
End Property
Public WriteOnly Property DatabaseName() As String
Set(ByVal value As String)
_databasename = value
End Set
End Property
Public WriteOnly Property UserID() As String
Set(ByVal value As String)
_userid = value
End Set
End Property
Public WriteOnly Property Password() As String
Set(ByVal value As String)
_password = value
End Set
End Property
Public ReadOnly Property ErrorMessage() As String
Get
Return _errormessge
End Get
End Property
Public Function Connection() As Boolean
Try
_connection.ConnectionString = "Server=" & _servername & ";Port=3306;Database=" & _databasename & ";User ID=" & _userid & ";Password=" & _password & ""
_connection.Open()
If _connection.State = ConnectionState.Open Then
_connection.Close()
Return True
End If
Catch ex As Exception
_errormessge = ex.Message
Return False
End Try
End Function
Akhiri Kelas
Formulir Kode Kelas
Kelas Publik Frm_MainPrivate Sub btn_connect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Menangani btn_connect.Click
'Deklarasi dan instantiasi objek
Redupkan data Sebagai Basis Data Baru
With data
'Assing the object property values
.ServerName = txt_server.Text
.DatabaseName = txt_database.Text
.UserID = txt_uid.Text
.Password = txt_pwd.Text
'Connection testing
If .Connection Then
MessageBox.Show("Database Conneted.")
Else
MessageBox.Show(.ErrorMessage)
End If
End With
End Sub
Private Sub btn_exit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_exit.Click
Close()
End Sub
Akhiri Kelas
7) Jalankan proyek dan coba koneksinya; jika koneksi berhasil maka keberuntungan Anda; dan jika koneksi tidak berhasil dengan pesan kesalahan berikut khawatir tidak hanya terus membaca;
8) Catat alamat ip pada pesan kesalahan setelah @ (itu ip Anda) dan tambahkan ke cpanel domain Anda "akses mysql jarak jauh" gambar di bawah mengilustrasikan bagaimana tampilan akses mysql jarak jauh (mereka sama tetapi mereka mungkin menunda dalam warna ); Jangan lupa untuk menekan tombol "tambah host". Pengaturan ini dapat bekerja setiap hari bagi mereka yang berada di ip statis.
Lihat pesan sukses setelah langkah-langkah di atas;
Tetapi jika pesan kesalahan tetap ada, cobalah untuk membiarkan teks kata sandi kosong dan sambungkan lagi jika Anda tidak memiliki kata sandi di basis data jarak jauh Anda; jika eror muncul lagi kecuali YA diubah menjadi TIDAK maka Anda harus memeriksa apakah Anda di DHCP;
9) Jika Anda di DHCP yang berarti ip berubah di setiap koneksi Internet baru. Jika Anda menggunakan modem mungkin Anda di DHCP. Jika Anda berada di ip dinamis, periksa apa yang berubah di 4 blok ip. Jika ip pertama adalah 197.250.3.201 pada koneksi pertama dan ip berikutnya adalah 197.250.60.70 dan ip berikutnya adalah 197.250.80.24; Anda harus menambahkan 197.250.% di host akses cpanel Anda agar koneksi Anda stabil.
10) Catatan:Sebagai simbol persen (wild card) mengalir ke sisi kiri alamat ip semakin pintu keamanan menjadi terbuka. Pada kesalahan baru, harap hubungi penyedia domain Anda mungkin ada beberapa masalah keamanan lain di domain. Terima kasih!