當此vba代碼嘗試打開記錄集時,出現以下錯誤: 運行時錯誤'3709' 該連接無法用於執行此操作。在這種情況下,它是封閉的或無效的。無法在vba中打開記錄集
Set objMyConn = New ADODB.Connection
Set objMyRecordset = New ADODB.Recordset
Dim strSQL As String
objMyConn.ConnectionString = "Driver={SQL Server};Server=localhost\SQLEXPRESS;Database=Contact;Trusted_Connection=True;"
objMyConn.Open
strSQL = "Select * from Contact where Lastname like " + Chr(39) + LastSearch + "%" + Chr(39) + " And Firstname like " + Chr(39) + FirstSearch + "%" + Chr(39)
MsgBox strSQL
objMyRecordset.Open strSQL, cnn, adOpenForwardOnly, adLockOptimistic
這是什麼'cnn'?這不應該是'objMyConn'嗎? –