Melanjutkan posting sebelumnya, berikut cara koneksi database MySQL online dengan Visual Basic 6.0, sebelumnya anda harus mengikuti posting saya sebelumnya tentang Koneksi MySQL - online dengan bantuan DSN - ODBC
1. Menggunakan Adodc.
tambahkan sebuah adodc dan datagrid pada sebuah form, klik kanan pada Adodc untuk mengatur proprties-nya sebagai berikut :
- pada tab General, pilih option 'Use ODBC Data Source Name', kemudian pilih salah satu nama DSN-nya.
- pada tab RecordSource, command type pilih adCmdTable dan cari nama tabel pada kotak dibawahnya.
Selanjutnya hubungkan datagrid dengan adodc, dengan cara set proprties datagrid, pada datasource pilih Adodc1.
2. Menggunakan ADODB
Berikut adalah code-nya :
Sebelumnya tambahkan sebuah datagrid kedalam form. Demikian bila masih bingung Anda bisa download source codenya pada link dibawah ini :Dim con As ADODB.ConnectionDim rs As ADODB.RecordsetPrivate Sub Form_Load()Set con = New ADODB.Connectioncon.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=myodbc2"con.OpensetdatagridEnd SubSub setdatagrid()On Error Resume NextSet rs = New ADODB.Recordsetrs.CursorLocation = adUseClientrs.Open "select * from t_mahasiswa", conSet DataGrid1.DataSource = rsDataGrid1.RefreshEnd Sub
http://www.ziddu.com/download/17968796/dbonline.rar.html
Note : Kalau nyoba source-nya komputer haris terkoneksi internet :)
Update Contact :
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email : Fajarudinsidik@gmail.com
No Wa/Telepon (puat) : 085267792168
No Wa/Telepon (fajar) : 085369237896
Email: Fajarudinsidik@gmail.com
atau Kirimkan Private messanger melalui email dengan klik tombol order dibawah ini :