Refresh Atau Merapikan Data Dalam DataGrid VB6 Setelah di Edit Atau di Input Data

 
Setelah anda Meng Input atau Edit data dalam Datagrid tidak ada data nya dalam datagrid,maka buatlah Button "Refresh Data" pada Form anda untuk menampilkan data yang sudah anda Input atau anda edit agar masuk ke dalam datagrid serta merapikan kembali data dalam datagrid sesuai dengan urutan nya.

Setelah anda membuat Button nya,kemudian masukan Source Code di bawah ini ke dalam Button "Refresh Data"  tersebut.

Call Koneksi    'Membuka Koneksi
    con.CursorLocation = adUseClient
    RSdata.Open "SELECT `nm_tabel`, `Nm_fileds`, `
Nm_fileds`, `Nm_fileds`, `Nm_fileds`, `Nm_fileds`, `Nm_fileds`, `Nm_fileds`, `Nm_fileds` FROM `Nm_tabel` ORDER BY  `Nm_fileds` ASC ", con
    Set DataGrid1.DataSource = RSdata.DataSource
With DataGrid1
end with

Nb : Pada Source Code tersebut di atas saya menggunakan data dari Mysql yang saya koneksikan ke dalam datagrid Visual Basic 6 tanpa menggunakan Component Adocd1,dan memang setiap Tutorial atau Program yang saya buat tidak ada yang menggunakan Adocd1.

Silahkan Anda ganti beberapa bagian dari Source code tersebut di atas yang saya beri warna merah sesuai dengan Event Variabel String Source code anda.

Popular Posts