Dim s As String
s = "Provider=SQLOLEDB.1;Password=" & dbPwd & ";Persist Security Info=True;User ID=" & dbUser & ";Initial Catalog=" & dbName & ";Data Source=" & Path & "," & dbPort & ")"
'先卸载原数据源的表
DataTables.Unload("IPSet")
Connections.Delete("test")
'重新按新数据源打开项目
Syscmd.Project.Open(ProjectPath & "Connection.foxdb", s)
e.Form.close
用新的数据源连接字符重新打开项目时如何删除旧数据源中的表及数据源,用上面红色的代码没有用,会提示出错
此主题相关图片如下:oa流程.jpg
谢谢!