Visual Basic - Enviar correo por Smtp

Life is soft - evento anual de software empresarial
   
Vista:

Enviar correo por Smtp

Publicado por Maria.08 (1 intervención) el 11/06/2008 10:44:54
Hola a todos,
Cree una pequeña aplicacion, que una de las cosas que permite hacer es suspuestamente enviar correos electronicos a traves del smtp, pero no se donde estoy fallando que no me hace caso, aqui os dejo el codigo. A ver si me podeis hechar un cable.

Un saludo

Codigo----->

Dim enviar As New clsSendMail
Dim e As Integer

On Error GoTo GestionErrores:

enviar.SMTPHost = smtp.mail.yahoo.com
enviar.UserName = maria_85v ' probe tanto a ponerlo asi como maria_85v@yahoo.es
enviar.password = ***** 'aqui va la pass
enviar.From = maria_85v@yahoo.es
enviar.Recipient = email del destinatario
enviar.Subject = Asunto
enviar.Message = el email
enviar.Send
Set enviar = Nothing

GestionErrores:
Debug.Print "Error " & Err.Number & " " & Err.Description
End If
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder