Ver Mensaje Individual
  #1 (permalink)  
Antiguo 13/06/2006, 16:53
Avatar de Cuezaltzin
Cuezaltzin
 
Fecha de Ingreso: diciembre-2003
Ubicación: Frente al Monitor
Mensajes: 252
Antigüedad: 21 años, 3 meses
Puntos: 0
Exclamación Error al enviar Mail.

Hola a todos los foreros.

Tengo la siguiente función con la cual intento enviar un mail:

Imports System.Net.Mail
Imports System.Net.Mail.SmtpClient
Imports System.Web
Imports System.Net

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim SmtpClient As SmtpClient = New SmtpClient()
Dim Message As MailMessage = New MailMessage()

Try

Dim fromAddress As MailAddress = New MailAddress("[email protected]","Ivan")

SmtpClient.Host = Dns.GetHostName
SmtpClient.Port = 25

Message.From = fromAddress

Message.To.Add("[email protected]")
Message.Subject = "Feedback"

Message.Body = False

Message.Body = "Prueba de Envío de Mail."
SmtpClient.Send(Message)

Catch ex As Exception

End Try

Me.Close()

End Sub

Lo que eh podido ver es que cuando desactivo el antivirus(McAfee) si puedo enviar el mail, pero cuando esta activo el antivirus no lo envia.

Alguien tiene idea de porque demonios pasa esto. Y si existe alguna solucion para este problemas.

Espero haberme explicado lo suficiete. Saludos
__________________
Hasta la victoria Siempre.