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


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

主题:增加列

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


加好友 发短信
等级:幼狐 帖子:196 积分:1357 威望:0 精华:0 注册:2015/3/25 16:42:00
增加列  发帖心情 Post By:2015/8/6 14:16:00 [显示全部帖子]

在foxtable中的所有表增加临时列可以用:

For Each t As DataTable In DataTables
If t.DataCols.Contains("锁定") = False Then
t.DataCols.Add("锁定",Gettype(Boolean)) 
End If
Next

但是要求所有表中增加实实在在的列,请问那怎么办?

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


加好友 发短信
等级:幼狐 帖子:196 积分:1357 威望:0 精华:0 注册:2015/3/25 16:42:00
  发帖心情 Post By:2015/8/6 14:51:00 [显示全部帖子]

For Each n As Table In Tables
Dim Builder As New ADOXBuilder("pigs")
Builder.Open() 
With Builder.Tables(n.Name)
    .AddColumn("锁定" ,ADOXType.Boolean)
    End With
Builder.Close()
Next


出现代码执行错误,在对应所需名称或序数的集合中,未找到项目,
在ADOX.Tables.get_Item(object item)
在foxtable.adoxbuilder.get_tables(string name)
在usercode.test()

该怎么改写代码?

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


加好友 发短信
等级:幼狐 帖子:196 积分:1357 威望:0 精华:0 注册:2015/3/25 16:42:00
  发帖心情 Post By:2015/8/6 15:04:00 [显示全部帖子]

我只修改了

Dim Builder As New  ADOXBuilder("pigs")

其余完全黏贴大红袍的代码在命令窗口执行,还是出现一样的代码执行错误


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


加好友 发短信
等级:幼狐 帖子:196 积分:1357 威望:0 精华:0 注册:2015/3/25 16:42:00
  发帖心情 Post By:2015/8/6 15:12:00 [显示全部帖子]

可以啦,十分感谢!!!!!

 回到顶部