做新的ADODB记录集创建一个新的连接？

我想避免创建多个并发连接，我无法弄清楚如何知道幕后发生了什么。做新的ADODB记录集创建一个新的连接？

Ex。

Sub TestConnections() 
    Dim conn As ADODB.Connection 
    Dim qry1 As String 
    Dim qry2 As String 
    Dim rs1 As New ADODB.RecordSet 
    Dim rs2 As New ADODB.RecordSet 

    conn = New ADODB.Connection 

    conn.ConnectionString = "<insert connection details>" 

    conn.open(conn.ConnectionString) 

    qry1 = "SELECT * FROM SomeTable;" 
    qry2 = "SELECT * FROM SomeOtherTable;" 

    rs1.Open(qry1,conn) 
    rs2.Open(qry2,conn) 

End

我现在有两个打开的连接，还是两个打开的记录集共享相同的连接？

来源

2017-10-06 Error_2646

他们将共享相同的连接，并为不同的查询保存2个记录集。 – Jaxi

完美的，如果你张贴作为答案，我可以接受它并关闭这个问题。 –

当然，也添加了一些更多的信息。 – Jaxi

他们将共享相同的连接，并为不同的查询保存2个记录集。

原因是因为连接对象是查询发送到的实际连接，并且由于它是通过相同的对象，它将处理这两个查询的同一个连接，但记录集被返回并存储到不同的变量。

来源

2017-10-06 15:24:30 Jaxi

做新的ADODB记录集创建一个新的连接？

回答

相关问题