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';
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
