Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 17
  1. #1
    Utente di HTML.it L'avatar di camel
    Registrato dal
    Jun 2002
    Messaggi
    252

    Spedizione dati form via mail

    sono riuscito finalmente a creare la struttura di un form (possibilità di inserire nome e cognome) dove l'utente può inserire i suoi dati:

    <form method="post" action="../bong/prova.asp">

    <select name="selezione">
    <option value="01">BRASILE</option>
    <option value="02">INVERNO</option>
    <option value="03">SARDEGNA</option>
    </select>

    <input type="text" name="mome" size="12" maxlength="20">
    <input type="text" name="cognome" size="12" maxlength="20">

    <input name="Submit" type="submit" class="text-INVIA" value="Enter">

    </form>

    ... in questo modo quando premo Enter vengo inviato verso prova.asp,

    io vorrei che questi dati fossere inviati via mail..

    Qualche consiglio?

  2. #2
    Con request.form(nomecampo) prendi i dati che hai inviato e poi usi questo script per inviare la mail

    Dim objMail
    Dim sTo
    Dim sFrom
    Dim sSubject
    Dim sTextMail

    Set objMail = Server.CreateObject("CDO.Message")
    objMail.From = sFrom
    objMail.To = sTo
    objMail.Subject= sSubject
    objMail.HTMLBody = sTextMail

    objMail.Send
    http://www.puntoexewld.com

  3. #3
    Utente di HTML.it L'avatar di camel
    Registrato dal
    Jun 2002
    Messaggi
    252
    ho fatto una prova con

    Dim objMail
    Dim sTo
    Dim sFrom
    Dim sSubject
    Dim sTextMail

    Set objMail = Server.CreateObject("CDO.Message")
    objMail.From = "m.bant@hotmail.com"
    objMail.To = "mbant@hotmail.com"
    objMail.Subject= "Prova"
    objMail.HTMLBody = ".........testo..........."

    objMail.Send

    .. non mi ha dato errore ma non ha inviato la mail... serve qualcos'altro?

    Grazie

  4. #4
    Prova a mattere una gestione degli errori per capirci dentro qualcosa di più:

    On Error Resume Next

    Dim objMail
    Dim sTo
    Dim sFrom
    Dim sSubject
    Dim sTextMail

    Set objMail = Server.CreateObject("CDO.Message")
    objMail.From = "m.bant@hotmail.com"
    objMail.To = "mbant@hotmail.com"
    objMail.Subject= "Prova"
    objMail.HTMLBody = ".........testo..........."

    objMail.Send

    If err.number <> 0 Then
    response.write "errore"
    Else
    response.write "OK"
    End if

    Set objMail = Nothing
    http://www.puntoexewld.com

  5. #5
    Utente di HTML.it L'avatar di camel
    Registrato dal
    Jun 2002
    Messaggi
    252
    ho provato e mi ha risposto OK...

  6. #6
    Utente di HTML.it L'avatar di camel
    Registrato dal
    Jun 2002
    Messaggi
    252
    ... ma la mail non è arrivata!

    Serve qualcosa sul server?

  7. #7
    mmmmmm......
    ho provato con il mio pc, dimmi se ti è arrivata la mail.

    Il server dovrebbe già essere predisposto per utilizzare l'oggetto
    http://www.puntoexewld.com

  8. #8
    Utente di HTML.it L'avatar di camel
    Registrato dal
    Jun 2002
    Messaggi
    252
    scusami... prova su quest'indirizzo:

    mbanterl@libero.it

  9. #9
    ok fatto
    http://www.puntoexewld.com

  10. #10
    Utente di HTML.it L'avatar di camel
    Registrato dal
    Jun 2002
    Messaggi
    252
    Finora niente...

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.