Foxtable(狐表)用户栏目专家坐堂 → access数据库,我这样创建表,总提示表不存在


  共有1269人关注过本帖树形打印复制链接

主题:access数据库,我这样创建表,总提示表不存在

帅哥哟,离线,有人找我吗?
xxfoxtable
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1756 积分:16586 威望:0 精华:0 注册:2017/6/1 23:12:00
access数据库,我这样创建表,总提示表不存在  发帖心情 Post By: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楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110443 积分:562081 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/4/23 22:03:00 [只看该作者]

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

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

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

 回到顶部