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

Kirim email ke