关于改相对数据库路径为绝对路径的问题

laomms

1. Public Const AODRR As String = "Provider=Microsoft.Jet.Oledb.4.0;data Source=" & "h:\software\database.mde " & _
   
2. ";Jet OLEDB:Database Password=" & "123"

复制代码

改成绝对路径：

1. Public Const AODRR As String = "Provider=Microsoft.Jet.Oledb.4.0;data Source=" & ThisWorkbook.Path & "\database.mde " & _
   
2. ";Jet OLEDB:Database Password=" & "123"

复制代码

错在哪里？

[ 本帖最后由 laomms 于 2008-11-23 14:56 编辑 ]