Tadi saya coba mencoba kode seperti dibawah ini, hasilnya sukses.
cnn.Execute "delete from tb1 where Bagian <> '" & Text1 & "'" From: Programmer-VB@yahoogroups.com [mailto:programmer...@yahoogroups.com] On Behalf Of Gege Nugroho Sent: 27 Februari 2009 17:56 To: programmer-vb@yahoogroups.com Subject: [Programmer-VB] [VB] Delete Multiple rekords dengan DAO Guys... Gwe kembali dengan masalah :-) Gwe punya Database Akses konek dengan DAO (recordsettype=dynaset) yang gwe mao dengan koding dibawah ini adalah jika Bagian <> text1.text, maka dihapus, yang ada malah ngga terhapus. Ini koding gwe Data1.Refresh Data1.Database.Execute "Delete * From namatable Where Bagian <> '" & text1.Text & "'" Data1.Refresh Ada ide guys??? Trims yo sebelumnya... Regards Gege Nugroho No virus found in this incoming message. Checked by AVG - www.avg.com Version: 8.0.237 / Virus Database: 270.11.3/1974 - Release Date: 02/26/09 14:51:00