[ASK] mengkoneksikan vb6 ke database macces 2003 & menampilkannya di MSHFlexGrid

[Guesuper]

Para sesepuh VB6



tolong gan ajarin cara mengkoneksikan vb6 ke database macces(.mdb). Dan ditampilkan lewat form di dalam MSHFlexGrid....



ane dah nyoba koneksi seperti ini

wat koneksinya dengan membuat procedure tampil


Code:

Dim con As New adodb.Connection
Sub tampil()
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\SIA\akuntansi.mdb"
End Sub



menampilkannya di flexgrid


Code:

Dim rsakun As New adodb.Recordset
Private Sub Form_Load()
tampil
rsakun.Open "SELECT * FROM Akun", con, adOpenKeyset, adLockOptimistic
Set grid1.DataSource = rsakun
End Sub

grid1= MSHFlexGrid



pas di run muncul


Spoiler for Pesan Eror:
















mohon pencerahannya



thx b4 gan



maap klu threadnya kurang berkenan