Visualizzazione dei risultati da 1 a 7 su 7
  1. #1

    mail cdonts cosa sbaglio?

    cosa sbaglio in questo script di invio mail da form ?

    non funge e non da errori...pagina bianca

    Codice PHP:
    <%
    Dim MiaMailstrIp
    Set MiaMail 
    CreateObject("CDONTS.Newmail")
    strIp Request.ServerVariables("REMOTE_ADDR")


    MiaMail.From request.form("Scuola")
    MiaMail.From request.form("Tipo")
    MiaMail.From request.form("Nome1")
    MiaMail.From request.form("Cognome1")
    MiaMail.From request.form("Telefono")
    MiaMail.From request.form("Email")
    MiaMail.From request.form("Nome2")
    MiaMail.From request.form("Cognome2")
    MiaMail.From request.form("Eta")
    MiaMail.From request.form("Citta")
    MiaMail.From request.form("Amico1")
    MiaMail.From request.form("Amico2")
    MiaMail.From request.form("Amico3")
    MiaMail.From request.form("Squadracuore")
    MiaMail.From request.form("Squadrarivale")
    MiaMail.From request.form("Calciatore")
    MiaMail.From request.form("Dedica")

    MiaMail.To "stanislao.montagna@tin.it"
    MiaMail.Subject "Richiesta libro"
    MiaMail.Body vbCrlf &_
    vbCrlf 
    &_
    ("Questa e-mail è stata inviata il: ") & Now() & vbCrlf &_
    ("da: ") & ("Nome e Cognome: ") & request.form("Nome1") & " " &request.form("Cognome1") & vbCrlf &_
    ("Telefono: ") & request.form("Telefono") & vbCrlf &_
    ("Interessato a: ") & request.form("Tipo") & vbCrlf &_
    ("Scuola: ") & request.form("Scuola") & vbCrlf &_
    ("Email: ") & request.form("Email") & vbCrlf &_
    ("Nome: ") & request.form("Nome2") & vbCrlf &_
    ("Cognome: ") & request.form("Cognome2") & vbCrlf &_
    ("Età: ") & request.form("eta") & vbCrlf &_
    ("Città: ") & request.form("citta") & vbCrlf &_
    ("Amico1: ") & request.form("Amico1") & vbCrlf &_
    ("Amico2: ") & request.form("Amico2") & vbCrlf &_
    ("Amico3: ") & request.form("Amico3") & vbCrlf &_
    ("Squadra del cuore: ") & request.form("Squadracuore") & vbCrlf &_
    ("Squadra rivale: ") & request.form("Squadrarivale") & vbCrlf &_
    ("Calciatore: ") & request.form("Calciatore") & vbCrlf &_
    ("Dedica: ") & request.form("Dedica") & vbCrlf &_


    ("l'indirizzo IP è: ") & strIp vbCrlf
    '("data ed ora di invio: ") & ("Now()") & vbCrlf
    MiaMail.Send
    Set MiaMail = Nothing
    %> 
    grazie infinite
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  2. #2
    Dopo set MiaMail = nothing metti response.write "eseguito"
    Vedi cosa appare.

  3. #3
    mi esce eseguito

    come se tutto fosse andato a buon fine...ma non mi arriva la mail
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  4. #4
    Originariamente inviato da Stanislao
    mi esce eseguito

    come se tutto fosse andato a buon fine...ma non mi arriva la mail
    E' il tuo PC locale che fa da server?

  5. #5
    lo testo on line qui

    LINK

    grazie
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  6. #6
    ho risolto...erano i milioni di MiaMail.from ch enon centravano null!
    ma come ho fatto a non vederli

    ecco il codice funzionante se dovesse servire a qualcuno
    Codice PHP:
    <% 
    Dim MiaMailstrIp 
    Set MiaMail 
    CreateObject("CDONTS.Newmail"
    strIp Request.ServerVariables("REMOTE_ADDR"

    [
    B]MiaMAil.From="info@libellusitalia.com"[/B
    MiaMail.To "montagna@fruitstudios.it" 
    MiaMail.Subject "Richiesta libro" 
    MiaMail.Body vbCrlf &
    vbCrlf 
    &
    ("Questa e-mail è stata inviata il: ") & Now() & vbCrlf &
    ("da: ") & ("Nome e Cognome: ") & request.form("Nome1") & " " &request.form("Cognome1") & vbCrlf &
    ("Telefono: ") & request.form("Telefono") & vbCrlf &
    ("Interessato a: ") & request.form("Tipo") & vbCrlf &
    ("Scuola: ") & request.form("Scuola") & vbCrlf &
    ("Email: ") & request.form("Email") & vbCrlf &
    ("Nome: ") & request.form("Nome2") & vbCrlf &
    ("Cognome: ") & request.form("Cognome2") & vbCrlf &
    ("Età: ") & request.form("eta") & vbCrlf &
    ("Città: ") & request.form("citta") & vbCrlf &
    ("Amico1: ") & request.form("Amico1") & vbCrlf &
    ("Amico2: ") & request.form("Amico2") & vbCrlf &
    ("Amico3: ") & request.form("Amico3") & vbCrlf &
    ("Squadra del cuore: ") & request.form("Squadracuore") & vbCrlf &
    ("Squadra rivale: ") & request.form("Squadrarivale") & vbCrlf &
    ("Calciatore: ") & request.form("Calciatore") & vbCrlf &
    ("Dedica: ") & request.form("Dedica") & vbCrlf &


    ("l'indirizzo IP è: ") & strIp vbCrlf 
    '("data ed ora di invio: ") & ("Now()") & vbCrlf 
    MiaMail.Send 
    Set MiaMail = Nothing 
    response.write "Richiesta inviata con successo!"
    %> 
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

  7. #7
    è difficile associare a questo invio mail un contatore di invii...tipo per esempio un numero d'ordine...vorrei fare qualcosa senza db ,un numero che si incrementi ad ogni richiesta mail..magari un .txt..?
    sapreste darmi qualche dritta?

    grazie infinite
    L'intuizione creativa più di ogni altra cosa è l'unico elemento per cui la vita vale la pena di essere vissuta (D.W)

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 © 2026 vBulletin Solutions, Inc. All rights reserved.