MAil form semplice ma non funziona

[Alejandro]

Ecco il mio mail form:

3 spazi per scrivere 3 testi input
il codice sul bottone invio è questo:

on (release) {
getURL(spedisci+"?subject="+soggetto+"&body="+"Nom e: "+nome+" commenti: "+commenti+" mail: "+mail);
}

Sul primo frame visibile del form (c'è un animazione che lo nasconde all'inizio) il codice è questo

email = "info@dynamicstudios.it";
soggetto = "Commenti dal sito Dynamic Studios";
spedisci = "mailto:"+"<"+email+">";

Mi è stato detto di mettere anche stop(); all'inizio di quest'ultimo codice ma mi ferma l'animazione.

AIUTOOOOOOOOOOOOO!!!

[tigerjack]

non ho capito il tuo problema.

Puoi rispiegare?

tiger

[Alejandro]

Si certo. ho un form in asp che non mi funziona. Il mio server è su aruba. Dentro il file asp ecco cosa ho scritto

Set objMail = Server.CreateObject("CDONTS.NewMail")
objmail.From = "WebSite@alek.it"
objmail.To = "info@dynamicstudios.it"
objmail.Subject = "WebSite@alek.it"
objmail.BodyFormat = 0
objmail.mailFormat = 0
objmail.Body = msg
objMail.Send
Set objMail = Nothing

Nel comando del pulsante invece ho scritto:

on (release) {
modulo = new LoadVars();
modulo.nome = nome;
modulo.email = email;
modulo.commenti = commenti;
modulo.send("form.asp", "_top", "POST");
}

Il sito è www.dynamicstudios.it
Mi dai un aiutino? Dove ho sbagliato? Poi quando digiti sul form anche se cambi pagina del menu e dopo torni indietro rimane cio che hai digitato.

[tigerjack]

non ho capito perché fai aprire una nuova pagina "form.asp" per l'invio dell'e-mail dal server.

cmq al pulsante cambia così lo script:

on (release) {
    modulo = new LoadVars();
    modulo.nome = nome;
    modulo.email = email;
    modulo.commenti = commenti;
    modulo.onLoad = function(success) {
        if (success) {
            // istruzioni per il caricamento corretto
        } else {
            // istruzioni per l'errore di caricamento
        }
    };
    modulo.sendAndLoad("form.asp", modulo, "POST");
}

nella pagina form.asp

<%
Set objMail = Server.CreateObject("CDONTS.NewMail") 
objmail.From = Request.Form("email") 
objmail.To = "info@dynamicstudios.it" 
objmail.Subject = "Richiesta Informazioni" 
objmail.Body = "Utente = " &  Request.Form("nome")  & vbCrLf & "commenti = " & Request.Form("commenti")
objmail.BodyFormat = 0 
objmail.mailFormat = 0 
objMail.Send 
Set objMail = Nothing
%>

tiger

[Alejandro]

Allora l'intero file asp è ora strutturato cosi:

<%

nome=request("nome")
commenti=request("commenti")
email=request("email")


msg = msg & "

<font size=3 face=Verdana>Modulo </font></p>"
msg = msg & "<font size=2 face=Verdana>Data : " & now() & "</font>
"
msg = msg & "<font size=2 face=Verdana>Nome: " & nome & "</font>
"
msg = msg & "<font size=2 face=Verdana>Email: " & email & "</font>
"
msg = msg & "<font size=2 face=Verdana>Commenti: " & commenti & "</font>
"


Set objMail = Server.CreateObject("CDONTS.NewMail")
objmail.From = Request.Form("email")
objmail.To = "info@dynamicstudios.it"
objmail.Subject = "Richiesta Informazioni"
objmail.Body = "Utente = " & Request.Form("nome") & vbCrLf & "commenti = " & Request.Form("commenti")
objmail.BodyFormat = 0
objmail.mailFormat = 0
objMail.Send
Set objMail = Nothing


response.redirect "grazie.htm"
%>


E' giusto? per quanto riguarda il bottone ho copiato pari pari quello che mi hai scritto tu............dovevo cambiare qualcosa?
Continua a non funzionare......lo provi anche tu nel sito?
Un altra cosa mi rimane cio che digito anche quando cambio pagina.
E poi un ultimo aiutino che comando metto nel pulsante reset?

saluti e grazie mille Alek


p.s. non è che aruba da problemi con il componente del server che fa funzionare questo...Set objMail = Server.CreateObject("CDONTS.NewMail")????

[tigerjack]

[QUOTE]Originariamente inviato da Alejandro
Allora l'intero file asp è ora strutturato cosi:

<%

nome=request("nome")
commenti=request("commenti")
email=request("email")


msg = msg & "

<font size=3 face=Verdana>Modulo </font></p>"
msg = msg & "<font size=2 face=Verdana>Data : " & now() & "</font>
"
msg = msg & "<font size=2 face=Verdana>Nome: " & nome & "</font>
"
msg = msg & "<font size=2 face=Verdana>Email: " & email & "</font>
"
msg = msg & "<font size=2 face=Verdana>Commenti: " & commenti & "</font>
"


Set objMail = Server.CreateObject("CDONTS.NewMail")
objmail.From = Request.Form("email")
objmail.To = "info@dynamicstudios.it"
objmail.Subject = "Richiesta Informazioni"
objmail.Body = msg
objmail.BodyFormat = 0
objmail.mailFormat = 0
objMail.Send
Set objMail = Nothing


response.write "&saluto=grazie per averci contattato ecc..."
%>



aggiungi un campo di testo dinamico con nome di istanza "saluto" nel frame del form, poi cambia così lo script del pulsante in:

on (release) {
    modulo = new LoadVars();
    modulo.nome = nome;
    modulo.email = email;
    modulo.commenti = commenti;
    modulo.onLoad = function(success) {
        if (success) {
            this.saluto.text = this.saluto
        } else {
            // istruzioni per l'errore di caricamento
        }
    };
    modulo.sendAndLoad("form.asp", modulo, "POST");
}

>Un altra cosa mi rimane cio che digito anche quando cambio pagina.
>E poi un ultimo aiutino che comando metto nel pulsante reset?

on (release) {
   nome = '';
   email = '';
   commenti = '';
}

>p.s. non è che aruba da problemi con il componente del server che >fa funzionare questo...Set objMail = Server.CreateObject("CDONTS.NewMail")????


scrivi una richiesta nel loro FORUM d'ASSISTENZA.



tiger

[Alejandro]

Niente non mi funziona. Se ti mando il fla gli daresti un occhiata? o è chiedere troppo?

saluti

[tigerjack]

manda, dopo aver zippato il fla e il file asp



tigerjack@flashtown.it



tiger