Simple Problem! Hopfully a simple soultion!

[Bigley]

If it is ADO you are using you will need a command object and a connection

Dim cmd As ADODB.Command

Set cmd = New ADODB.Command
cmd.ActiveConnection = 'Your connection object here
cmd.CommandTimeout = 0
cmd.CommandText = 'your sql string here
cmd.Execute
Set cmd = Nothing