Arsip: INSERT n UPDATE pada ADO ???

 
user image
more 16 years ago

coacoac

Maaf mau tanya, 1. pada code dibawah ini apa ya...yang salah? kok dak bisa buat nyimpen? padahal tdk ada errornya.

  begin
    //Operasi penambahan data
    PernyataanSQL:=
      'INSERT INTO Buku (kd_buku, judul, '+
      'kd_penerbit, tahun, ISBN, '+
      'fiksi) VALUES (' +
      petik + EditKodeBuku.Text + petik + ',' +
      petik + EditJudul.Text + petik + ',' +
      petik + KodePenerbit + petik + ',' +
      EditTahun.Text + ','+
      petik + EditISBN.Text + petik + ','+
      JenisBuku + ')';
   ADOConnection1.Execute(PernyataanSQL);
   end
2. code dibawah ini mengeluarkan error "Syntax error in UPDATE statement", terletak dimana ya...errornya?

  begin
    //operasi pengubahan data
    PernyataanSQL:=
    'UPDATE buku SET' +
    'Kd_buku = ' + petik + EditKodeBuku.Text + petik + ',' +
    'judul = ' + petik + EditJudul.Text + petik + ',' +
    'kd_penerbit = ' + petik + KodePenerbit + petik + ',' +
    'tahun = ' + petik + EditTahun.Text + petik + ',' +
    'ISBN = ' + petik + EditISBN.Text + petik + ',' +
    'fiksi = ' + JenisBuku +
    'WHERE kd_buku = ' + EditKodeBuku.Text;
    ADOConnection1.Execute(PernyataanSQL);   
  end;
maaf kedua kode diatas, saya copy pastel dari buku. tapi kenapa kok error? mohon bantuannya...soalnya saya masih baru belajar.. :(
user image
more 16 years ago

cyber_hecker

whew.. baru kali ini saya tau kalo ADOConnection bisa buat njalanin perintah query wekekeke... :P coba execute perintah query itu dengan ADOQuery, bisa nggak ? jadi nantinya :
begin
    //Operasi penambahan data
    PernyataanSQL:=
      'INSERT INTO Buku (kd_buku, judul, '+
      'kd_penerbit, tahun, ISBN, '+
      'fiksi) VALUES (' +
      petik + EditKodeBuku.Text + petik + ',' +
      petik + EditJudul.Text + petik + ',' +
      petik + KodePenerbit + petik + ',' +
      EditTahun.Text + ','+
      petik + EditISBN.Text + petik + ','+
      JenisBuku + ')';
   ADOQuery1.SQL.Text := PernyataanSQL;
  ADOQuery1.ExecSQL;
   end
user image
more 16 years ago

nurez

mau ktawa.... engga jd dehh... dimaklumin koq... hehehhe mau tanya jgg.. emg bisa apahh... klo filednya pakai ...'+filedname..' ??? lom pnah nyoba sieehh.. tp setau sy sihh.. langsung ajha insert... (kd_buku, judul, kd_penerbit, tahun, ISBN, fiksi) VALUES... nb: jgn lupa abis ado1.execsql , tabahin ado1.open; biar dbgridnya kbuka/ auto refresh.. mff klo salah yachh..
user image
more 16 years ago

bad2001

klo ga salah itu dari bukunya Abdul Kadir.... :wink: ane jg belajar dari buku itu :mrgreen: coba ente ganti adoconnection1.execute(pernyataansql); dengan adoconnection1.executedirect(pernyataansql, nil, nil); itu seingat ane, siapa tau bisa. tp saran ane ente pakai AdoQuery aja jadi ga perlu pakai AdoConnection untuk mengeksekusi sintak tsb, sama seperti saran nya @cyber_hecker dan @nurez
user image
more 16 years ago

coacoac

terima kasih atas jawabannya...saya masih bingung cara memasukkan atau merubah data melalu TEdit..mohon dibantu...
user image
more 16 years ago

ricky06

maksudnya mau gimana?masukan dari edit1.text ke database ato gmn?jika kasusnya seperti itu...kamu bisa gunakan perintah seperti ini with tabelnya do begin append; FieldByName('nama_fieldnya').AsString:=Edit1.Text; post; end
user image
more 16 years ago

ricky06

klo misanya datanya udah,lalu mau edit lewat edit1.text yaaa yang append; diganti menjadi----->edit; nah kebawahnya sama gtu dech....
more ...
  • Pages:
  • 1
Share to

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com