ciao a tutti,

uso flash 8 pro,

da un form flash sto cercando di inviare i dati ad una pagina asp ma, le variabili nella pagina asp risultano sempre vuote.

Ho due pagine: una html che contiene il mio form swf e una pagina ASP con il codice per prelevare le variabili.

Inserisco il codice relativo all'invio delle variabili dal form e alla pagina email.asp che dovrebbe recuperare i dati:

FORM FLASH:

codice:
	/*i valori passati assegnati alla variabile LoadVars
	arrivano da variabili campo di testo*/
	
	var invia = new LoadVars();
	invia.nome = nome;
	invia.cognome = cognome;
	invia.email = mail;
	invia.oggetto = oggetto;
	invia.messaggio = info;
	
	invia.send("email.asp","_blank","POST");
(non ho messo il metodo ".text" come ad esempio "invia.nome = nome.text;" volutamente e se faccio una trace dei valori passati, le stringhe risultano corrette)

PAGINA EMAIL.ASP:


codice:
<%
Dim objMail, objConfig, nome, cognome, email, oggetto, messaggio

' Crea l'oggetto email
Set objMail = CreateObject("CDO.Message")
' Dimensiona l'oggetto configurazione
Set objConfig = Server.CreateObject ("CDO.Configuration")
     
' Imposta le configurazioni
With objConfig
                        
' Server SMTP di uscita
' ATTENZIONE! Usare il proprio indirizzo di server email!
' E' FONDAMENTALE per l'invio della email
  .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.tele2.it"

' Porta SMTP
  .Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

' Porta CDO
  .Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

' Timeout
  .Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
  .Fields.Update
End With
     
nome = Request.Form("invia.nome")
cognome = Request.Form("invia.cognome")
email = Request.Form("invia.email")
oggetto = Request.Form("invia.oggetto")
messaggio = Request.Form("invia.messaggio")


' Assegna le configurazioni
Set objMail.Configuration = objConfig
     
' Assegna all'oggetto le proprietà necessarie
objMail.From =  email ' Mittente
objMail.To = "lucabellomi@gmail.com"' Destinatario
objMail.Subject = oggetto ' Oggetto
objMail.HTMLBody = messaggio' Messaggio
     
' Invia l'email
objMail.Send(objMail)


Set objMail = Nothing
     
Response.Write("Email inviata correttamente ")
Response.Write("all'indirizzo ")
Response.Write(email)

%>
Ormai ho fatto mille prove e non so + come risolvere..

Grazie e a presto!