Question

VB data控件 相对路径

VB data控件 相对路径
我用文本框绑定了数据库，但是换台电脑就用不了了。然后想在form_load下相对路径绑定数据库，像这样：
Private Sub Form_Load()
Data1.DatabaseName = App.Path & "\txl.mdb"
End Sub
可是提示“数据绑定DLL,VB5DB.DLL'不能加载”怎么回事？

Answer 1

你使用了这个 Data控件，需要VB5DB.DLL文件，你的计算机是安装了这个文件的，而别的计算机不一定安装！
一般可以用两种方法解决：

方法一：在你的VB环境里，制作安装程序，然后到别人的计算机上去安装你开发的程序。
方法二：到你开发VB的计算机的 C:\Windows\System32 这个文件夹里，找到这个文件，然后复制到你现在出问题的这台计算机的 C:\Windows\System32 这个文件夹里。如果还提示缺少类似的文件，你就一一按照此方法，复制，就可以了。

追问

不是，最开始用data绑定数据库用的是databasename,但是这样的话用的是绝对路径，换台电脑就运行不了了，然后查到办法说要用相对路径，我就加了下面的代码，然后才出现最开始那种问题的
Private Sub Form_Load()
Data1.DatabaseName = App.Path & "\txl.mdb"
End Sub
所以不是代码或者其他地方设置的问题吗？因为是交作业的，所以。。。

追答

这是两个问题，你那个图就是我上面说的方法解决！
而关于数据库路径问题，是这样的。
你在使用 Data控件时，不要采用属性窗口里，连接数据库文件，而采用语句
Data1.DatabaseName = App.Path & "\txl.mdb"

当然，要把你的数据库文件放在与你的程序文件一起。

现在提示的图，那肯定就是没有 DLL 文件！

追问

恩恩，谢谢。。。^_^我去弄了个dll文件，确实可以用了，谢谢。。。

Answer 2

可能还要设置一下： Data1.RecordSource= 表名或SQL
如还不行把文本框的两个绑定属性也设置一下

追问

Data1.RecordSource= 表名 这里设置了，不过是在属性窗口弄的，文本框那里也一样。。。是要重新用代码写一遍吗？

追答

试试看，既然数据库重新设置的，他还认不认RecordSource难说了。

Answer 3

赞成楼上，方法一：在你的VB环境里，制作安装程序，然后到别人的计算机上去安装你开发的程序。这样一来把你的VB环境复制过去了,不管是绝对还是相对都一样