adodc INSERT error ?????

hjælp!

Private Sub Command1_Click()
    SQL ("INSERT INTO kunde (nummer,navn) VALUES('99999','ny kunde')")
End Sub

Sub SQL(Setning As String)
    Adodc1.RecordSource = Setning
    Adodc1.Refresh
    Set DataGrid1.DataSource = Adodc1.Recordset
End Sub

når jeg så klikker på Command1 kommer følgende fejl:

"handlingen er ikke tilladt, mens objektet er lukket"

hvis det er fordi den er lukket... hvordan åbner jeg så???