Buenas tardes:
Hace un buen tiempo me baje el ejemplo que esta en las FAQ, despues de configurarlo funcionaba a la perfección.
La semana pasada mi HD se malogro y tuve q cambiar de disco, reinstale todo lo que tenia antes, incluyendo la aplicacion para enviar correos, pero me di con la sorpresa de que no esta funcionando.
A la hora de probarlo solo me devuelve este mensaje
Error 5: Llamada a procedimiento o argumento no válidos
El Codigo q uso es
Cita: With SMTP
.Server = varSvrSMTP
.Username = varUidSMTP
.Password = varPwdSMTP
.MailFrom = varEmaSMTP
.SendTo = "
[email protected]"
TxtAsunto.Text = "Envio Nº: " & Str(nNumero)
.MessageSubject = Trim(TxtAsunto.Text)
.MessageText = TxtMensaje.Text
.SendEmail
End With
Donde :
SvrSMTP = smtp.mail.yahoo.es
EmaSMTP=
[email protected]
UidSMTP = cuenta
PwdSMTP= clave
Muchas Gracias por la orientcion.
Atte
Jorge Diaz