Salam VB,


With Adodc1.Recordset
    .MoveFirst
    .Find "NoFaktur = '" & txtNoFaktur.Text & "'"
    If Not .EOF Then
        dTanggal.Value  = .Fields("Tanggal") 'sesuaikan dengan field yang ada
        txtKeterangan.Text = .Fields("Keterangan") 'sesuaikan dengan field yang 
ada
    End If
End With


Semoga membantu...

________________________________
GENERASI COMPUTER
Berbagi Ilmu Visual Basic Bagi Pemula

http://www.generasicomputer.com

Hp. 08126514562
________________________________






________________________________
From: sherina <sherinalave...@yahoo.com>
To: Programmer-VB@yahoogroups.com
Sent: Wed, March 17, 2010 4:14:59 AM
Subject: [Programmer-VB] tunjuk record adodc

  
hi all..
ada yang bisa bantu?
ada yang tau syntax untuk menunjuk suatu record, tanpa menghilangkan record lain
yang ada di datagrid yg menggunakan adodc?
karena jika menggunakan :
select from penjualan where nofaktur='" & txtNoFaktur. Caption & " '
bla..bla..bla. ..
data yang tampil di datagrid hanya record yang dicari saja, sedangkan saya ingin
agar record yang lain tetap ada dan di datagrid menunjuk(pointer) ke record
yang dicari.
thanks for attention...


 


      

Kirim email ke