vb6 access数据库连接

Question

Connection内部维护连接池，不会一会打开一会关闭导致性能问题的。

Answer 1

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\accessdb.mdb"
cn.Execute........
cn.close
set cn = nothing
就是说这段代码每次都要用上？

Answer 2

那你就不要重复创建和清除啊。在通用段中声明对象变量：
Dim cn As ADODB.Connection在 Form_Load 中实例化：
Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\accessdb.mdb"在你的应用代码（例如按钮事件中）中执行：
cn.Execute........在 Form_Unload 中关闭和清除
cn.close
set cn = nothing