Вставить значения в SQL из VBA

Мне нужно вставить значения в таблицу в SQL Server из VBA. Я попробовал кое-что, о чем упоминал ниже. Но я не смог добиться своих результатов. Пожалуйста, помогите мне решить эту проблему. Я использую Exact Conn String в моем варианте даже хотя он не работает.

Sub To_SQL()

Dim conn As ADODB.Connection
Dim cmd As ADODB.Command
Dim strSQL As String

'Create a new Connection object
Set conn = New ADODB.Connection

'Set the connection string
conn .ConnectionString = "Data Source=55.50.53.9;Initial Catalog=Management;Persist Security Info=True;User ID=licenceusr;Password=******"

'Open the Connection to the database
conn .Open **<ERR Raising
 conn .Execute "insert into MyTableName (firstname, lastname) values('""Dhini""','""Dhini""')"
'Create a new Command object
Set cmd = New ADODB.Command