2,497
社区成员
发帖
与我相关
我的任务
分享
if ado1.Recordcount=0 then
...
........
begin
qry_search.Close;
qry_search.SQL.Clear;
qry_search.SQL.Add( ' select a.kqrq,a.account_id,a.full_name,a.bc,a.sj1,a.sj2,a.sj3,a.sj4,a.sj5,a.sj6,a.sj7,a.sj8,b.CB,b.BM,b.KB,b.XB,b.ZW,b.CBZX,a.zt,b.JN from HR_BK a ' );
qry_search.SQL.Add( ' left join Res_user_Temp b on a.account_id=b.Account_id where a.account_id='''+ Trim(cxTextEdit1.Text)+''' and a.kqrq='''+ FormatDateTime('yyyy/mm/dd',cxDateEdit1.Date)+''' ' );
qry_search.Open;
if qry_search.RecordCount =0 then
begin
ShowMessage('查詢的結果為空!');
Exit;
end;
end;
........