Dim Builder As New ADOXBuilder("2019ERP") '要指定数据源名称
'Dim Builder As New ADOXBuilder
Builder.Open() '打开ADOXBuilder
With Builder.Tables("员工奖惩记录")
.AddColumn("日期" ,ADOXType.DateTime) '增加日期型列
.AddColumn("姓名" ,ADOXType.String, 12) '增加字符型列,长度指定为12
.AddColumn("身份证" ,ADOXType.String, 20) '增加字符列,长度为20
.AddColumn("备注" ,ADOXType.Text) '增加备注列
End With
Builder.Close() '关闭ADOXBuilder
---------------------------
版本:2019.9.8.1
---------------------------
代码执行出错,错误信息:
System.Runtime.InteropServices.COMException (0x80040E3E): 异常来自 HRESULT:0x80040E3E
在 ADOX.Columns.Append(Object Item, DataTypeEnum Type, Int32 DefinedSize)
在 Foxtable.ADOXTable.AddColumn(String Name, ADOXType DataType, Int32 Length)
在 UserCode.Test()
---------------------------
确定
---------------------------