主题：[求助]请教逛逛老师

’按老师的例子动态添加SQL数据源

Dim s As String = "Provider=SQLOLEDB.1;Password=12;Persist Security Info=True;User ID=sa;Initial Catalog=UserInfo;Data Source=192.168.1.246"
   If Connections.Contains("ss") Then
    Connections.Delete("ss")
End If
    Connections.add("ss",s)

If DataTables.Contains("文件表") = False Then   ‘这是SQL中的数据 表
    DataTables.Load("文件表")

End If

提示如下错误，请老师指点：

 

此主题相关图片如下：sql数据源.png

谢谢！