If e.Name = "STD数据库" Then
Dim IP As String = e.User.ExtendedValues("IP") '获得用户输入的IP
If IP > "" '如果用户自己输入了IP
'则用用户输入的IP替换原来的IP
e.ConnectionString = e.ConnectionString.Replace("192.168.0.188", IP)
End If
End If
上面的代码是需要客户自我输入IP 如何配合我下面的外部数据库的链接地址使用
外部数据原地址
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\192.168.0.188\新建文件夹\琢玥网站\STD数据库.mdb;Persist Security Info=False