以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  项目发布後修改数据源问题?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14470)

--  作者:tungwun
--  发布时间:2011/11/20 19:18:00
--  项目发布後修改数据源问题?
用这代码每次打开项目要确定文件位置,很不方便?

If e.Name = "连接名称" Then
    Dim
 dlg As New OpenFileDialog
    dlg.Filter= 
"Access文件|*.mdb"
    If dlg.ShowDialog = DialogResult.Ok Then
        e.ConnectionString = 
"Provider=
Microsoft.Jet.OLEDB.4.0;Data Source=" & dlg.FileName & ";Persist Security Info=False"
    End
 If
End
 if

--  作者:czy
--  发布时间:2011/11/20 22:15:00
--  
那你为何不使用示例一的代码呢,示例一就不需要选择。