I use this for Inserting, Updating, and Deleting from tables. I dont know if it is the best way but it works well for me.
Dim conProcedure As New ADODB.Connection
Dim comProcedure As New ADODB.Command
Dim rstProcedure As New ADODB.Recordset
With conProcedure
.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Database Name;Data Source=ServerName"
.CursorLocation = adUseClient
.Open
End With
With comProcedure
.ActiveConnection = conProcedure
.CommandType = adCmdText
.CommandText = "INSERT INTO Table_T ([Column_1], [Column_2]) VALUES ('" & text1 & "' , '" & text2 & "'"
End With
Set rstProcedure = comProcedure.Execute