文件路径的问题

Question

在使用commondialog控件获得文件路径后，存入了text1.text中
请问，那在'Microsoft.Jet.OLEDB.4.0','Data Source=_______的这里再用什么来引用获得的路径，谢谢了^-^Private Sub Command1_Click()
CommonDialog1.ShowOpen
CommonDialog1.ShowSave
text1.Text = CommonDialog1.FileName
End Sub

Answer 1

可以这样：
"Data   Source=“ & text1.text完整例子：Dim sConStr As String
Dim adoCne As adodb.ConnectionSet adoCne = New adodb.ConnectionsConStr = "Provider = Microsoft.Jet.OLEDB.4.0;"
sConStr = sConStr & "Password=“ & 密码 & ";"
sConStr = sConStr & "User ID=" & 用户名 & ";"
sConStr = sConStr & "Data Source=" & 数据文件 & ";"
sConStr = sConStr & "Persist Security Info=True;"
sConStr = sConStr & "Jet OLEDB:System database=" & 工作组文件adoCne.Open sConStr