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