工作组信息文件丢失(数据库)

laiyinqing 2008-08-04 09:03:35

Private Sub Form_Load()
Dim myWS As Workspace
Set myWS = dbengine.CreateWorkspace("Wsg", "users", "", dbUseJet)
dbengine.Workspaces.Append myWS
MsgBox CStr(dbengine.Workspaces.Count)
myWS.Close
MsgBox CStr(dbengine.Workspaces.Count)
'dbengine.Workspaces.Delete
End Sub




实时错误 3028
不能启动应用程序,工作组信息文件丢失,或是已经被其他用户以独占方式打开
要怎么解决啊?
...全文
100 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
lcsfxs 2008-08-06
  • 打赏
  • 举报
回复
用控件ADODC1连接或用ADODB连接数据库试试
dbcontrol 2008-08-06
  • 打赏
  • 举报
回复
都改ADO了,DAO没多少人用

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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