merhaba arkadaşlar adoquery ile toplu update işmeni nasıl gerçekleştirebilirim kodlarım aşağıdadır yardımlarınızı bekliyorum teşekkürler.
ADOQuery1.sql.Clear;
ADOQuery1.sql.add('update bt_talep_formu');
ADOQuery1.sql.add('(talep_eden_kullanici,talep_tarihi,talep_edilen_urun,miktar,departman,oncelik,aciklama)');
ADOQuery1.sql.add('values:)edit1,:edit2,:te_urun,:miktar,:departman,:eek:ncelik,:aciklama)');
ADOQuery1.Parameters.ParamByName('edit1').Value:=Edit1.Text;
ADOQuery1.Parameters.ParamByName('edit2').Value:=Edit2.Text;
ADOQuery1.Parameters.ParamByName('te_urun').Value:=te_urun.Text;
ADOQuery1.Parameters.ParamByName('miktar').Value:=miktar.Text;
ADOQuery1.Parameters.ParamByName('departman').Value:=departman.Text;
ADOQuery1.Parameters.ParamByName('oncelik').Value:=oncelik.Text;
ADOQuery1.Parameters.ParamByName('aciklama').Value:=aciklama.Text;
ADOQuery1.ExecSQL;
ADOQuery ile toplu update işlemi
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: ADOQuery ile toplu update işlemi
Merhaba,
Gönderdiğiniz UPDATE SQL hatalı gözüküyor. SELECT SQL ile karşımış gibi. Aşağıdaki şekilde deneyebilirsiniz.
Ancak yukarıdaki kod bt_talep_formu tablosunun tüm kayıtlarını değiştirir. Muhtemelen bunu istemezsiniz. Sınırlandırmak için aşağıdaki gibi kullanabilirsiniz. Where ifadesinden sonraki "..." silinip kendi istediğiniz sınırlandırma koşullarını eklemeniz gerekli. Tablo yapısını bilmediğim için örnek alanları ekleyemedim.
Gönderdiğiniz UPDATE SQL hatalı gözüküyor. SELECT SQL ile karşımış gibi. Aşağıdaki şekilde deneyebilirsiniz.
Kod: Tümünü seç
ADOQuery1.Sql.Clear();
ADOQuery1.Sql.Add('update bt_talep_formu');
ADOQuery1.Sql.Add('set :edit1, :edit2, :te_urun, :miktar, :departman, :oncelik, :aciklama');
ADOQuery1.Parameters.ParamByName('edit1').Value:=Edit1.Text;
ADOQuery1.Parameters.ParamByName('edit2').Value:=Edit2.Text;
ADOQuery1.Parameters.ParamByName('te_urun').Value:=te_urun.Text;
ADOQuery1.Parameters.ParamByName('miktar').Value:=miktar.Text;
ADOQuery1.Parameters.ParamByName('departman').Value:=departman.Text;
ADOQuery1.Parameters.ParamByName('oncelik').Value:=oncelik.Text;
ADOQuery1.Parameters.ParamByName('aciklama').Value:=aciklama.Text;
ADOQuery1.ExecSQL();
Kod: Tümünü seç
ADOQuery1.Sql.Clear();
ADOQuery1.Sql.Add('update bt_talep_formu');
ADOQuery1.Sql.Add('set :edit1, :edit2, :te_urun, :miktar, :departman, :oncelik, :aciklama');
ADOQuery1.Sql.Add('where ...');
ADOQuery1.Parameters.ParamByName('edit1').Value:=Edit1.Text;
ADOQuery1.Parameters.ParamByName('edit2').Value:=Edit2.Text;
ADOQuery1.Parameters.ParamByName('te_urun').Value:=te_urun.Text;
ADOQuery1.Parameters.ParamByName('miktar').Value:=miktar.Text;
ADOQuery1.Parameters.ParamByName('departman').Value:=departman.Text;
ADOQuery1.Parameters.ParamByName('oncelik').Value:=oncelik.Text;
ADOQuery1.Parameters.ParamByName('aciklama').Value:=aciklama.Text;
ADOQuery1.ExecSQL();