左栏'); } else{ document.write('关闭左栏'); } }catch(e){alert(e);}
Foxtable(狐表)用户栏目专家坐堂 → 动态表的筛选求助


  共有19336人关注过本帖树形打印复制链接

主题:动态表的筛选求助

帅哥哟,离线,有人找我吗?
blackzhu
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/3/6 15:04:00 [显示全部帖子]

以下是引用woodiy在2009-3-6 13:58:00的发言:
我是通过以下代码实现动态表的:

Dim Filter2 As String = "[合同编号] = '" & Tables("出库主表").Current("合同编号") & "'"

现在我想在动态表中应该如下代码进行筛选,如果增加进以上的代码,可以使筛选不至于在全表中筛选,而是有以上条件了。谢谢!

Dim Filter As String
With e.Form.Controls("TextBox2")
    If .Value IsNot Nothing Then
        Filter = "[色名色号] LIKE '*" & .Value & "*'"
    End If
End With
With e.Form.Controls("TextBox1")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " or "
        End If
        Filter = Filter & "[款号] LIKE '*" & .Value & "*'"
    End If
End With
If Filter > "" Then
    Tables("生产管理").Filter = Filter
End If


 老兄做服装的,我也是,做什么服装?外套?衬衫?还是毛衫?


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2009/3/7 14:47:00 [显示全部帖子]

以下是引用woodiy在2009-3-6 17:20:00的发言:
哈哈,我是做面料的!化纤面料,楼上的兄弟你是做什么服装的啊。

衬衫


 回到顶部