- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 8月18日更新上传 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=7906)
-- 发布时间：2010/8/18 17:59:00
-- 8月18日更新上传
1、修正了两个bug
2、完善了ADOXBuilder，增加了内容：
为外部表增加系统列
使用前述代码添加的表，默认会添加主键列“_Identify”。
如果是内部数据源，默认还会添加“_Locked”和"_SortKey"两列，前者用户保存行的锁定状态，后者用于开启插入行功能。
如果是外部数据表，默认不会添加“_Locked”和"_SortKey"两列，你可以使用AddTable方法的另一个语法，来决定是否为外部表增加这两列：
AddTable(Table, AddLockColumn, AddSortColumn)
Table: 要增加的表
AddLockColumn： 逻辑型，是否增加_Locked列
AddSortColumn： 逻辑型，是否增加_SortKey列
例如在名为nwnd的外部数据源中创建一个订单表，且为订单表添加“_Locked”和"_SortKey"两列:
Dim Builder As New
ADOXBuilder("nwnd") \'要指定数据源名称
Dim tbl As ADOXTable
Builder.Open()
tbl = Builder.NewTable("订单") \'创建表
With tbl
.AddColumn("日期" ,ADOXType.DateTime)
.AddColumn("产品" ,ADOXType.String, 12)
.AddColumn("客户" ,ADOXType.String, 20)
.AddColumn("数量" ,ADOXType.Integer)
.AddColumn("备注" ,ADOXType.Text)
End
With
Builder.AddTable(tbl, True, True) \'增加表
Builder.Close()
-- 发布时间：2010/8/18 19:19:00
--
沙发
-- 发布时间：2010/8/18 19:32:00
--
顶顶更健康
-- 发布时间：2010/8/18 19:55:00
--
哈哈，每天顶一次。
-- 发布时间：2010/8/18 22:19:00
--
越来越棒！
-- 发布时间：2010/8/18 22:40:00
--
顶起！
-- 发布时间：2010/8/19 8:17:00
--
顶
-- 发布时间：2010/8/19 8:26:00
--
顶！
-- 发布时间：2010/8/19 9:05:00
--
大家赶快测试，看有什么bug没有。
老大可以增加表达式列吗，如何增加
-- 发布时间：2010/8/19 9:12:00
--
老大可以增加表达式列吗，如何增加
看看帮助中关于DataCols的部分。