Foros del Web » Creando para Internet » Flash y Actionscript »

Enviar email con Flash

Estas en el tema de Enviar email con Flash en el foro de Flash y Actionscript en Foros del Web. Buenas a todos: Tengo un formulario en flash, y en el botón de envío tengo el siguiente código: ###################################### function borrar() { nombre = ""; ...
  #1 (permalink)  
Antiguo 16/11/2005, 02:41
 
Fecha de Ingreso: diciembre-2001
Ubicación: Bilbao
Mensajes: 182
Antigüedad: 22 años, 3 meses
Puntos: 0
Enviar email con Flash

Buenas a todos:

Tengo un formulario en flash, y en el botón de envío tengo el siguiente código:

######################################
function borrar() {
nombre = "";
apellido = "";
MailFrom = "";
subject = "";
mensaje = "";
}
function enviar() {
enviar = new LoadVars();
enviar.nombre = nombre;
enviar.apellido = apellido;
enviar.MailFrom = MailFrom;
enviar.subject = subject;
enviar.mensaje = mensaje;
enviar.onLoad = function(success) {
status = "Su Mensaje Fue enviado Correctamente";
borrar();
};
enviar.sendAndLoad("paginadeenvio.asp", enviar, "POST");
}
###################

En la página paginadeenvio.asp tengo el siguiente código:

########################

<%
Set Correo=CreateObject("CDONTS.NewMail")
Correo.From=Request.Form("De") & "<[email protected]>"

Correo.Subject="Petición de información"
Correo.To = "Info"& "<[email protected]>"
Correo.Body="Nombre: "& Request.Form("De") & Chr(10) & "Empresa: "& Request.Form("empresa") & Chr(10) & "Dirección: "& Request.Form("direccion") & Chr(10) & "Teléfono: "& Request.Form("telefono") & Chr(10) & "Fax: "& Request.Form("fax") & Chr(10) & "E-mail: "& Request.Form("emilio") & Chr(10) & "Web: "& Request.Form("web") & Chr(10) & "Tipo de Empresa: "& Request.Form("tipo") & Chr(10) & Chr(10) & "Otros: "& Request.Form("otros") & Chr(10) & "Nº Trabajadores: "& Request.Form("ntrab") & Chr(10) & "Nº Servidores: "& Request.Form("nserv") & Chr(10) & "Nº ordenadores: "& Request.Form("norde") & Chr(10) & "Dispone de red: "& Request.Form("red") & Chr(10) & "Tiene Cubierta esta necesidad: "& Request.Form("necesidad") & Chr(10) & "Está Satisfecho: "& Request.Form("satisfecho") & Chr(10) & Chr(10) & "Comentarios: "& Chr(10) & Request.Form("comentarios")
Correo.Send
Set Correo=Nothing
%>

########################


EL problema es que no me envía nada. ¿Dónde puede estar el error? Los dos ficheros están en el mismo directorio. No sé dónde puede estar el error, si me pueden ayudar se lo agradecería.

Gracias de antemano.
__________________
Un saludo, y gracias de antemano.

Iker M.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 22:05.