problemas con formulario de envio de correo asp

Hercules · #1 (**permalink**) 01/11/2004, 11:37

Amigos tengo un problema en el formulario de envios de correos con Cdont , que me baja de un site.....me sale el sgte error:

Cita:

Tipo de error:
Error de compilación de Microsoft VBScript (0x800A03EA)
Error de sintaxis
/iag/maill.asp, línea 13, columna 70
strBody = strBody & "Este es un mensaje generado por el formulario:" &
---------------------------------------------------------------------^

y este es el codigo entero para que me ayuden a ver cual es el error

pagina de formulario formulario.htm

<html>
<head>
</head>
<body>
<form method="post" action="maill.asp">
<p>Nombre:
<input type="text" name="nom" size="20">
</p>
<p>Empresa:
<input type="text" name="emp" size="20">
</p>
<p>Sugerencias:
<textarea name="sug" cols="35" rows="1"></textarea>
</p>
<p>
<input type="submit" name="Submit" value="Enviar">
<input type="reset" name="Submit2" value="Limpiar">
</p>
</form>
</body>
</html>

pagina de envio de correo

maill.asp

<%
'Creación de variables para almacenar los campos del formulario

Nombre= Request.Form("nom")
Empresa= Request.Form("emp")
Sugerencias= Request.Form("sug")

strTo = "[email protected]" ' Esta es una dirección que corresponda a
nuestro servidor
strSubject = "Envio de sugerencias de: " & Nombre

strBody = "<html><body>"
strBody = strBody & "Este es un mensaje generado por el formulario:" &
"<br><br>"
strBody = strBody & "Nombre: "& Nombre &"<br>"
strBody = strBody & "Empresa: "& Empresa &"<br>"
strBody = strBody & "Sugerencias: "& Sugerencias &"<br>"
strBody = strBody & "</body></html>"

Set objCDOMail = Server.CreateObject("CDONTS.NewMail") 'Creación del objeto

objCDOMail.From = "[email protected]" 'No hay problema en que sea la
misma que la anterior.
objCDOMail.To = strTo
objCDOMail.Subject = strSubject

objCDOMail.BodyFormat=0 'Estas dos línes
objCDOMail.MailFormat=0 'permiten formatear mejor el mensaje

objCDOMail.Body = strBody
objCDOMail.Send 'Envía el mail
Set objCDOMail = Nothing
'Response.redirect "gracias.html"
' O bien podemos ahorrar una página y escribir algo como
Response.write "Gracias por enviarnos sus sugerencias"
%>

ayuda please

gracias amigos

Myakire · #2 (**permalink**) 01/11/2004, 12:40

En ASP el código debe ir un una sola linea, a menos que le indiques que sigue en la siguiente por medio de un guión bajo.

strBody = strBody & "Este es un mensaje generado por el formulario:<br><br>"

o bien

strBody = strBody & "Este es un mensaje generado por el formulario:" & _
"<br><br>"

Saludos