Foxtable(狐表)用户栏目专家坐堂 → 动态增加一个逻辑列遇到问题,求解


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

主题:动态增加一个逻辑列遇到问题,求解

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


加好友 发短信
等级:三尾狐 帖子:787 积分:6175 威望:0 精华:0 注册:2015/7/25 19:14:00
动态增加一个逻辑列遇到问题,求解  发帖心情 Post By:2020/7/9 4:19:00 [只看该作者]

蓝老师:您好!

动态增加一个逻辑列,希望是重新打开项目时,该逻辑列全部勾选。

目前代码实现不了。

问题一:不能勾选。

问题二:自动重新启动时报错,报错内容:此行已从表中移除并且没有任何数据。BeginEdit() 将允许在此行中创建新数据。

以下代码,帮我看看。谢谢!!!

Dim Builder As New  ADOXBuilder
Dim nds As String = e.Form.Controls("ComboBox1").text
Builder.Open() '打开ADOXBuilder
With Builder.Tables("表A")
    .AddColumn(nds ,ADOXType.Boolean,True ) 
End  With

MessageBox.show("重新启动后才能生效!","提示")

Builder.Close()

Syscmd.Project.Open(ProjectFile)

[此贴子已经被作者于2020/7/9 4:29:34编辑过]

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/9 9:37:00 [只看该作者]

1、项目afteropenproject
datatables("表A").replacefor("xx逻辑列",true)

2、试试
……

MessageBox.show("重新启动后才能生效!","提示")

Builder.Close()

e.cancel = true

Syscmd.Project.Open(ProjectFile)


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


加好友 发短信
等级:三尾狐 帖子:787 积分:6175 威望:0 精华:0 注册:2015/7/25 19:14:00
  发帖心情 Post By:2020/7/9 21:26:00 [只看该作者]

表A 的"xx逻辑列”是动态生成的,

项目afteropenproject

datatables("表A").replacefor("xx逻辑列",true)不能运行吧,因为表a 还没有("xx逻辑列")

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/7/9 21:54:00 [只看该作者]

重启项目后正常就有了

 回到顶部