以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求助关于RowActivate出现的错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=51952) |
-- 作者:188802386 -- 发布时间:2014/6/6 10:19:00 -- 求助关于RowActivate出现的错误 事件代码如下: Select Case user.name Case "成交管理" If DataTables.Contains("成交录入") = False Then DataTables.Load("成交录入|佣金明细") End If DataTables("成交录入").ReplaceFor("编辑者",Nothing,"编辑者 = \'" & User.Name & "\'") DataTables("成交录入").Save() Tables("成交录入").Cols.Remove("编辑者") \'移除编辑者列,避免用户直接修改此列 \'实现使不同分组加载不同行 If User.Group = "行政部" Then DataTables("佣金明细").LoadFilter = "" ElseIf User.Group = "一片区" Then DataTables("佣金明细").LoadFilter = "所属区域 = \'" & User.Group & "\'" ElseIf User.Group = "二片区" Then DataTables("佣金明细").LoadFilter = "所属区域 = \'" & User.Group & "\'" ElseIf User.Group = "三片区" Then DataTables("佣金明细").LoadFilter = "所属区域 = \'" & User.Group & "\'" ElseIf User.Name = "开发者" Then DataTables("佣金明细").LoadFilter = "" Else DataTables("佣金明细").LoadFilter = "店面经理 = \'" & User.Name & "\'" End If DataTables("佣金明细").Load() \' Forms("成交管理").Open() \' MainTable = Tables("LILY") \' If DataTables.Contains("授权") = False Then \'如果表C没有加载 \' DataTables.Load("授权") \'加载表C \' End If If DataTables.Contains("区域管理") = False Then \'如果表C没有加载 DataTables.Load("区域管理") \'加载表C End If If DataTables.Contains("部门管理") = False Then \'如果表C没有加载 DataTables.Load("部门管理") \'加载表C End If If DataTables.Contains("成交类型") = False Then \'如果表C没有加载 DataTables.Load("成交类型") \'加载表C End If If DataTables.Contains("信息来源") = False Then \'如果表C没有加载 DataTables.Load("信息来源") \'加载表C End If If DataTables.Contains("客户来源") = False Then \'如果表C没有加载 DataTables.Load("客户来源") \'加载表C End If End Select If Functions.Execute("shouquan","业务平台",e.Sender.Current.ImageKey) Then If Forms.Contains(e.Sender.Current.ImageKey) Then Forms(e.Sender.Current.ImageKey).show MainTable = Tables(Forms(e.Sender.Current.ImageKey).TableName) End If Else MessageBox.Show("该控件正在建设中") End If 为什么关联的佣金明细表没有加载数据呢
|
-- 作者:Bin -- 发布时间:2014/6/6 10:20:00 -- 执行 DataTables("佣金明细").Load() 之前 执行一下 messagebox.show(DataTables("佣金明细").LoadFilter) 看看弹出内容是什么
|
-- 作者:Bin -- 发布时间:2014/6/6 10:21:00 -- 看看是否有正常触发事件,如果有触发事件,有弹出内容,再检查 条件是否正确, 是否这个条件没有对应的内容 |
-- 作者:188802386 -- 发布时间:2014/6/6 10:33:00 -- 没有任何触发事件呢 但是这段代码在导航栏里面有效 现在放在listview里面的RowActivate里面就不行了 |
-- 作者:Bin -- 发布时间:2014/6/6 10:36:00 -- 这个是双击的时候才会触发的哦 http://www.foxtable.com/help/topics/2872.htm |