Visualizzazione dei risultati da 1 a 6 su 6

Discussione: Form Flash + asp

  1. #1
    Utente di HTML.it
    Registrato dal
    May 2002
    Messaggi
    708

    Form Flash + asp

    da un form in flash sto cercando di giungere all'invio di una mail

    nel file email.asp ho:

    <%@ LANGUAGE="VBSCRIPT" %>
    <% Option Explicit %>
    <%
    Dim mail
    Set mail = Server.CreateObject("CDONTS.NewMail")

    mail.From = Request.Form("nome")
    mail.To = Request.Form("destinatario")
    mail.Subject = Request.Form("oggetto")
    mail.Body = "NOME: " & Request.Form("nome") &vbCrlf &vbCrlf & "INDIRIZZO: " & Request.Form("indirizzo") &vbCrlf &vbCrlf & "EMAIL: " & Request.Form("email") &vbCrlf &vbCrlf & "MESSAGGIO: " & Request.Form("messaggio")

    mail.Importance = 2
    mail.Send
    Set mail = Nothing

    %>

    in flash ho i miei campi di testo
    nome,oggetto,indirizzo,email e messaggio


    Invio le varibili all'asp così:
    on (release) {
    tmp = Controlla();
    destinatario="mia@email.it";
    oggetto="Richiesta info da www.miosito.it";
    if(tmp == 0){
    _root.cont._visible=1;
    cont.verifica = "Verificare i Dati Inseriti!";
    }else{
    loadVariablesNum("ASP/email.asp", "", "POST");

    }

    la cosa strana è che il form ogni tanto funziona e ogni tanto no VVoVe:

    qualcuno può aiutarmi?

  2. #2
    non è che per caso non ti funzioni quando i campi nome e destinatario non sono compilati con indirizzi email formalmente corretti?
    "...non è detto che sia tardi se non guardi che ora è..."

  3. #3
    Utente di HTML.it
    Registrato dal
    May 2002
    Messaggi
    708
    Originariamente inviato da Raffa62
    non è che per caso non ti funzioni quando i campi nome e destinatario non sono compilati con indirizzi email formalmente corretti?
    ho fatto un paio di prove
    direi che non mi funziona non quando il campo email non è correttamente formattato ma bensì
    quando nel campo nome
    sono presenti due parole separate da spazio, ad esempio nome e cognome:

    mario Rossi

  4. #4
    Originariamente inviato da Sinatra
    ma bensì
    quando nel campo nome
    sono presenti due parole separate da spazio, ad esempio nome e cognome:

    mario Rossi
    ovvio visto che in asp hai

    mail.From = Request.Form("nome")

    se nei campi from e to non ci sono due indirizzi formalmente validi il server non invia la mail
    "...non è detto che sia tardi se non guardi che ora è..."

  5. #5
    Utente di HTML.it
    Registrato dal
    May 2002
    Messaggi
    708
    Originariamente inviato da Raffa62
    ovvio visto che in asp hai

    mail.From = Request.Form("nome")

    se nei campi from e to non ci sono due indirizzi formalmente validi il server non invia la mail
    ovvio per te che mastichi l'asp

    per evitare ho messo
    mail.From = Request.Form("email")

    grazie

  6. #6
    prova ad usare questo codice ovviamente devi cambiare i campi
    e gli indirizzi un 'altra cosa il tuo server supporta ancora cdonts ??

    <%


    on error resume next
    Set mail = Server.CreateObject("CDONTS.NewMail")
    strFrom = "Webmaster <indirizzo e-mail valido>"
    mail.From = strFrom
    mail.to ="mittente"
    strBody="<font color=red>titolo</font>

    "
    strBody=strBody & "Dettagli <hr>"
    strBody=strBody & "Nome e Cognome: "& Request("nome") &"
    "
    strBody= strBody & "Circolo di appartenenza: "& Request("circolo") &"
    "
    strBody=strBody & "Attuale Classifica FIT: "& Request("classifica") &"
    "
    strBody=strBody & "Data di nascita: "& Request("data") &"
    "
    strBody=strBody & "Luogo di nascita : "& Request("luogo") &"
    "
    strBody=strBody & "Città : "& Request("citta") &"
    "
    strBody=strBody & "E-mail: "& Request("email") &"
    "
    strBody=strBody & "Telefono: "& Request("tel") &"
    <hr>"
    strBody = strBody & "Richiesta effettuata il: " & now() &"
    "
    strBody = strBody & "Indirizzo I.P. richiedente: "& request.ServerVariables("REMOTE_ADDR") &"

    "
    mail.Body = strBody
    mail.Subject = "Richiesta sponsorizzazione"
    mail.mailFormat=0
    mail.bodyFormat=0
    mail.Send
    set mail = nothing

    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 ="Riciesta inoltrata correttamente, sarà nostra cura inviarLe una conferma della prenotazione"
    end if

    response.write "inserimento avvenuto con successo"

    %>

    a me funziona
    ciao fammi sapere

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.