Sobre la Clase system.web.mail

21/07/2003 - 00:33 por Carlos | Informe spam
Buenas, estoy intentando crear un form para mandar e-mails desde VB,
he visto que se ha de usar la clase system.web.mail, pero joer, yo
cuando hago un imports system.web.mail No me aparece la opcion web,
¿Aque se debe esto? ¿Tengo que importar otra clase?, yo he visto los
ejemplos y entodos laos usan esa clase, pero si no me aparece, ¿Como
narices tengo que hacerlo?

Muchas Gracias Gento.
 

Leer las respuestas

#1 Sergio C.
21/07/2003 - 04:05 | Informe spam
"Carlos" escribió en el mensaje
news:
Buenas, estoy intentando crear un form para mandar e-mails desde VB,
he visto que se ha de usar la clase system.web.mail, pero joer, yo
cuando hago un imports system.web.mail No me aparece la opcion web,
¿Aque se debe esto? ¿Tengo que importar otra clase?, yo he visto los
ejemplos y entodos laos usan esa clase, pero si no me aparece, ¿Como
narices tengo que hacerlo?

Muchas Gracias Gento.




Hola,
Prueba esto:

Public Function SendMail(ByVal [To] As String, _
ByVal From As String, ByVal Subject As String, _
ByVal Body As String, ByVal IsHTML As Boolean, _
Optional ByVal SmtpServer As String = "domain.com") As Boolean
' Sends a mail message using the specified details
' - returns a False if delivery fails
Try
Dim objMsg As New System.Web.Mail.MailMessage
SendMail = True
With objMsg
.To = [To]
.From = From
.Subject = Subject
.Body = Body
' .BodyFormat specifies whether the Body is
' in plain text or HTML format
.BodyFormat = IIf(IsHTML = True, _
System.Web.Mail.MailFormat.Html, _
System.Web.Mail.MailFormat.Text)
End With
System.Web.Mail.SmtpMail.SmtpServer = SmtpServer
System.Web.Mail.SmtpMail.Send(objMsg)
Catch
SendMail = False
End Try



Un saludo,
Sergio C.

Preguntas similares