Ver Mensaje Individual
  #6 (permalink)  
Antiguo 29/05/2006, 13:17
Avatar de VaIvan
VaIvan
 
Fecha de Ingreso: octubre-2005
Ubicación: Mexico
Mensajes: 138
Antigüedad: 19 años, 6 meses
Puntos: 2
envia mail con cdonts

cdonts es un objeto que por alguna razon extraña
windows xp no tiene, y es necesario un dll.
que tienes que pegar en el system de tu maquina
antes de enviar formulario por mail.

aqui esta el tutorial completo:
http://www.programacion.com/asp/articulo/cdonts/

consigue este cdonts.dll
despues de pegar la dll
aqui
ESTE ES EL CODIGO PARA ENVIAR A UN EMAIL.
<%
Dim objMail 'Declaramos variable
Set objMail = Server.CreateObject("CDONTS.NewMail") 'Abrimos el componente

objMail.From = request.form("email") 'Quién envía el correo
objMail.Subject = "Formulario desde Internet" 'Tema del mensaje
objMail.To = "[email protected]" 'A quién enviamos el mensaje
objMail.Body = "Nombre:"&request.form("nombre")&Chr(13)&"Puesto:" &request.form("puesto")&Chr(13)&"Empresa:"&request .form("empresa")&Chr(13)&"Estado:"&request.form("e stado")&Chr(13)&"Comentarios:"&request.form("comen tarios") ' Contenido del mensaje
objMail.Send 'Enviamos el mensaje
set objMail = nothing 'Cerramos el componente
%>