T
topdelphi
Unregistered / Unconfirmed
GUEST, unregistred user!
我的数据表里如下数据,我的窗体有三个文本框,第一个文本为起始工号,第二个为结束
工号,第三个为输入月分, 数据库字段如下,
我在这两个文本晨输入例如在起始里输入001,在结束里输入15,然后输出到报表,
并且在第三个文本里输入月份记录,然后在数据里面检测有没有这些记录,
如何没有,就不显示报表,我的语句如下,虽然可以查询但是到不达遇期的检测这个月
有没记录效果,请教如何修改啊.
数据库是ACCESS
工号 姓名 部门 职务 月份 底薪
001 abc it software 9月 ¥0.00
002 X X XXXX XXX XXX
WITH ADOQUERY1 DO BEGIN
IF RECORECS =1 THEN
BEGIN
CLOSE;
SQL.CLEAR;
SQL.ADD('SELECT * FROM TABLE WHERE 工号>='+EDIT1.TEXT+'AND 工号 <='+EDIT2.TEXT
+'AND 月份='+EDIT3.TEXT;
OPEN
END
ELSE BEGIN
SHOWMESSAGE('这个月没有这些数据')
EXIT;
END;
END;
工号,第三个为输入月分, 数据库字段如下,
我在这两个文本晨输入例如在起始里输入001,在结束里输入15,然后输出到报表,
并且在第三个文本里输入月份记录,然后在数据里面检测有没有这些记录,
如何没有,就不显示报表,我的语句如下,虽然可以查询但是到不达遇期的检测这个月
有没记录效果,请教如何修改啊.
数据库是ACCESS
工号 姓名 部门 职务 月份 底薪
001 abc it software 9月 ¥0.00
002 X X XXXX XXX XXX
WITH ADOQUERY1 DO BEGIN
IF RECORECS =1 THEN
BEGIN
CLOSE;
SQL.CLEAR;
SQL.ADD('SELECT * FROM TABLE WHERE 工号>='+EDIT1.TEXT+'AND 工号 <='+EDIT2.TEXT
+'AND 月份='+EDIT3.TEXT;
OPEN
END
ELSE BEGIN
SHOWMESSAGE('这个月没有这些数据')
EXIT;
END;
END;