Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论]加载表时提示列不存在


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

主题：[讨论]加载表时提示列不存在
帅哥哟，离线，有人找我吗？
流水
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：265 积分：2936 威望：0 精华：0 注册：2019/7/19 15:14:00 		[讨论]加载表时提示列不存在  发帖心情 Post By：2021/6/25 11:18:00 [只看该作者]

加载表时提示列不存在，求帮助

图片点击可在新窗口打开查看此主题相关图片如下：捕获.png
图片点击可在新窗口打开查看


表事件AfterSelChange代码如下：

Dim a() As String = {"备注","附件","产品范围"}
For i As Integer = 0 To a.Length - 1
    If e.Table.Cols.Contains(e.Table.Cols(a(i))) = True Then
        Dim b As Col = e.Table.Cols(a(i))
        If e.NewRange.ColSel = b.Index
            b.OpenWindow
        Else
            b.CloseWindow
        End If
    End If
Next
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107783 积分：548260 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/6/25 11:28:00 [只看该作者]

试试加一句判断

if e.Table.Focused then
Dim a() As String = {"备注","附件","产品范围"}
For i As Integer = 0 To a.Length - 1
……

如果还不行，就是这个表没有这个名称的列
 回到顶部
帅哥哟，离线，有人找我吗？
流水
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：265 积分：2936 威望：0 精华：0 注册：2019/7/19 15:14:00 		  发帖心情 Post By：2021/6/25 11:56:00 [只看该作者]

列是真实存在的，这个表事件里没有这些代码的话是不报错的，有这个打开 列窗口 的代码，就会报错；
我试下这个判断；
 回到顶部
帅哥哟，离线，有人找我吗？
流水
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：265 积分：2936 威望：0 精华：0 注册：2019/7/19 15:14:00 		  发帖心情 Post By：2021/6/25 11:58:00 [只看该作者]

解决了，谢谢

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04004 秒, 4 次数据查询