DataEnvironment问题
想打印报表，所以用了DataEnvironment控件，但这控件如何使用代码来设置与SQL的连接？ 右击属性里设置可以，但是我想通过代码来设置，请指教！！！
[解决办法]
linkcn = "Provider=sqloledb;Data Source=IP;Initial Catalog=zz_ic;User Id=sa;Password=123"

Private Sub DataEnvironment_Initialize()
DataEnvironment1.Connection1.ConnectionTimeout = 30
DataEnvironment1.Connection1.ConnectionString = linkcn
DataEnvironment1.Connection1.Open linkcn
End Sub

[解决办法]
代码不对

[解决办法]
Private Sub DataEnvironment_Initialize()
Connection1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "xxx.MDB;Persist Security Info=False"
End Sub