以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  8月18日更新上传  (http://foxtable.net/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()


--  作者:donaldwc
--  发布时间:2010/8/18 19:19:00
--  

沙发图片点击可在新窗口打开查看

[此贴子已经被作者于2010-8-18 19:19:11编辑过]

--  作者:czy
--  发布时间:2010/8/18 19:32:00
--  
顶顶更健康
--  作者:lkqing
--  发布时间:2010/8/18 19:55:00
--  
哈哈,每天顶一次。
--  作者:程兴刚
--  发布时间:2010/8/18 22:19:00
--  

越来越棒!


--  作者:i52117
--  发布时间:2010/8/18 22:40:00
--  
顶起!
--  作者:cxabc123
--  发布时间:2010/8/19 8:17:00
--  

--  作者:foxor
--  发布时间:2010/8/19 8:26:00
--  
顶!
--  作者:cxabc123
--  发布时间:2010/8/19 9:05:00
--  

大家赶快测试,看有什么bug没有。

老大可以增加表达式列吗,如何增加

[此贴子已经被作者于2010-8-19 9:07:02编辑过]

--  作者:狐狸爸爸
--  发布时间:2010/8/19 9:12:00
--  
以下是引用cxabc123在2010-8-19 9:05:00的发言:

老大可以增加表达式列吗,如何增加

 

看看帮助中关于DataCols的部分。