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

Kirim email ke