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

确保外部表中无任何系统列,但仍然出错,请修改