este es el que llama...
<%
‘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 = direccion@tudominio.
com ‘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
%>
y una p´´agina de agradecimiento...
<html>
<head>
</head>
<body>
Gracias WEY........
</body>
</html>
en que estoy mal...
cuando envio me dice que no encuentra la página...
<div align=center>
<param name=movie value=http://www.compuviper.com/montejo/firma.swf>
<param name=quality value=high><embed src=http://www.guerrerohermida.com.mx/firma.swf WIDTH=200 HEIGHT=75>
</embed></div>