On 8/12/08, YA_Putra <[EMAIL PROTECTED]> wrote:
> Rekan milis,
>
> Saya membuat procedure dengan dua parameter tipe integer untuk
> query mencari row/record di tabel. Kolom/field yang dicari tipe integer.
> Dipanggil di program utama Periksa(row,row);
> Namun hasil yang didapat adalah row/record terakhir. Namun kalau
> dummy:='select * from kawan where id=1' (langsung nilainya) bisa
> didapat row/kolom yang dikehendaki, mengapa dengan variable gagal?
>
> Procedure Periksa(rek,id : integer);
> Begin
> dummy:='select * from kawan where id=id';
dummy = 'select * from kawan where id = ' + inttostr(id);
> query:[EMAIL PROTECTED];
> state:=mysql_query(sock,query);
> if (state < 0) then
> begin
> gotoxy(1,24);writeln ('Query Salah....!');
> writeln (mysql_error(sock));
> end;
> recbuf := mysql_store_result(sock);
> rowbuf := mysql_fetch_row(recbuf);
> if rowbuf = nil then
> win.FWrite(18,10,28,25,'Data tidak ditemukan....')
> else
> while (rowbuf <> nil) do
> begin
> // FillChar(address,SizeOf(address),#0);
> With address[rek] Do Begin
> // id:= rowbuf[0];
> gelar_d:=rowbuf[1];
> nama:=rowbuf[2];
> rowbuf := mysql_fetch_row(recbuf);
> End;
> end;
> End;
>
> Bagaimana sintaks yang betul agar dapat mencari rekord dengan
> fiels/kolom tipe integer? Sudah kutak-katik seharian tidak berhasil.
>
> Demikian sebelum dan sesudahnya banyak terima kasih.
>
> Putra
>
> --
> Berhenti langganan: [EMAIL PROTECTED]
> Arsip dan info: http://linux.or.id/milis
>
>
--
Berhenti langganan: [EMAIL PROTECTED]
Arsip dan info: http://linux.or.id/milis