Ver Mensaje Individual
  #1 (permalink)  
Antiguo 29/03/2004, 11:27
Avatar de the_LiZaRd_
the_LiZaRd_
 
Fecha de Ingreso: noviembre-2003
Ubicación: Lima
Mensajes: 102
Antigüedad: 21 años, 6 meses
Puntos: 0
ayuda con asp mail por favor

Necesito ayuda por favor es urgente , tengo este formularioy el siguiente asp para mandar .
cuando configuro
mailhost ------pongo mi servidor
mailfrom ------- pongo mi mail
mail.addAddress ------- pongo mi mismo mail

y si funciona ,, me manda ,,
pero cuando hago :
mailhost ------pongo mi servidor
mailfrom ------- pongo mi mail
mail.addAddress ------- pongo otro mail como por ejemplo [email protected]

.... ya no manda me sale el mensaje ke se ha configurado
en el asp ,,. "Error, no se ha podido completar la operación"

ke puede ser ? a ver Ud. ke son expertos ..

otra pregunta como puedo agregale el titulo para el mail ,,




este es mi formulario :

<FORM action=formu01.asp method=post>
<INPUT maxLength=200 size=40 name=nombre>
<INPUT maxLength=200 size=40 name=telefono>
<INPUT maxLength=200 size=40 name=email>
<TEXTAREA id=textarea2 name=comentario rows=4 cols=34></TEXTAREA>

<INPUT id=submit3 type=submit value=Enviar name=submit>
</FORM>



... y este es asp para mandar mail : formu01.asp

<%
'creo el objeto correo
set mail = server.createObject("Persits.MailSender")
'configuro el mensaje
'señalo el servidor de salida para enviar el correo
mail.host = "mail.SERVIDOR.com"
'indico la dirección de correo del remitente
mail.from = "[email protected]"
'indico la dirección del destinatario del mensaje
mail.addAddress "[email protected]"

'Obtengo los datos del formulario
nombre = request.form("nombre")
email = request.form("email")
comentario = request.Form("comentario")
'compongo el cuerpo del mensaje
cuerpo = "Formulario De Nuestra Página Web"& VBNEWLINE & VBNEWLINE
cuerpo = cuerpo & "Nombre: " & nombre & VBNEWLINE
cuerpo = cuerpo & "Email: " & email & VBNEWLINE
cuerpo = cuerpo & "Comentario: " & comentario
'mando el correo...
'indico el cuerpo del mensaje
mail.body = cuerpo
'lo envio
'aseguro que no se presenten errores en la página si se producen
On Error Resume Next
mail.send
if Err ><0 then
response.write "Error, no se ha podido completar la operación"
else
Request.Form("nombre")
'Declaro Saludo de despedida del visitante
saludo = "Gracias por escribirnos:" & nombre & ", el formulario se ha enviado correctamente"
'Muestro saludo
response.write saludo end if
%>


GRACIAS !!!!!!!!!!!!!!!!!!!