ASP Mail

Paola
29 de Octubre del 2003
Alguien podria ayudarme a hacer un asp mail
poder enviar mails por codigo
please
les agradecere muchiisimo

david
29 de Octubre del 2003
Debes usar el componente ASP.MailSender. Con ese componente mandas mails por cdigo. Es fcil de usar. Te pongo un ejemplo:
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "direccionmaildetuservidor" ' Specify a valid SMTP server
Mail.From = "unadireccioncualquiera" ' Specify sender's address
Mail.FromName = "S.A.T. Diccionario" ' Specify sender's name

Mail.AddAddress "maildestino"
Mail.AddBcc "maildestino"

'termino = Cstr((termino.Fields.Item("termino").Value))
'email = Cstr((termino.Fields.Item("email").Value))
'fecha = (termino.Fields.Item("fecha").Value)
cuerpo = "<html><body bgcolor=""#FFFFFF"" text=""#000000""><font face=""Verdana, Arial, Helvetica, sans-serif"" size=""2"">"
'cuerpo = cuerpo & termino
'cuerpo = cuerpo & " introducido en la seccin Diccionario el da "
'cuerpo= cuerpo & fecha
'cuerpo = cuerpo & ". <br><br>Devolver la respuesta al email: "
'cuerpo = cuerpo & email
cuerpo = cuerpo & "<br><br>Para mas informaci&oacute;n consulte su panel de control.<br><br><a href=""http://www.tuweb.es/pc"">www.tuweb.es/pc</a> y entra en la seccin Diccionario en Registro de trminos.</font> </body></html>"

subject = subject & "Se ha realizado una peticin de definicin de trmino"


Mail.Subject = subject
Mail.Body = cuerpo

Mail.IsHTML = True

On Error Resume Next
Mail.Send
If Err <> 0 Then
Response.Write "Error encountered: " & Err.Description
End If
%>

Paola
29 de Octubre del 2003
Eres un sol
muchas gracias
cuidate!!