dataenvironment中数据库的路径可否动态设定.txt

VB技巧问答10000例 VB技巧问答10000例

Dim strConn As String 
     
     strConn = "Provider=Microsoft.Jet.OLEDB.3.51;" & _ 
     "Data Source=" & App.Path & "\Data\MyDB.mdb;" 
     DataEnvironment1.Connection1.ConnectionString = strConn 
<END>