Cara Insert Data ke Database dengan Delphi Menggunakan AdoQu

a guest Nov 8th, 2017 497 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. with AdoQuery1 do begin
  2.   Close;
  3.   SQL.Clear;
  4.   SQL.Text:='INSERT INTO spp (nis,nama,tanggal_lhr) VALUES ("'+Edit1.Text+'","'+Edit2.Text+'","'+FormatDateTime('yyyy-mm-dd',DateTimePicker1.Date)+'")';
  5.   ExecSQL;
  6.   end;
  7. with AdoQuery1 do begin
  8.   Close;
  9.   SQL.Clear;
  10.   SQL.Text:='SELECT*FROM spp';
  11.   Open;
  12. end;
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand