Ver Mensaje Individual
  #1 (permalink)  
Antiguo 23/11/2007, 07:47
T1000
 
Fecha de Ingreso: noviembre-2006
Mensajes: 50
Antigüedad: 17 años, 5 meses
Puntos: 0
Problemas con email en flash con ASP y CDO

Hola les queria consultar algo. Estoy teniendo un problema para mandar un email desde mi pelicula Flash, utilizo ASP.

Paso a detallar:

Flash AS:

Primero Frame

Código:
//Declaro las variables para enviar y para recibir
var envio_lv:LoadVars = new LoadVars();
var recibir_lv:LoadVars = new LoadVars();
//Función que envia el forumlario
function enviarMail() {
	envio_lv.asunto = asunto_txt.text;
	envio_lv.email = email_txt.text;
	envio_lv.cuerpo = cuerpo_txt.text;
	envio_lv.sendAndLoad("email.asp", recibir_lv, "POST");
	
}
//Función que procesa los datos recibidos del servidor
recibir_lv.onLoad = function(exito) {
	if (exito) {
		//estado_txt.text = this.estado;
		estado_txt.text = "eMail enviado!";		
	} else {
		
		estado_txt.text = "Error en la aplicación de correo";
	}
};
Tengo 3 TextInput:
1- Email instanciado como email_txt
2- Asunto instanciado como asunto_txt
3- Comentario instanciado como cuerpo_txt

Tengo un TextoDinamico:
Instanciado como estado_txt

Y tengo boton con esta accion:

Código:
on (release) {
	estado_txt.text = "Enviando su correo ...";
	enviarMail();
}
Este seria el codgio de mi ASP:

Código:
<%

Set oMail = Server.CreateObject ("CDONTS.NewMail")

oMail.BodyFormat = 0
oMail.MailFormat = 0

Remitente = Request.Form("email")
Destino = "[email protected]" 'Email de destino

Asunto = Request.Form("asunto")
Cuerpo = Request.Form("cuerpo")

oMail.Send Remitente, Destino, Asunto, Cuerpo

Set oMail = Nothing

%>
estado=Mensaje enviado
El problema seria el siguiente, tengo un IIS y anda perfecto, ahora bien lo subo a un servidor y no soporta CDONTS, soporta CDO.. (estoy hablando del ASP)

Investigue y pude encontrar este link: http://www.w3schools.com/asp/asp_send_email.asp

Osea seria algo asi:

Código:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="[email protected]"
myMail.To="[email protected]"
myMail.TextBody="This is a message."
myMail.Send
set myMail=nothing
%>
Pero no se como poderlo moldiar para lo que yo necesito...

Alguien me podria ayudar???

Si me podrian pasar algun ejemplo de envio de email con ASP con CDO se los agradeceria muchisiimo!!!

Desde ya muchisimas Gracias!!!