CMD对象这样写成函数有什么问题吗 望高手赐教

Question

Public Sub SQLEXIT(ByVal sqlstr As String)
    Set cmd.ActiveConnection = cnn
   cmd.CommandType = adCmdText
    cmd.CommandText = sqlstr
    
    cmd.Execute
    Set cmd = Nothing
    
End Sub

Answer 1

Command对象本身占资源有限，Connection对象占资源多，应该释放connection对象

Answer 2

如果仅仅是执行SQL语句，直接使用connection最好，执行存储过程时，才考虑使用command。