vb报表如何创建动态连接？

[sungliu]

在vb中如何可以使得数据环境（dataEnvirerment）中的连接（connection）的connectionSourse的连接语句变成动态的。。。
如何使用app.path或其他方法实现呢？？

[acptvb]

感谢您使用微软产品。

Private Sub DataEnvironment_Initialize()
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & "\Data\MyDB.mdb;"
DataEnvironment1.Connection1.ConnectionString = strConn
End Sub

您也可以通过设置DataReport的 DataSource属性动态的绑定数据源。
详情请参阅：
Q190411 HOWTO: Bind a DataReport To an ADO Recordset at Run Time
http://support.microsoft.com/support/kb/articles/q190/4/11.asp


- 微软全球技术中心 VB技术支持

本贴子以“现状”提供且没有任何担保，同时也没有授予任何权利。具体事项可参见使用条款
(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。
为了为您创建更好的讨论环境，请参加我们的用户满意度调查
(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。

[sungliu]

Private Sub DataEnvironment_Initialize()
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & "\Data\MyDB.mdb;"
DataEnvironment1.Connection1.ConnectionString = strConn
End Sub
这方法不行啊，，老是说我是无效的SQL语句：期待“DELETE”,“UPDATE”,“INSERT”,“SELECT”或“PROCEDUCE”.

我应该怎么处理呢？？？