注册 登录
编程论坛 VB6论坛

【求助】VB 用下列代码新建 Access 数据库版本是 95 的,怎么破,我的 Access 是 2003 的

有钱的狗 发布于 2014-05-07 02:16, 446 次点击
程序代码:
Private Sub Command1_Click()
    Dim path As String
    Dim db As Database
    Dim sql As String
    With CommonDialog1
        .Filter = "Access文件(*.mdb)|*.mdb|所有文件(*.*)|*.*|"
        .DialogTitle = "另存为"
        .CancelError = True
        .DefaultExt = "mdb"
        .ShowSave
        path = .FileName
    End With
   
    If Dir(path) = "" Then
        Set db = Workspaces(0).CreateDatabase(path, dbLangGeneral)
        sql = "create table" & " test " & "(" & " 单号 text,备注 text);"
        db.Execute sql
    End If
End Sub
4 回复
#2
风吹过b2014-05-07 08:10
Access 95  , Access 2003
一样的用啊。
有什么问题??
你要用到什么新特性???

创建对象的问题,或者说 创建引用的 库版本的问题。
#3
有钱的狗2014-05-07 15:34
回复 2 楼 风吹过 b
每次打开都要提示转换数据库,也想知道为什么创建的是95版本的ACCESS
#4
lowxiong2014-05-07 17:31
可能是你用的DAO版本过低,我使用的是DAO 3.6,创建的数据库显示2002-2003格式。当我引用DAO 2.5/3.51时就提示早期版本,要求转换。

[ 本帖最后由 lowxiong 于 2014-5-7 18:30 编辑 ]
#5
风吹过b2014-05-08 09:45
就是 引用库 的版本问题。
我没用过程序里直接创建数据库来,不知道版本对应关系。

按4楼说的的去改吧。
1