- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 永久增加列出错 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126037)
-- 发布时间：2018/10/12 15:14:00
-- 永久增加列出错
Dim Builder As New ADOXBuilder("管理系统") \'要指定数据源名称
Builder.Open() \'打开ADOXBuilder
With Builder.Tables("库存")
.AddColumn(str ,ADOXType.String, 12) \'增加字符型
End With
Builder.Close() \'关闭ADOXBuilder
报错，如下图。
-- 发布时间：2018/10/12 15:15:00
--
此主题相关图片如下：qq截图20181012151441.png
-- 发布时间：2018/10/12 15:18:00
--
然后我发现这个列已经添加到表里去了，只是没显示出来。然后我就datatables.load一下，结果提示如下
-- 发布时间：2018/10/12 15:19:00
--
此主题相关图片如下：qq截图20181012151849.png
此主题相关图片如下：qq截图20181012151809.png
-- 发布时间：2018/10/12 15:56:00
--
参考
Dim Builder As New ADOXBuilder("管理系统") \'要指定数据源名称
Builder.Open() \'打开ADOXBuilder
With Builder.Tables("库存")
.AddColumn("test" ,ADOXType.String, 12) \'增加字符型
End With
Builder.Close() \'关闭ADOXBuilder
DataTables.unload("库存")
DataTables.load("库存")
-- 发布时间：2018/10/12 16:38:00
--
会报错，然后就不执行最后两句unload和load，但是重启程序列也的确增加了。
-- 发布时间：2018/10/12 16:42:00
--
执行这个绝对没问题（不能重复执行，不然，你重复添加了列，自然会报错）
Dim Builder As New ADOXBuilder("管理系统") \'要指定数据源名称
Builder.Open() \'打开ADOXBuilder
With Builder.Tables("库存")
.AddColumn("test111222333" ,ADOXType.String, 12) \'增加字符型
End With
Builder.Close() \'关闭ADOXBuilder
DataTables.unload("库存")
DataTables.load("库存")