Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/09/2008, 01:58
marcia_elemento
 
Fecha de Ingreso: septiembre-2008
Mensajes: 10
Antigüedad: 15 años, 7 meses
Puntos: 0
como hago un formulario asp

hola a todos!! Queria saber si alguien podia ayuidarme es la primera ves q ingreso a un foro. Los formularios me tienen loca!!
Tengo un codigo pero al tratar de completar el fomulario no lo envia dando el error del archivo
f Err ><0 then
response.write "Error, no se ha podido completar la operación"

Les paso el codigo completo y espero si pueden decirme en que me estoy equivocando. Muchas gracias!!

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<%
'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.altlantissport.com.ar"
'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")
pais = request.form ("pais")
localidad = request.form ("localidad")
email = request.form("email")
telefono = request.form("telefono")
title = request.form("title")
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 & "pais:" & pais
cuerpo = cuerpo & "localidad:" & localidad
cuerpo = cuerpo & "email:" & email
cuerpo = cuerpo & "telefono:" & telefono
cuerpo = cuerpo & "title:" & title
cuerpo = cuerpo & "comentario:" & comentario
'mando el correo...
'indico el cuerpo del mensaje
mail.bodytxt = 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("form")
'Declaro Saludo de despedida del visitante
saludo = "Gracias por escribirnos:" & nombre & ", el formulario se ha enviado correctamente"
'Muestro saludo
response.write saludo end if
%>
<html>
<head>
<title>.:GRACIAS POR ESCRIBIRNOS:.</title>
</head>
<body>
</body>
</html>

Saludos!!!!!!!

Última edición por marcia_elemento; 26/09/2008 a las 02:19