begini seharusnya :
sSQL = "Select * From tbPinjam"
set rs = cnn.execute(sSQL)
kenapa masih pake Data1? kenapa gak pake ADODB / ADODC aja ? kenapa DBGRID?
kenapa gak DataGrid / VSFlexGrid / MSHFlexGrid ? setahu aku klo Data1 gak bisa
ke DataGrid jadi harus ganti jadi ADODC / ADODB / MSDRC si Data1 nya.
Eko Wibowo Yudhi Setyo Nugroho <[EMAIL PROTECTED]> wrote:
kok yang di eksekusi cnn, bukan aSQL nya?, teman yang lain ada yang
mau ngasih pendapat
----- Original Message -----
From: Frangky
To: [email protected]
Sent: Saturday, December 23, 2006 5:14 AM
Subject: [Programmer-VB] Hasil query ditampilkan dalam Datagrid menggunakan
Object Recordset dan Komponen DataGrid.
Teman-teman, maaf kalau pertanyaan ini pernah ditanyakan sebelumnya.
Selama ini Saya menggunakan Komponen Data1 dan DBGrid untuk menampilkan isi
dari sebuah tabel ke dalam DBGrid.
Dengan menggunakan code seperti dibawah ini, hasilnya seperti yang saya
inginkan.
Private Sub Form_Load()
With Data1
.RecordSource = "SELECT * from table1"
.Refresh
If .Recordset.Recordcount >0 Then
DBGrid1 = .Recordset!Kode
End If
End Sub
Pertanyaannya bagaimana kalau saya menggunakan Object Recordset dan Komponen
DataGrid.
Saya menggunakan code seperti dibawah ini tapi tidak berhasil.
Private Sub Form_Load()
cnn.Open "provider=microsoft.jet.oledb.4.0;data source=" & App.Path &
"\dbRental.mdb"
cnn.CursorLocation = adUseClient
Dim sSql As String
sSql = "select * from tbPinjam"
Set rs = cnn.Execute(xpilih)
If rs.RecordCount < 0 Then
DataGrid1 = rs!KODE
End If
End Sub
Mohon bantuannya.
__________________________________________________
Apakah Anda Yahoo!?
Lelah menerima spam? Surat Yahoo! memiliki perlindungan terbaik terhadap spam
http://id.mail.yahoo.com
