错误#2467 SysFrmGeneralQuickQuery: Function ApplyFilter()-KevinFan
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access开发平台


错误#2467 SysFrmGeneralQuickQuery: Function ApplyFilter()

发表时间:2016/11/17 9:06:41 评论(0) 浏览(1726)  评论 | 加入收藏 | 复制
   
摘 要:分组查询,多个列表窗体查询字段不同时,平台查询功能会出现:错误#2467 SysFrmGeneralQuickQuery: Function ApplyFilter(),导致查询功能异常。
正 文:

      在做一些分类统计的时候(通过组合框更新后事件改变列表窗体SourceObject),如果不同列表窗体的查询字段不同,而主窗体又使用了平台的查询功能,在输入查询条件的时候会出现:错误#2467 SysFrmGeneralQuickQuery: Function ApplyFilter(),无法使用查询功能:


研究了一下,这个问题是因为加载窗体控件时找不到控件引起的(由于不同窗体控件名称不一样),解决思路是选择分类后,清空已加载的查询字段,重新加载。

在窗体加载事件中增加以下红色字体的代码:

Private Sub Form_Load()
    On Error GoTo ErrorHandler
    LoadIcon Me.btnExport_Image, "export.ico"
    LoadIcon Me.btnClose_Image, "db cancel.ico"


    Set mclsQuery = New GeneralQuery
    With mclsQuery
        .QueryForm = Me.sfrQuickQuery.Form
        Select Case 查询类型
            Case "业务订单月汇总"
            Me.sfrList.SourceObject = Me.Name & "_List" & "_销售金额"
            .DataForm = Me.sfrList.Form
            .ClearFields    ’这句是关键,清空查询字段
            .AddAllFields   ‘这里添加全部查询字段,可以使用
AddField添加部分字段
            .FieldName = "年月"   '设置默认的查询字段
       
        Case "采购订单月汇总"
            Me.sfrList.SourceObject = Me.Name & "_List" & "_采购金额"
            .DataForm = Me.sfrList.Form
            .ClearFields    ’这句是关键,清空查询字段
            .AddAllFields   ‘这里添加全部查询字段,可以使用
AddField添加部分字段
            .FieldName = "年月"   '设置默认的查询字段

        End Select
    End With
    Me.Recalc

ExitHere:
    Exit Sub

ErrorHandler:
    RDPErrorHandler Me.Name & ": Sub Form_Load()"
    Resume ExitHere
End Sub

然后在查询类型的组合框增加一个更新后事件,重新加载窗体:

Private Sub 查询类型_AfterUpdate()
    Call Form_Load
End Sub


这样处理后查询功能就正常了。



Access软件网交流QQ群(群号:198465573)
 
 相关文章
快速开发平台--运行时错误'2467':您输入的表达式引用了一个关...  【杜超-2号  2014/3/29】
快速开发平台--更改通用查询默认操作符\默认包含条件改成等于条件的...  【风行  2015/2/2】
Access开发平台--运行时错误'2467':您输入的表达式引用...  【杜超  2015/8/17】
Access开发平台--运行时错误'2467':您输入的表达式引用...  【杨雪  2015/12/29】
快速开发平台--更改通用查询默认操作符\默认包含条件改成等于条件的...  【杜超  2016/1/11】
 
 访客评论
总记录:0篇  页次:0/0 9 1 :
 
 发表评论
评论内容 (必填)

常见问答
技术分类
相关资源
文章搜索
关于作者

KevinFan

文章分类

文章存档

友情链接