使用新的连接字符串实例化连接对象

在使用ADO OleDB连接数据库时，有时候更改了连接字符串却发现连接对象仍然使用旧的连接字符串，导致连接失败。解决方法是使用新的连接字符串实例化连接对象，而不是重用旧对象。

示例代码：

' 获取旧连接对象 Set conn = New ADODB.Connection conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\myFolder\myAccessFile.accdb;Persist Security Info=False;" conn.Open

' 更改连接字符串 conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.16.0;Data Source=C:\myNewFolder\myNewAccessFile.accdb;Persist Security Info=False;"

' 使用新的连接字符串实例化连接对象 Set newConn = New ADODB.Connection newConn.ConnectionString = conn.ConnectionString newConn.Open

' 关闭旧连接对象，使用新连接对象进行操作 conn.Close Set conn = Nothing

newConn.Execute "INSERT INTO myTable (col1, col2) VALUES ('value1', 'value2')"

newConn.Close Set newConn = Nothing