以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]ADOXBuilder新增表时如何判断是否已经存在同名表 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=183827) |
-- 作者:洮沙 -- 发布时间:2022/11/15 11:07:00 -- [求助]ADOXBuilder新增表时如何判断是否已经存在同名表 问题1如题,问题2:新增列如何判断是否存在同名列?麻烦老师指导一下,谢谢! |
-- 作者:有点蓝 -- 发布时间:2022/11/15 11:10:00 -- 定义一个集合,每添加一个列时判断一下集合是否有这个列名,,如果没有就添加列,同时把列名放入集合。 |
-- 作者:洮沙 -- 发布时间:2022/11/15 11:42:00 -- 蓝版,列好判断,增加表怎么判断呢? [此贴子已经被作者于2022/11/15 11:47:10编辑过]
|
-- 作者:有点蓝 -- 发布时间:2022/11/15 11:48:00 -- if 集合.contains("xx列") = false then .AddColumn("xx列" ,ADOXType.String, 12) 集合.add("xx列") end if
|
-- 作者:洮沙 -- 发布时间:2022/11/15 11:54: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() |
-- 作者:有点蓝 -- 发布时间:2022/11/15 11:58:00 -- http://www.foxtable.com/webhelp/topics/1943.htm |
-- 作者:洮沙 -- 发布时间:2022/11/15 12:01:00 -- OK! |