在VB6开发中使用DataReport结合数据环境可以实现常见的打印问题,属于打印的优先选择方案。当然,在更复杂的情况下,你一般使用Crystal Report方案。本文介绍在使用数据环境时遇到的一个路径问题。
一般的VB开发书中并没有对路径问题给出很好的解释,包括我面前的这个“Visual Basic宝典”系列。更意外的是,包括离线MSDN,都没有对这个问题给出解释。
在实战环境下使用DataEnvironment必须要解决相对路径问题。自我学习中,在数据环境的属性中定好数据库的路径后,这样数据库就被固定在了某个路径上,根据不适合软件的安装使用。
其实,答案很简单,如下图所示。单击图中的图标从数据环境切换到后台代码编辑器。
然后在代码中创建如下内容即可:
Private Sub DataEnvironment_Initialize()
Connection1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Password=; " & _
"Data Source= " & App.Path & "\Data\YMCow.mdb;Persist Security Info=True"
Connection1.Open
End Sub
因此,以前你试验使用的设置的那个固定路径,在运行程序时需要再次回到以前的设置对话框中手动清除。
未命名.JPG
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请
点击举报。