aku buat koding berikut ini
Sub TampilData()
Dim Connection As New ADODB.Connection
Dim Recordset as Recordset
Connection.Open "DATA" ' diambil dari ODBC
Set Recordset=Connection.Execute("SELECT * FROM TblBarang")
DataGrid1.DataSource=Recordset
end sub
gi bisa jalan. tolong teman2
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.
