Office中国论坛/Access中国论坛

标题: [求助]查询问题遇到麻烦，请高手给指点下，不胜感激！！！ [打印本页]

作者: juming 时间: 2006-4-8 15:43
标题: [求助]查询问题遇到麻烦，请高手给指点下，不胜感激！！！
查询窗体有STARTDATA-ENDDATA，其它条件是组合框可选，想作到在窗体中输入任意条件，（包括只输入STARTDANA或只输入ENDDATA或只从组合框中任选一条件，也包括将窗体中的条件任意组合）最后将查询到的符合条件记录数，写入SEARCHEND表中，同时判断有无重复条件，需要怎么修改？迷茫中，请版主帮忙改下，谢谢。[attach]16976[/attach]

作者: linjingdr 时间: 2006-4-8 16:45
同时判断有无重复条件(这句话是什么意思）

作者: 一点通 时间: 2006-4-8 16:50
可参考刘小军的例子

http://www.office-cn.net/forum.php?mod=viewthread&tid=9226

作者: linjingdr 时间: 2006-4-8 17:06
日期区间的代码可以这样写：
Dim datMIXDATE As Date'设定开始日期变量
Dim datMAXDATE As Date’设定结束日期变量
dim strLINJING As Long
datMIXDATE = Me.Text25'设定开始日期等于某文本框的值
datMAXDATE = Me.Text27'设定结束日期等于某文本框的值
strLINJING = " AND ((*.日期) Between " & "#" & datMIXDATE & "#" & " And " & "#" & datMAXDATE & "#" & ")" '此处设定查询条件
其它条件自己设吧，数据库查询的代码有现成的，偶也不多说了，但这可以做成一个现成的查询，至于追加表查询偶还没有用到过，你再问问吧。
偶不是版主，在此孟浪现丑了，请版主指点吧

[此贴子已经被作者于2006-4-8 9:06:40编辑过]

作者: linjingdr 时间: 2006-4-8 17:09
根据版主指点，看了一下，果然非同凡响，谢谢！

作者: juming 时间: 2006-4-8 18:01
ALEX的通用查询我参考作了，可以做到任意条件的查询，但是我现在需要的是作一个追加查询，把符合任意条件的查询结果，保存TBLSEARCHEND表中，这需要怎么作？请版主给修改下

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)