怎样动态改变数据环境连接路径，在线等待........

Question

数据环境connection怎样动态设置，
 DataE.conshop.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\myshop.mdb;Mode=Read|Write|Share Deny None;Persist Security Info=False"
执行上述代码后，数据环境处于关闭状态，执行open操作则出错，
那位有此问题的示范代码，不胜感激

Answer 1

dim strCN as string
dim CN as new adodb.connection
strCN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\myshop.mdb;jet oledb:database password=(your password)"
CN.open strCN
.....................
.........
......

Answer 2

to xayzmb(行者)
 你有qq吗，我可以用qq问你吗？

Answer 3

我用的是数据环境设计器，和adodb在细节上不一样

Answer 4

对不起
我没有qq
E_mail: [email protected]
msn行吗?
[email protected]