para suhu delphi, saya mau tanya ne, bagaimana caranya tampilkan record yg mengandung angka '2' pada field "id_induk" tabel "induk_buku" dari Query yg saya simpan di komponen Zeos ZQuery? mohon dibantu ya... ini isi querynya : [sql]SELECT buku.tgl_masuk, induk_buku.Id_induk, jenis_buku.jenis_buku, kat_buku.kategori_buku, buku.jdul_buku, buku.pengarang, buku.penerbit, buku.thn_terbit, buku.jml_hal, buku.hrg_buku, buku.asl_dana, induk_buku.rak, induk_buku.ket, induk_buku.id_buku, buku.id_jenis, induk_buku.id_copy, buku.id_kat FROM buku, induk_buku, jenis_buku, kat_buku WHERE buku.Id_buku = induk_buku.Id_buku AND buku.id_jenis = jenis_buku.id_jenis AND buku.Id_kat = kat_buku.Id_kat;[/sql]

where clausenya ditambain [sql] ...AND id_induk like '%2%'; [/sql]

Waaaahhhh problem fix... oiya salah saya dimana dari perintah ini :

select * from induk_buku where id_induk='+txt_induk.Text+';

txt_induk.text isinya 6666-C3 hasilnya : Error unknown column 'C3' in where clause...

@riagil: Waaaahhhh problem fix... oiya salah saya dimana dari perintah ini :

select  from induk_buku where id_induk='+txt_induk.Text+';

txt_induk.text isinya 6666-C3 hasilnya : Error unknown column 'C3' in where clause...

select from induk_buku where id_induk='+txt_induk.Text code ini hasilnya : select from induk_buku where id_induk= 6666-C3 seharusnya select from induk_buku where id_induk= '6666-C3' Delphi ada function untuk memudahkan penulisan code nya dengan QuotedStr select * from induk_buku where id_induk='+QuotedStr(txt_induk.Text)

@hendrang67: [quote:7e24fce153="riagil"]Waaaahhhh problem fix... oiya salah saya dimana dari perintah ini :

select  from induk_buku where id_induk='+txt_induk.Text+';

txt_induk.text isinya 6666-C3 hasilnya : Error unknown column 'C3' in where clause...[/quote:7e24fce153] select from induk_buku where id_induk='+txt_induk.Text code ini hasilnya : select from induk_buku where id_induk= 6666-C3 seharusnya select from induk_buku where id_induk= '6666-C3' Delphi ada function untuk memudahkan penulisan code nya dengan QuotedStr select from induk_buku where id_induk='+QuotedStr(txt_induk.Text)

Wah mantap bang ilmunya.... makasih tengkyu, trus ne saya dapat masalah lagi... maklum bang newbie ki... [sql]select from induk_buku where status='Guru';[/sql] kalau di delphi :

SQL.Text:='select  from induk_buku where status='Guru'';
SQL.Text:='select   from induk_buku where status=('Guru')';
SQL.Text:='select * from induk_buku where status=Guru';

3 line di atas error smua, missing operator sama unknown column 'Guru'...... Gimana bang?

@riagil: [quote:9f6986db7a="hendrang67"][quote:9f6986db7a="riagil"]Waaaahhhh problem fix... oiya salah saya dimana dari perintah ini :

select  from induk_buku where id_induk='+txt_induk.Text+';

txt_induk.text isinya 6666-C3 hasilnya : Error unknown column 'C3' in where clause...[/quote:9f6986db7a] select from induk_buku where id_induk='+txt_induk.Text code ini hasilnya : select from induk_buku where id_induk= 6666-C3 seharusnya select from induk_buku where id_induk= '6666-C3' Delphi ada function untuk memudahkan penulisan code nya dengan QuotedStr select from induk_buku where id_induk='+QuotedStr(txt_induk.Text)[/quote:9f6986db7a] Wah mantap bang ilmunya.... makasih tengkyu, trus ne saya dapat masalah lagi... maklum bang newbie ki... [sql]select from induk_buku where status='Guru';[/sql] kalau di delphi :

SQL.Text:='select  from induk_buku where status='Guru'';
SQL.Text:='select   from induk_buku where status=('Guru')';
SQL.Text:='select  from induk_buku where status=Guru';

3 line di atas error smua, missing operator sama unknown column 'Guru'...... Gimana bang?

Awal2 belajar Delphi saya juga sering kesulitan dengan yg spt ini. :) Line 1. SQL.Text:='select from induk_buku where status=''Guru'''; untuk memudahkan penulisan gunakan bantuan function QuotedStr SQL.Text:='select from induk_buku where status='+QuotedStr('Guru'); Kebiasaan saya kalau ada runtime error terkait dengan SQL spt unknown column atau data yg dihasilkantidak sesuai dengan yg diinginkan, say lht SQL.Text nya dengan bantuan ShowMessage. caranya buat code spt ini : ShowMessage(Sql.Text) letakkan dibawah SQL.Text sebelum Open atau ExecSql spt ini : SQL.Text:='select from induk_buku where status='+QuotedStr('Guru'); Showmessage(Sql.Text); jalankan program dan teliti sql.text hasil running apakah sudah sesuai yg kita inginkan.

Makasih banyak bang hendang67,.. mantap ilmunya.... thankz buanyak.... :D :D