多条件的联合查询

最新推荐文章于 2023-03-17 19:55:11 发布

jgdsf0413

最新推荐文章于 2023-03-17 19:55:11 发布

阅读量480

点赞数

CC 4.0 BY-SA版权

文章标签： c

本文链接：https://blog.youkuaiyun.com/jgdsf0413/article/details/5974291

if (like(a,"")) and (like(b,"")) and (like(c,"")) and (like(d,""))

messagebox("查询条件不完整！" ,0,"请输入查询条件")
else
if not(like(a,""))
conditon=condition + "clck.材料编码=alltrim(thisform.text1.value) and clck.材料名称=alltrim(thisform.text2.value)"
endif
if not(like(c,""))
conditon=condition + "clck.领用单位=alltrim(thisform.text3.value) "
endif
if not(like(d,"")) and not(like(e,""))
conditon=condition + "clck.时间>=ctod(alltrim(thisform.text4.value)) and clck.时间<=ctod(alltrim(thisform.text5.value))"
else
if not(like(d,""))
conditon=condition + "clck.时间>=ctod(alltrim(thisform.text4.value)) "
endif
endif
l1="select 材料编码,材料名称,型号,规格,单位,数量,单价,金额,领用人,领用单位,时间,用途,备注 from clck where"
l2="into cursor lsb"
l=l1+" "+conditon+l2
thisform.grid1.recordsource=l
endif