ADOQuery1.SQL.Clear;
if RadioGroup1.ItemIndex=0 then
ADOQuery1.SQL.Text:='select * from namaTable where namaField LIKE"'+Edit1.Text +'%"'else
ADOQuery1.SQL.Text:='select * from namaTable where namaField2 LIKE"'+Edit1.Text +'%"';
ADOQuery1.Open;
//kalo binggung tanya sama yang tahu. jangan malu-malu
syaratnya: harus ada 2 buah edit dan 1 buat RadioGroup
if RadioGroup1.ItemIndex=0 then
ADOQuery1.SQL.Text:='select * from namaTable where namaField LIKE"'+Edit1.Text +'%"'else
ADOQuery1.SQL.Text:='select * from namaTable where namaField2 LIKE"'+Edit1.Text +'%"';
ADOQuery1.Open;
//kalo binggung tanya sama yang tahu. jangan malu-malu
syaratnya: harus ada 2 buah edit dan 1 buat RadioGroup
0 comments:
Post a Comment