Sintak Simpan SQL Delphi - Ilmu Alakadarnya

Sintak Simpan SQL Delphi

Malam agan-agan kali ini saya akan posting tentang sintak simpan SQL yang di ekseekusi dari delphi
berikut sintaknya

contoh saja database toko dan tabelnya bernama tdjual dan di tabel terdiri dari kolom kode_konsumen, nama_konsumen, alamat maka sintaknya sbb:

MyCommand1.SQL.Clear;
MyCommand1.SQL.Add('insert into tbjual (kode_konsumen,nama_konsumen,alamat) values('+QuotedStr(Edit1.Text)+','+QuotedStr(Edit2.Text )+','+QuotedStr(Edit2.Text )+')');
MyCommand1.Execute;

silahkan dicoba dan semoga berhasil bagi yang kurang bisa memahami bisa tinggalkan pertanyaan di kolom komentar terimakasih telah mampir di blog Ilmu Alakadarnya

Share this article :

+ comments + 3 comments

Unknown

October 23, 2012

sintak khs gmna sintak nya
simpan
edit
hapus

Ilmu Alakadarnya

October 23, 2012

sebelumnya terimakasih udah mamapir di blog ilmu alakadarnya
ya itu kan simpan gan untuk yang lain

untuk edit
edit1.text:=myquery1['kode_barang'];
edit2.text:=myquery1['nama_konsumen'];
edit3.text:=myquery1['alamat'];

untuk hapus
MyCommand1.SQL.Clear;
MyCommand1.SQL.Add('Delete from tbjual where kode_barang='+QuotedStr(MyQuery1['kode_barang']));
MyCommand1.Execute;
MyQuery1.Close;
MyQuery1.Open;

dan untuk update
MyQuery2.SQL.Clear;
MyQuery2.SQL.Add('update tbjual set kode_barang='+
QuotedStr(Edit1.Text)+',nama_konsumen='+
QuotedStr(Edit2.Text)+',alamat='+
QuotedStr(edit3.Text)+' where kode_barang='+QuotedStr(MyQuery1['kode_barang']));
MyQuery2.Execute;
MyQuery1.Close;
MyQuery1.Open;