Enviando email desde ASP.NET

[RsOfT]

Tengo el siguiente código que me envió Rootk una vez:

Código:

        
         Dim objMail As New System.Web.Mail.MailMessage

        objMail.From = "[email protected]"
        objMail.To = "[email protected]"
        objMail.Subject = "Algun Subject"
        objMail.BodyFormat = Mail.MailFormat.Html 'Si lo quieres en HTML
        objMail.Body = "********************<BR>" & _
        "Thank you for visiting CodeToad.com" & _
        "********************<BR>"

        System.Web.Mail.SmtpMail.SmtpServer = "130.1.0.3" 'SRVRICA1
        System.Web.Mail.SmtpMail.Send(objMail)
        objMail = Nothing

Pero lo ejecuto en un evento click de un botón la página se queda pensando infinitamente y no termina ni da error.

Que podía estar pasando?

[RootK]

1.- Si estas usando VS porque no haces un debug..?? (usa try, catch para ver la exception)
2.- Estas seguro que tu smtp es el correcto..? (que tenga salida tanto a red interna como externa)
3.- Prueba con otra direccion del from para saber si no es el email.

P.D.- Acabo de hacer pruebas y a mí me funciona sin problemas.

Salu2

[SunDarK]

Pues podria pasar que el servidor requiera identificación de usuario y no se la estés pasando.
Te pongo un trozo de código de como mando yo emails en ASP.NET

Dim email As New System.Web.Mail.MailMessage
Dim SmtpMail As System.Web.Mail.SmtpMail
email.From = "[email protected]"
email.Fields("http://schemas.microsoft.com/cdo/configuration/smtsperver") = "MAIL.DRESOFT.COM"
email.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
email.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
email.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
email.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = "[email protected]"
email.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "XXXXXX"
email.Subject = "Confirmación de Registro en Portal de Noticias Web"
email.Body = "Bienvenido al Portal de Noticias Web " & TxtUsuario.Text & Chr(10) & Chr(13) & "Clickea en el siguiente enlace para confirmar el registro."
email.To = TxtCorreo.Text
SmtpMail.SmtpServer = "mail.dresoft.com"
SmtpMail.Send(email)

Un saludo

[RsOfT]

Bueno, yo no quiero enviar a direcciones externas sino internas del exchange.
Rootk, no me tira ningún error. Verifiqué el servidor y si está correcto. Lo que me parece extraño es que antes lo probé y funcinó y lo que hice fue guardar el código hasta que llegue el momento de utlilizarlo. Este es el momento y no me funciona.

3.- Prueba con otra direccion del from para saber si no es el email.

Hecho haré y luego les cuento.

[RsOfT]

Me acabo de dar cuenta que es en mi máquina que no funciona, cuando coloca la aplicación en el servidor funciona perfectamente. Que tengo que instalarle a mi PC para que funcione?