Como mandar mail desde asp
kansaki
22 de Diciembre del 2004
Mi problema es q tengo q poder mandar un mail. Lo estoy intentando con CDONTS.Newmail. En principio el codigo esta bien. Lo adjunto por si tuviera algun fallo:
if request.form("enviar")="si" then
Dim strTo, strSubject, strBody
Dim objCDOMail 'The CDO object
strTo = Request.Form("para")
strSubject = Request.Form("asunto")
strBody = Request.Form("contenido")
strBody = strBody & vbCrLf
Set objCDOMail = Server.CreateObject(CDONTS.NewMail)
objCDOMail.From = "BIRMAVICES.COM <[email protected]>"
objCDOMail.To = ""
objCDOMail.Cc = strTo
objCDOMail.Subject = strSubject
objCDOMail.Body = strBody
objCDOMail.BodyFormat = 0
objCDOMail.Send
Set objCDOMail = Nothing
El servidor donde lo quiero hacer es en ARSYS, no se si es problema de ARSYS o es q estoy haciendo algo mal.Si alguien me puede resolver estoy, o decirme otro metodo q me pueda servir, se lo agradeceria.
Mucha gracias
if request.form("enviar")="si" then
Dim strTo, strSubject, strBody
Dim objCDOMail 'The CDO object
strTo = Request.Form("para")
strSubject = Request.Form("asunto")
strBody = Request.Form("contenido")
strBody = strBody & vbCrLf
Set objCDOMail = Server.CreateObject(CDONTS.NewMail)
objCDOMail.From = "BIRMAVICES.COM <[email protected]>"
objCDOMail.To = ""
objCDOMail.Cc = strTo
objCDOMail.Subject = strSubject
objCDOMail.Body = strBody
objCDOMail.BodyFormat = 0
objCDOMail.Send
Set objCDOMail = Nothing
El servidor donde lo quiero hacer es en ARSYS, no se si es problema de ARSYS o es q estoy haciendo algo mal.Si alguien me puede resolver estoy, o decirme otro metodo q me pueda servir, se lo agradeceria.
Mucha gracias
elchiqui
22 de Diciembre del 2004
Prueba con esto:
<%
strHost = "smtp.dominio.cl"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = strHost
Mail.From = "[email protected]"
Mail.FromName = "dominio.cl"
Mail.AddAddress "[email protected]"
Mail.Subject = "midominio Internacional"
Mail.IsHTML = True
Mail.Body = "<html><h1>midominio.cl Internacional</h1><br><br>Visite la Administración del sitio en http://www.eldominio.cl<br></html>"
strErr = ""
bSuccess = False
On Error Resume Next ' errores
Mail.Send ' send message
If Err <> 0 Then ' error
strErr = Err.Description
else
bSuccess = True
End If
%>
Teloexplico, yo tambien trabajo en arsys, si tu servidor no es de NT(IIS), no vale crear el objeto CDONTS ese, hay que hacerlo con esto...
Del ejemplo q te he pasado ten en cuenta:
1_ la maquina de correo: lo de smtp.dominio.cl,
tienes que buscar tu maquina de correo, vamos el
host encargado del correo (smtp)
2_ solo te dejara enviar correo con una cuenta
que exista en el from.
si tienes poblemas mandame un e-mail, pero te advierto q no puedo leer con mucha regularidad el
correo asi que te mando el enlace donde lo encontre:
http://www.soloasp.com.ar/vermensaje2.asp?idmensaje=2891&busca=mail&idforo=1
<%
strHost = "smtp.dominio.cl"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = strHost
Mail.From = "[email protected]"
Mail.FromName = "dominio.cl"
Mail.AddAddress "[email protected]"
Mail.Subject = "midominio Internacional"
Mail.IsHTML = True
Mail.Body = "<html><h1>midominio.cl Internacional</h1><br><br>Visite la Administración del sitio en http://www.eldominio.cl<br></html>"
strErr = ""
bSuccess = False
On Error Resume Next ' errores
Mail.Send ' send message
If Err <> 0 Then ' error
strErr = Err.Description
else
bSuccess = True
End If
%>
Teloexplico, yo tambien trabajo en arsys, si tu servidor no es de NT(IIS), no vale crear el objeto CDONTS ese, hay que hacerlo con esto...
Del ejemplo q te he pasado ten en cuenta:
1_ la maquina de correo: lo de smtp.dominio.cl,
tienes que buscar tu maquina de correo, vamos el
host encargado del correo (smtp)
2_ solo te dejara enviar correo con una cuenta
que exista en el from.
si tienes poblemas mandame un e-mail, pero te advierto q no puedo leer con mucha regularidad el
correo asi que te mando el enlace donde lo encontre:
http://www.soloasp.com.ar/vermensaje2.asp?idmensaje=2891&busca=mail&idforo=1
dd
22 de Diciembre del 2004
cdo lo deshabilitan en muchos iSPs por motivos de seguridad. segurametne tengan aspemail algo parecido