这种连接数据库的方式叫什么

Question

Set MyDB = Workspaces(0).OpenDatabase(sys_path & File_name, False, False, ";pwd=123")
        Set MyRs = MyDB.OpenRecordset("User", dbOpenTable)
        MyRs.Index = "Index_Xh"
        MyRs.AddNew
        MyRs.Fields("序号") = Val(Me.Text1.Text)
        MyRs.Fields("卡号") = RTrim(Me.Text2.Text)        MyRs.Update
        MyRs.Close
        MyDB.Close

Answer 1

是不是数据源是excel啊
这个仅仅是我的猜测。

Answer 2

这个可能是VBA的连接数据库方式，可以在Excel当中录制宏工具====宏,选择数据====导入外部数据，在宏VBE当中查看代码
....

Answer 3

不好意思，错了，应该使DAO,
========Microsoft DAO 2.5/3.51 Compatibility Library
可以在没有安装Access之类的数据库应用软件时使用vb创建数据库,不过支持的版本office 97....

Answer 4

DAO 对象，需引用 Microsoft DAO 3.6 Library。