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

problemas con SendAndLoad

Estas en el tema de problemas con SendAndLoad en el foro de Flash y Actionscript en Foros del Web. He hecho un form-Mail, en flash y para pasar las variables a asp uso la siguiente funcion function enviar() { enviar = new LoadVars(); enviar.nombre ...
  #1 (permalink)  
Antiguo 20/05/2005, 05:25
 
Fecha de Ingreso: agosto-2004
Mensajes: 33
Antigüedad: 13 años, 4 meses
Puntos: 0
problemas con SendAndLoad

He hecho un form-Mail, en flash y para pasar las variables a asp uso la siguiente funcion

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("form.asp", enviar, "POST");
}

lo que no se es como lo tengo que recoger en asp yo he puesto lo siguiente es ASP:

<%
Nombre= Request("nombre")
apellido= Request("apellido")
Subject= Request("Subject")
mensaje= Request("mensaje")
Email= Request("MailFrom")

strTo = "[email protected]" '"[email protected]"'
strSubject = "Envio de comentario de: " & Nombre
strBody = "<html><body>"
strBody = strBody & "Este es un mensaje generado por el formulario:" & "<br><br>"
strBody = strBody & "Nombre: "& nombre &"<br>"
strBody = strBody & "apellido: "& apellido &"<br>"
strBody = strBody & "Subject: "& Subject &"<br>"
strBody = strBody & "Email: "& Email &"<br>"
strBody = strBody & "Comentario: "& mensaje &"<br>"
strBody = strBody & "</body></html>"
%>


<%

Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = strSubject
objMessage.Sender = Email
objMessage.To = strTo
objMessage.HTMLBody =strBody
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtpsalida"
'también puedes borrar la línea de SMTP si pones sendusing=1
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objMessage.Configuration.Fields.Update

objMessage.Send
set objmessage=nothing
%>

Se que esto envia mail porque lo he hecho pasandole los valores desde la url pero desde flash no va
__________________
:'(
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 16:21.