-- 作者:zyqzyy
-- 发布时间:2014/7/17 22:34:00
-- [求助]请教逛逛老师
’按老师的例子动态添加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
|