form

[irenem]

on (release) {
if (NomeCognome eq "" or email eq "") {
risultato = "ATTENZIONE: i campi contrassegnati con (*) sono obbligatori";
gotoAndStop(31);
} else {
recipient="xxxx@xxxxx.it"
subject="Modulo Contatto"
redirect="http://xxxxxxxxxx.it"
lingua="italiano"
getURL(??????????);
}
}

Sul tasto invio di un form che cosa va inserito in get URL?
Grazie

[crescenzo]

loadVariables("tuapag.asp", this, "POST");oppure
loadvars che è un comando nuovo
per poter inviare le variabili ad una pag asp oppure php la quale invierà il tuo form come mail
fai una ricerca ce ne sono tanti in giro di es

[irenem]

Grazie

[irenem]

Ripensandoci... una cosa, semplice...semplice...

Come è fatta tuapag.asp?

[crescenzo]

una cosa del genere

<%

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@xxxx.it"

	'* voce da modificare con un indirizzo email che funga da mittente: 
			
invioDa =  "tuamail@xxxx.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")

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
%>

modificala e adattala alle tue esigenze
ciao

[irenem]

Adesso provo, grazie mille!

[crescenzo]

di nulla

[irenem]

Ci risono!

'*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")

n =Request.Form("nome")
r =Request.Form("cognome")

Cosa devo mettere nel flash per far passare i dati alla pagina asp?

Grazie

[crescenzo]

fai il tuo form in un mc e poi
al pulsante puoi associare questo codice prevedendo anche un piccolo controllo sui capmi vuoti ed un campo di avvertenza

on (release) {
if (inputnome <> null & inputcogn <> null & inputdata <> null & inputcitta <> null & inputemail <> null & inputtesto <> null ) {
nome = inputnome;
cognome = inputcogn;
email = inputemail;
loadVariables("tuapag.asp", this, "POST");

} else {
out = "* Campo obbligatorio" ;
}
}

[irenem]

es. inputnome lo metto come nome istanza?