为什么有时候使用dim db as database 会出现错误

jack110007 2003-06-04 08:54:17

为什么有时候使用dim db as database 会出现错误

...全文

80 5 打赏收藏转发到动态举报

写回复

5 条回复

切换为时间正序

请发表友善的回复…

发表回复

yefm 2003-06-04

打赏
举报

回复

要先引用microsoft dao 3.6 object library

jack110007 2003-06-04

打赏
举报

回复

提示信息“编译错误，用户定义类型未定义”

jack110007 2003-06-04

打赏
举报

回复

提示信息“编译错误，用户定义类型未定义”

rappercn 2003-06-04

打赏
举报

回复

不引用就出错

不妨这样写
dim db as DAO.database
如果按了“.”之后有提示就没问题了

victorycyz 2003-06-04

打赏
举报

回复

具体一点，出现什么错误？
一般地，要先引用dao库。

Dim db3 As Database Dim rst As Recordset Dim rst1 As Recordset '打开表Personal Dim rst2 As Recordset '打开表BookFlag Dim rst3 As Recordset '打开表Book Dim ws1 As Workspace Dim ws2 As Workspace Dim qry...

Dim DB As Database Dim RS As Recordset Dim username As String Dim Password As String Set DB = OpenDatabase(App.Path & "\user.mdb") Set RS = DB.OpenRecordset("user") If textuser.Text <> "" Then ...

Dim db As NotesDatabase Dim vw As NotesView Dim doc As NotesDocument Dim curDoc As NotesDocument Dim docs As NotesDocumentCollection Dim stytest As String Dim icount As Integer Dim key As ...

Dim db As Database, rs As Recordset 打开DBF文件： Set db = OpenDatabase("d:\tmp", False, False, "dbase 5.0") Set rs = db.OpenRecordset("select * from test", dbOpenDynaset) 打开XLS文件： Set db = ...

我们可以需要将数据库中，同一内容的文档保留一个，而删除多余的文档。本程序即提供此功能。准备： ·视图：ViewName,处理在此视图... Dim db As notesdatabase Set db = ss.currentdatabase Dim vi As notesview

1,451

社区成员

41,355

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章