标题：access数据库，我这样创建表，总提示表不存在

1楼

xxfoxtable 发表于：2024/4/23 20:44:00

If Connections("kcgl").GetTableNames.contains("收入") Then

' DataTables("收入").load

Else

Dim Builder As New ADOXBuilder("kcgl") '要指定数据源名称

Dim tbl As ADOXTable

Builder.Open()

tbl = Builder.NewTable("收入") '创建表

With tbl

.AddColumn("日期" , ADOXType.DateTime)

.AddColumn("单号" , ADOXType.String, 16)

.AddColumn("收入" , ADOXType.Double)

.AddColumn("账户序号" , ADOXType.String, 16)

.AddColumn("备注" , ADOXType.String, 255)

End With

Builder.AddTable(tbl, True, True)

Builder.Close()

End If

DataTables("收入").load

提示 DataTables("收入")不存在

[此贴子已经被作者于2024/4/23 20:43:59编辑过]

2楼

有点蓝 发表于：2024/4/23 22:03:00

首先，这种方式新建的表必须重启项目才能使用

此主题相关图片如下：1.png

其次，这种方式创建的表是不会添加到外部表管理中的，需要手动添加

共2 条记录, 每页显示 10 条, 页签: [1]