Visualizzazione dei risultati da 1 a 3 su 3
  1. #1
    Utente di HTML.it
    Registrato dal
    Mar 2003
    Messaggi
    36

    Invio variabili da flash a pop-up asp

    Salve ragazzi, ho la necessità di inviare i campi di una form in flash 5.0 per invio e-mail ad una pop-up contenente un file asp.
    Il problema è che quando il file asp fa il controllo dei campi, non trova nulla! e mi rimanda i mess di errore!
    Sono sicuro che sbaglio qualche cosa.
    Posto i vari script che utilizzo:

    /////////////////////////////
    script nella pagina HTML:
    /////////////////////////////
    <script language = "JavaScript">
    var win = null;
    function NewWindow(mypage,myname,w,h,scroll){
    LeftPosition = (screen.width) ? (screen.width-w)/2 : 0;
    TopPosition = (screen.height) ? (screen.height-h)/2 : 0;
    settings =
    'height='+h+',width='+w+',top='+TopPosition+',left ='+LeftPosition+',scrollbars='+scroll+',noresize'
    win = window.open(mypage,myname,settings)
    }
    </script>

    /////////////////////////////
    script nel tasto Flash 5.0:
    /////////////////////////////
    on (release) {
    getURL("javascript:NewWindow('public/sendmail.asp','nome sito','300','200','yes');");
    }

    /////////////////////////////
    Codice pagina asp:
    /////////////////////////////
    <%
    errore = False
    soggetto = Trim(Request.Form("soggetto"))
    email = Trim(Request.Form("email"))
    oggetto = Trim(Request.Form("oggetto"))
    messaggio = Trim(Request.Form("messaggio"))
    destinatario = "xxx@xxx.it"
    If Len(soggetto) = 0 Then
    errore = True
    Response.Write "Il campo Soggetto è obbligatorio!
    "
    End If
    If Len(oggetto) = 0 Then
    errore = True
    Response.Write "Il campo Nome è obbligatorio!
    "
    End If
    If Len(messaggio) = 0 Then
    errore = True
    Response.Write "Il campo Messaggio è obbligatorio!
    "
    End If
    If Not errore Then
    Set mail = Server.CreateObject("CDONTS.NewMail")
    mail.From = email
    mail.To = destinatario
    mail.Subject = oggetto
    mail.Body = "Email inviata da: " & vbCrLf & soggetto & vbCrLf & "il suo indirizzo di posta elettronica è:" & vbCrLf & email & vbCrLf & "e scrive:" & vbCrLf & messaggio
    mail.MailFormat = 1
    mail.BodyFormat = 1
    mail.Send()
    Set mail = Nothing
    Response.Write "Email inviata con successo!"
    End If
    %>

    Spero proprio che qualcuno mi possa aiutare, grazie!

  2. #2
    Utente di HTML.it
    Registrato dal
    Mar 2003
    Messaggi
    36
    ma nessuno che mi risponde?????

  3. #3
    Utente di HTML.it
    Registrato dal
    Mar 2003
    Messaggi
    36
    cavolo ho letto tutti i post del forum, ma non riesco a farlo funzionare!

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.