Office中国论坛/Access中国论坛

标题: 一个老问题，关于aliimx.all 丢失问题~!!! [打印本页]

作者: cdw991501 时间: 2011-5-24 10:27
标题: 一个老问题，关于aliimx.all 丢失问题~!!!

我在自己电脑上应用系统没有任何问题，拷贝到另一台电脑上出现aliimx.all  引用丢失问题。在VB编辑器里重新引用后，系统可以运行。但每当点选一个窗体的窗体筛选时提示找不到项目，回头察看该筛选引用的查询发现sql内容被清空，于是百思不得其解，请老师指点，感激不尽~!!!该窗体筛选按钮的vb编码如下（感觉这里事情不大，是按照刘小军老师的教程做的）：
Private Sub 查询_Click()
On Error GoTo Err_查询_Click
Dim strWhere As String  '定义条件字符串
strWhere = "" '设定初始值－空字符串
If Not IsNull(Me.输入) Then
            strWhere = strWhere & "([ID] like '*" & Me.输入 & "*') or "
End If

If Not IsNull(Me.输入) Then
            strWhere = strWhere & "([姓名] like '*" & Me.输入 & "*') and "
End If

If Len(strWhere) > 0 Then

      strWhere = Left(strWhere, Len(strWhere) - 5)
End If

Debug.Print strWhere

Me.显示.Form.Filter = strWhere
Me.显示.Form.FilterOn = True

Exit_查询_Click:
Exit Sub
Err_查询_Click:
MsgBox Err.Description
Resume Exit_查询_Click
End Sub

作者: cdw991501 时间: 2011-5-24 10:30
丢失的aliimx.all 文件，看路径是阿里旺旺文件夹里的一个东西，真不明白，access程序引用的东西跟阿里旺旺有什么关系？？？郁闷~！！！

作者: roych 时间: 2011-5-24 10:52
按下Alt+F11进入VBE界面，把这个dll库删除后保存即可运行。

作者: cdw991501 时间: 2011-5-24 16:30
ding~~！！

作者: cdw991501 时间: 2011-5-24 17:11
我进一步发现原因出在只要我一打开带有此筛选按钮的窗体，该窗体内所引用的查询sql内容即被清空，郁闷

作者: cdw991501 时间: 2011-5-24 17:17
删除aliimx.all 库后是可以运行，但问题是，为什么一运行那个窗体就删我查询表里的所有内容。

作者: roych 时间: 2011-5-27 10:38
系传附件看看吧，只是代码看不出什么问题。

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