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.

   

Kirim email ke