scusa se ti rospondo solo adesso
se hai dato delle variabili ai campi del tuo form in flash
allora la pag asp usando CDosys

codice:
<%

on error resume next

if err.number>0 then
					strOutput= "Si è verificato un errore nell'invio dei dati tramite posta elettronica. I dati sono stati comunque salvati regolarmente."
				else
					strOutput ="Richiesta inoltrata correttamente, sarà nostra cura inviarLe una conferma della richiesta"
				end if

response.write "inserimento avvenuto con successo"


DIM corpoMessaggio, numeroCampi, invioA, invioDa, nomeDominio, indirizzoIp, modulo, browserSistemaOperativo

	
	
invioA =  "tuamail@es.it"

	'* voce da modificare con un indirizzo email che funga da mittente: 
			
invioDa =  "tuamail@es.it"



nomeDominio 				= Request.ServerVariables("HTTP_HOST")
indirizzoIp					= Request.ServerVariables("REMOTE_ADDR") 
modulo						= Request.ServerVariables("HTTP_REFERER")
browserSistemaOperativo		= Request.ServerVariables("HTTP_USER_AGENT")

	'*rilevo i campi del form
corpoMessaggio = corpoMessaggio & vbCrLf &"<font size=2>Nome : " & Request.Form("nome")
corpoMessaggio = corpoMessaggio & vbCrLf & "Cognome : " & Request.Form("cognome")
corpoMessaggio = corpoMessaggio & vbCrLf &"E-mail : " & Request.Form("email")
corpoMessaggio = corpoMessaggio & vbCrLf &"Data di nascita : " & Request.Form("datanasc")
corpoMessaggio = corpoMessaggio & vbCrLf &"Ultima classe frequentata con esito positivo : " & Request.Form("classe1")
corpoMessaggio = corpoMessaggio & vbCrLf &"Anno scolastico dell'ultima slasse frequentata : " & Request.Form("classe2")
corpoMessaggio = corpoMessaggio & vbCrLf &"Tipo di scuola : " & Request.Form("scuola")
corpoMessaggio = corpoMessaggio & vbCrLf &"Città di residenza : " & Request.Form("citta")
corpoMessaggio = corpoMessaggio & vbCrLf &"
Richiesta : " & Request.Form("testo")


n =Request.Form("nome")
r =Request.Form("cognome")
	'* creo gli oggetti cdosys sul server e li gestisco
	
DIM iMsg, Flds, iConf

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "smtp.aruba.it" 
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
   Set .Configuration = iConf
   .To = invioA
   .From = Request.Form("email")
   .Sender = invioDa
   .Subject = "Richiesta Informazioni dal sito " & nomeDominio
   .TextBody = "Questi i dati inseriti nel modulo dei contatti per la richiesta di informazioni dall'utente con indirizzo IP " & indirizzoIp & "  . " & vbCrLf & corpoMessaggio & ""
   .Send
End With
%>
basta cambiare i nome dei campi mettere l'indirzzo che desideri e se hai fatto bene il form in fla dovrebbe funzionare
ciao