Diasumsikan Dbs sebagai connection & Rs sebagai Recordset
Sub Tampil()
MSHFlexGrid.Refresh
Call Akses
Rs.Open "select * from [operator] order by [kode operator]", Dbs, MSHFlexGrid
Set MSHFlexGrid.DataSource = Rs
End Sub
kalau koding seperti diatas jalan seperti biasa karena menggunakan komponen MSHFlexGrid !
Tapi Kalo Koding seperti dibawah muncul pesan 'Object variable or with block variable not set' Kenapa Ya ?
Catatan : dibawah ini saya menggunakan komponen MSFlexGrid biasa ?
Sub Tampil_Grid()
MSflexgrid.Refresh
Call Akses
Rs.Open "select * from [operator] order by [kode operator]", Dbs, adOpenStatic, adLockReadOnly
Set MSflexgrid.DataSource = Rs
End Sub
Klo set nya saya hilangkan malah 'Type Mismatch' apanya ya yang salah !
Makasiih Banyak !
Apakah Anda Yahoo!?
Kunjungi halaman depan Yahoo! Indonesia yang baru!
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
