envio de email com erro

Estou desenvolvendo uma rotina de envio de e-mail baseada na rotima do Criquio e gostaria de saber o siginificado das linhas abaixo :

.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True

pois estou recebendo o erro "falha na conexão do transporte para o servidor"

Grato,

Sergio

Tente utilizar um email do gmail para enviar!