以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  为外部表增加系统列出错  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176158)

--  作者:zsxx999ja
--  发布时间:2022/4/1 21:14:00
--  为外部表增加系统列出错
1、用帮助中的ADOXbuilder  为外部表增加系统列_dentify  _Sortkey _Locked  出错 提示说table 不是ADOXbuilder 的成员,于是我在论坛里收到了大红袍的增加系统列的代码,修改如下:

Dim cn As new ADODB.Connection()
Dim ca As new ADOX.Catalog

cn.Open(Connections("cwsqlconn").ConnectionString , Nothing, Nothing, -1)
Ca.ActiveConnection = cn

Dim tbl = ca.Tables("危化物资")

tbl.Columns.Append("_Locked", ADOX.DataTypeEnum.adBoolean)
tbl.Columns.Append("_Sortkey", ADOX.DataTypeEnum.adInteger)
tbl.Columns.Append("_Dentify", ADOX.DataTypeEnum.adInteger)
cn.Close()
ca = Nothing

图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看
确保外部表中无任何系统列,但仍然出错,请修改



--  作者:zsxx999ja
--  发布时间:2022/4/1 21:56:00
--  
是不是外部表中已有了数据就不能再增加新的列?



--  作者:有点蓝
--  发布时间:2022/4/2 8:51:00
--  
ADODB的用法我不熟,自己网上搜索看看:http://www.zzvips.com/article/87741.html

看提示应该是只能在空表添加列,或者添加的时候指定列可以为空值,具体请自行研究上面帮助