Erro envio de e-mail via outlook no windows server 2003

Olá! Bom dia!

Estou tentando enviar vários destinatários para o outlook 207, no windows 7 funciona normal, ele abre o outlook com os destinatarios q selecionei, mas quando implantei no windows server 2003 ele dá o seguinte erro:

"Erro em tempo de execução '429':
O componente ActiveX não pode criar o objeto."

O meu código é esse:
DoCmd.OpenQuery "Pessoas_EmailsDel"
DoCmd.OpenQuery "Pessoas_EmailsAdd"
Dim OutApp As Object
Dim OutMail As Object
Dim rst As DAO.Recordset
Dim strDestinatarios

Set OutApp = CreateObject("Outlook.Application") 'AQUI OCORRE O ERRO.
OutApp.Session.Logon
Set OutMail = OutApp.CreateItem(0)
Set rst = CurrentDb.OpenRecordset("Pessoas_Emails")

Do Until rst.EOF
strDestinatarios = strDestinatarios & rst("Emails") & ";"
rst.MoveNext
Loop

strDestinatarios = Left(strDestinatarios, Len(strDestinatarios) - 1)

On Error Resume Next
With OutMail
.To = strDestinatarios
.BCC = ""
.Subject = ""
.Body = ""
.Display

End With

Set OutMail = Nothing
Set OutApp = Nothing

rst.Close
Set rst = Nothing

MsgBox "Emails enviados" & Chr(13) & Chr(13) & "Total: " & DCount("Email", "Email")

End Sub

Alguem pode me ajudar?
Obrigado.

Verifique as referências. Deve ter alguma AUSENTE ou incompatível. Não costumo enviar email via Outlook pelo Access e nunca o fiz nas versões anteriores, mas deve ter a ver com a versão do Outlook. Talvez tenha que mudar a versão da referência e adaptar o código.

Vou tentar resolver, daí se conseguir posto aki.
Obrigado.