创建外部表,重新打开项目,项目中没有有表 订单 Post By:2017/8/10 22:34:00 [显示全部帖子]
执行以下代码,重新打开项目后,项目中没有 表 订单?
如何才能有?
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()