如何解决运行时数据库路径报错问题

wanda 2001-05-26 12:43:00
我用ADO连接数据库可编译后在别的目录运行,提示数据库路径出错,我已经用了APP.path & "\aa.mdb"方法,可在c:\运行提示c:\\aa.mdb出错,如何解决?还有数据环境里也是绝对路径,如何解决运行路径问题。
...全文
39 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Un1 2001-05-26
sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & GetAppPath() & gconstrDBName & ";Persist Security Info=False"


private function GetAppPath() as string
Dim s As String
s = App.Path

If Right$(s, 1) <> "\" Then s = s & "\"

GetAppPath = s
end function
回复
Edward 2001-05-26
If Right(App.Path, 1) = "\" Then
strPath = App.Path & "aa.mdb"
Else
strPath = App.Path & "\aa.mdb"
End If
回复
watercat17 2001-05-26
edyang(石头)是对的,
你的MDB文件放在了根目录啊…………
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2001-05-26 12:43
社区公告
暂无公告