Foxtable(狐表) → 用户栏目 → 专家坐堂 → 新增


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

主题：新增
美女呀，离线，留言给我吧！
大米zei乖
 小大  21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：110 积分：726 威望：0 精华：0 注册：2017/1/21 11:00:00 		  发帖心情 Post By：2017/3/3 9:34:00 [只看该作者]

我这样加入messagebox对吗？

Dim Filter As String
Dim dr As DataRow = e.Node.DataRow '获取生成此节点的行
If e.Node.Text <> "显示所有行" Then
   Select Case e.Node.Level
        Case 0
            Filter = "[分组] = '" & dr("分组") & "'"
        Messagebox.show(0)
        Case 1
            Filter = "[分组] = '" & dr("分组") & "' And [业务] = '" & dr("业务") & "'"
        Messagebox.show(1)
        Case 2
            Filter = "[分组] = '" & dr("分组") & "' And [分组] = '" & dr("分组") & "' And [业务] = '" & dr("业务") & "' And [品牌] = '" & dr("品牌") & "'"
        Messagebox.show(2)
    End Select
End If
Tables("订单信息").Filter = Filter
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  22楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/3 9:39:00 [只看该作者]

测试下面的代码，看出错前弹出什么
Dim Filter As String
Dim dr As DataRow = e.Node.DataRow '获取生成此节点的行
msgbox(1)
If e.Node.Text <> "显示所有行" Then
   Select Case e.Node.Level
        Case 0
            Filter = "[分组] = '" & dr("分组") & "'"
        Case 1
            Filter = "[分组] = '" & dr("分组") & "' And [业务] = '" & dr("业务") & "'"
        Case 2
            Filter = "[分组] = '" & dr("分组") & "' And [分组] = '" & dr("分组") & "' And [业务] = '" & dr("业务") & "' And [品牌] = '" & dr("品牌") & "'"
    End Select
End If
msgbox(2)
Tables("订单信息").Filter = Filter
msgbox(3)
 回到顶部
美女呀，离线，留言给我吧！
大米zei乖
 小大  23楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：110 积分：726 威望：0 精华：0 注册：2017/1/21 11:00:00 		  发帖心情 Post By：2017/3/3 10:59:00 [只看该作者]

msgbox显示2之后出现了这个错误，但是只有点击标题和第二个节点的时候才会出现，而且第二个节点下面的子节点不会出现这个错误

跟之前没测试的时候情况差不多


此主题相关图片如下：qq截图20170303104912.jpg
按此在新窗口浏览图片
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  24楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/3 12:10:00 [只看该作者]

看看你的CurrentChanged事件和AfterFilter事件。

 回到顶部
美女呀，离线，留言给我吧！
大米zei乖
 小大  25楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：110 积分：726 威望：0 精华：0 注册：2017/1/21 11:00:00 		  发帖心情 Post By：2017/3/3 13:10:00 [只看该作者]

这两个事件是空白的，没有编写代码

 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  26楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2017/3/3 15:26:00 [只看该作者]

你可以复制项目，重定向到内部表，做个例子发上来测试。

 回到顶部
美女呀，离线，留言给我吧！
大米zei乖
 小大  27楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：110 积分：726 威望：0 精华：0 注册：2017/1/21 11:00:00 		  发帖心情 Post By：2017/3/3 15:58:00 [只看该作者]

怎么定向到内部表啊。。。不会搞......
 回到顶部
帅哥哟，离线，有人找我吗？
狐狸爸爸
 小大  28楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：管理员 帖子：47448 积分：251054 威望：0 精华：91 注册：2008/6/17 17:14:00 		  发帖心情 Post By：2017/3/3 15:59:00 [只看该作者]

你就单独用内部表做个例子吧

 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  29楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/3/3 16:35:00 [只看该作者]

以下是引用大米zei乖在2017/3/1 13:51:00的发言：
哦，我的不是云数据库，我是把我们公司某台电脑当成服务器的

 

把你的数据库发上来吧。 分离->拷贝 xxx.mdf xxx_log.ldf 文件，然后上传上来。这样别人才能测试。

 

http://jingyan.baidu.com/article/3aed632e66ed877011809157.html

 
 回到顶部
美女呀，离线，留言给我吧！
大米zei乖
 小大  30楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：110 积分：726 威望：0 精华：0 注册：2017/1/21 11:00:00 		  发帖心情 Post By：2017/3/3 16:59:00 [只看该作者]

我刚又重新测试了下，又没有出现错误了，想不通啊想不通

 

看看附件这个啊行，测试试试看

 

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar
 回到顶部
总数 34 上一页 1 2 3 4 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05859 秒, 5 次数据查询