Ver Mensaje Individual
  #1 (permalink)  
Antiguo 11/01/2007, 17:55
alejandra2706
 
Fecha de Ingreso: enero-2007
Mensajes: 5
Antigüedad: 18 años, 4 meses
Puntos: 0
Urgente!!! Enviar formulario a correo

hola estoy realizando una pagina en asp, donde se ingresen datos a un formulario y luego puedan ser enviados al correo de la persona.... he probado con varios codigos y ninguno me funciona... En el servidor en el q estoy trabajando tengo el componente ASPEmail instalado sin embargo cuando pruebo la pag, dice q tiene un problema y no puede ser mostrada. (creo q el problema esta en la direccion del servidor es mail0.vendns.com pero no se si la debo colocar completa o de otra manera)

El codigo q utilizo es el siguiente:

<%
'Recojemos los datos del formulario
tunombre=Request.Form("tunombre")
sunombre=Request.Form("sunombre")


'Especificamos el servidor SMPT del correo y creamos el objeto
strHost = "mail0.vendns.com"
Set Mail = Server.CreateObject("Persits.MailSender")

Mail.Host = strHost
Mail.Port = 25

Mail.From = Request("tuemail")
Mail.FromName = "WebExperto.com"
Mail.AddAddress = Request("suemail")

'Asunto del mensaje
Mail.Subject = "Un amigo te recomienda WebExperto.com"
'Cuerpo del mensaje en HTML
Mail.IsHTML = True
Mail.Body = "

Hola! Tu amigo "&tunombre&" ("&tuemail&") recomienda que ingreses a un sitio que posee contenido de utilidad para webmasters.

Te esperamos!

"

strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
else
bSuccess = True
End If
%>


Agradezco su ayuda, ya q es urgente... de antemano muchas gracias!!!!