kalo saya buat gini kok invalid row number ya >> > For i = 1 To rsNPBBD.RecordCount >>> TDBGrid1.row = i >> > TDBGrid1.Columns(0).Text = cb(0).Columns(0).Text 'NO_BTB >> > TDBGrid1.Columns(1).Text = cb(3).Columns(0).Text 'NO_PO >> > TDBGrid1.Columns (2).Text = rsNPBBD!No_PPB >> > TDBGrid1.Columns(3).Text = rsNPBBD!JENIS >> > TDBGrid1.Columns(4).Text = rsNPBBD!KD_BRG >> > TDBGrid1.Columns(5).Text = rsNPBBD!NAMA >> > TDBGrid1.Columns(6).Text = rsNPBBD!SATUAN >> > rsNPBBD.MoveNext >> > next i
klo saya tambahi kata set tdbgrid1.row = i errornya mjd object required ----- Original Message ----- From: "Purwedi Kurniawan" <[EMAIL PROTECTED]> To: <[email protected]> Sent: Wednesday, December 14, 2005 3:42 PM Subject: Re: [Programmer-VB] tanya nunjuk baris pada tdbgrid > kalau gitu set aja property row nya grid itu = i (letakkan setelah for i > .....) > > On 12/14/05, Eko <[EMAIL PROTECTED]> wrote: >> >> makasih infonya, tapi justru system bind langsung ke datasource itu yang >> sedang saya hindari >> sebab ini berawal kirim data dari tabel lain dan itu data perlu diedit >> dan saya tidak ingin datsource nya berganti-ganti >> >> ----- Original Message ----- >> From: Purwedi Kurniawan >> To: [email protected] >> Sent: Wednesday, December 14, 2005 2:12 PM >> Subject: Re: [Programmer-VB] tanya nunjuk baris pada tdbgrid >> >> biasanya kalau kita bekerja dg grid, akan lebih mudah pake system bind >> langsung ke datasourcenya seperti ini >> >> set tdbgrid1.datasource = rsNPBBD >> >> kalau dg cara bind, tiap kali kali perubahan dilakukan di recordset >> (manipulasi data maupun navigasi), grid akan otomatis berubah (kalau ga, >> biasanya bisa diatasi dg memanggil fungsi refresh) >> >> best regards >> [wwn] >> >> On 12/14/05, Eko <[EMAIL PROTECTED]> wrote: >> > >> > mohon penjelasannya : >> > kalo saya buat script kayak gini, maka hanya record terakhir yang masuk >> > karena rsnpbbd saja yang move next sedangkan tdbgridnya diem aja >> > lha...gimana caranya spy tdbgirdnya bisa nunjuk ke baris berikutnya >> > >> > For i = 1 To rsNPBBD.RecordCount >> > TDBGrid1.Columns(0).Text = cb(0).Columns(0).Text 'NO_BTB >> > TDBGrid1.Columns(1).Text = cb(3).Columns(0).Text 'NO_PO >> > TDBGrid1.Columns (2).Text = rsNPBBD!No_PPB >> > TDBGrid1.Columns(3).Text = rsNPBBD!JENIS >> > TDBGrid1.Columns(4).Text = rsNPBBD!KD_BRG >> > TDBGrid1.Columns(5).Text = rsNPBBD!NAMA >> > TDBGrid1.Columns(6).Text = rsNPBBD!SATUAN >> > rsNPBBD.MoveNext >> > next i >> > >> > > > > Untuk keluar dari millis ini, kirim email kosong ke: > [EMAIL PROTECTED] > > > Yahoo! Groups Links > > > > > ------------------------ Yahoo! Groups Sponsor --------------------~--> Most low income homes are not online. Make a difference this holiday season! http://us.click.yahoo.com/5UeCyC/BWHMAA/TtwFAA/k7folB/TM --------------------------------------------------------------------~-> Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/Programmer-VB/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
