• User Attivo

    Potrei utilizzare quel codice per per aggiungere altri campi tipo:
    NOME, COGNOME, CITTA' ecc...
    e se si come si fà ?
    Premetto che di ASP sono zero assoluto sto solo seguendo un libro sul dreamweaver e le pagine dinamiche !
    Grazie !


  • Moderatore

    Si, hai ragione, mi era completamente sfuggito l'ultimo post 😄

    Questo è il form:

    
    <form method="post" action="inviomail.asp">
      Nome <input type="text" name="nome" id="nome"/><br/>
      Cognome<input type="text" name="cognome" id="cognome"/><br/>
      Città<input type="text" name="citta" id="citta"/><br/>
      Email<input type="text" name="email" id="email"/><br/>
    </form>
    
    

    Mentre questa è la pagina che invia i dati (inviomail.asp):

    
     theSchema="http://schemas.microsoft.com/cdo/configuration/" 
     Set cdoConfig=server.CreateObject("CDO.Configuration")   
     cdoConfig.Fields.Item(theSchema & "sendusing")=2 
     cdoConfig.Fields.Item(theSchema & "smtpserver")="server.smtp.com" 
     cdoConfig.Fields.Update 
      
     set cdoMessage=Server.CreateObject("CDO.Message") 
     cdoMessage.Configuration=cdoConfig 
      
     cdoMessage.From=Request.Form("email") 
     cdoMessage.To="[email protected]" 
     cdoMessage.Subject=Request.Form("subject") 
    cdomessage.TextBody="Nome:" & request.form("nome") & "Cognome:" & Request.form("cognome") & "Citta:" & request.form("citta")
     cdoMessage.Send 
      
     Set cdoMessage=Nothing 
     Set cdoConfig=Nothing 
    
    
    

    Ciao:ciauz:


  • User Attivo

    Scusami se non ti ho risposto, sono tornato ora dalle ferie, provo e ti farò sapere grazie !


  • User Attivo

    Il codice funziona 😄 yahoooooooo
    Ancora una cosa...l'arrivo dell'email mi appare con le voci tutte unite così:

    Nome:TizioCognome:CaioCittaomodossolaEmail:[email protected]

    Come posso fare per mettere dello spazio per essere un pò più ordinata ?
    Grazie !


  • Moderatore

    Il codice che ti ho dato era un po' demo, infatti non ho curato molto l'aspetto :), cmq per separare le voci:

    
    cdomessage.TextBody="Nome:" & request.form("nome") & "<br/>Cognome:" & Request.form("cognome") & "<br/>Citta:" & request.form("citta")
    
    

    Ciao


  • User Attivo

    :bho: C'è qualcosa che non và.....
    con l'aggiunta di <br/> mi viene questa email...

    Nome:Tizio<br/>Cognome:Caio<br/>Cittaomodossola<br/>[email protected]<br/>Commenti:yahoooo

    siamo sicuri della posizione ?


  • User Attivo

    Sul libro suggerisce di utilizzare l'espressione (   )
    ho provato ma non funziona....:bho: :arrabbiato:


  • User Attivo

    Dove sei Legolas 😢


  • Moderatore

    Ciao, scusami se ti rispondo solo ora ma sono stato tutto il giorno ad un raduno tuning (speriamo che il prox anno riesco a preparare la piccola eclipse:) )

    Cmq, si ho sbagliato il codice, ciò che ti ho scritto serve per le mail testuali mentre se vuoi mandare l'email in html devi cambiare questa voce:

    cdomessage.TextBody = "testo normale"
    

    con questa:

    cdomessage.HtmlBody = "testo html"
    

    Quindi:

    cdomessage.HtmlBody = "Nome:" & request.form("nome") & "<br/>Cognome:" & Request.form("cognome") & "<br/>Citta:" & request.form("citta")
    

    Ciao:ciauz::ciauz:


  • User Attivo

    Yahoooooo !!!!!!! Sei un grande ! :yuppi::yuppi::yuppi:
    Ok così già va benissimo .
    Ma se volessi un doppio spazio ? L'email che mi arriva è questa:

    Nome:Tizio
    Cognome:Caio
    Citta: omodossola
    Email: [EMAIL="[email protected]"][email protected][/EMAIL]
    Commenti:rova

    ad esempio così:

    Nome: Tizio
    Cognome: Caio
    Citta: Domodossola
    Email: [EMAIL="[email protected]"][email protected][/EMAIL]
    Commenti: prova

    dovrei aggiungere un doppio
    <br/>
    Lo sò ti sto rompendo......


  • Moderatore

    Ma se volessi un doppio spazio ?
    dovrei aggiungere un doppio
    <br/>

    Esatto

    Lo sò ti sto rompendo......

    Tranquillo, siamo qui per aiutare 🙂

    Ah, tanto per la cronaca se un giorno ti capitasse di usare mail testuali e non html "l'accapo" si ottiene così:

    
    cdomessage.TextBody="Nome:" & request.form("nome") & vbcrlf & "Cognome:" & Request.form("cognome") & vbcrlf & "Citta:" & request.form("citta")
    
    

    Ciao
    :ciauz::ciauz:


  • User Attivo

    Sei un grande !
    Ti ringrazio, sicuramente ti chiederò altri consigli per il sito che sto realizzando.
    :ciauz:


  • Moderatore

    Sei un grande !

    Grazie :D:D

    sicuramente ti chiederò altri consigli per il sito che sto realizzando.

    Siamo sempre qui e se non ti rispondo io ci sono altre persone pronte a rispondere molto più competenti di me

    Ciao
    :ciauz::ciauz:


  • User Attivo

    Sapevo che non sarebbe passato molto tempo.......:bho:

    Ho pubblicato il sito per fare la prova.....con IE 6 tutto ok mentre provando ad inviare l'email (sempre tramite quel form) con firefox mi è apparsa questa scritta sopra tutta la pagina:

    <% theSchema="http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig=server.CreateObject("CDO.Configuration") cdoConfig.Fields.Item(theSchema & "sendusing")=2 cdoConfig.Fields.Item(theSchema & "smtpserver")="mio.smtp.it" cdoConfig.Fields.Update set cdoMessage=Server.CreateObject("CDO.Message") cdoMessage.Configuration=cdoConfig cdoMessage.From=Request.Form("email") cdoMessage.To="[email protected]" cdoMessage.Subject=Request.Form("subject") cdomessage.HtmlBody="Nome:" & request.form("nome") & "
    Cognome:" & Request.form("cognome") & "
    Citta:" & request.form("citta") & "
    Email:" & request.Form("email") & "
    Commenti:" & request.Form("commenti") cdoMessage.Send Set cdoMessage=Nothing Set cdoConfig=Nothing %>

    Cosa è successo ??????

    ❌x❌x


  • Moderatore

    potresti scrivere l'url della pag?
    Ciao


  • User Attivo

    Si certo
    www.helpdeskinformatica.it
    p.s.
    on line riempiendo il form dei contatti e inviando il tutto
    non mi manda l'email , come mai ?
    potresti dargli un'occhiata cos'è che non va ?
    Perchè in locale con Dreamweaver configurando il server di prova (con IIS)
    funzionava tutto ? :bho:
    Se hai la possibilità provalo con entrambi i Browser (IE 6 - Firefox 1.5.0.6)
    Grazie ancora !


  • Moderatore

    ciao, ho dato un'occhiata, ma così è poco chiaro.
    Potresti postare tutto il codice della pagina, almeno analizziamo tutto riga per riga?
    Praticamente la pag incriminata è grazie.asp, giusto?

    Ciao


  • User Attivo

    Si credo che sia la pagina grazie.asp, cmq io ti posto sia quella dei contatti.asp che quella di grazie.asp

    PAGINA CONTATTI.ASP

    <html>

    <head>
    <meta http-equiv="Content-Language" content="it">
    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
    <title>Info Hardware</title>
    <!--mstheme--><link rel="stylesheet" href="slat1011.css">
    <meta name="Microsoft Theme" content="slate 1011">
    <script type="text/JavaScript">
    <!--
    function MM_findObj(n, d) { //v4.01
    var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
    if(!(x=d)&&d.all) x=d.all; for (i=0;!x&&i<d.forms.length;i++) x=d.forms*;
    for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers*.document);
    if(!x && d.getElementById) x=d.getElementById(n); return x;
    }

    function MM_validateForm() { //v4.0
    var i,p,q,nm,test,num,min,max,errors='',args=MM_validateForm.arguments;
    for (i=0; i<(args.length-2); i+=3) { test=args[i+2]; val=MM_findObj(args*);
    if (val) { nm=val.name; if ((val=val.value)!="") {
    if (test.indexOf('isEmail')!=-1) { p=val.indexOf('@');
    if (p<1 || p==(val.length-1)) errors+='- '+nm+' must contain an e-mail address.\n';
    } else if (test!='R') { num = parseFloat(val);
    if (isNaN(val)) errors+='- '+nm+' must contain a number.\n';
    if (test.indexOf('inRange') != -1) { p=test.indexOf(':');
    min=test.substring(8,p); max=test.substring(p+1);
    if (num<min || max<num) errors+='- '+nm+' must contain a number between '+min+' and '+max+'.\n';
    } } } else if (test.charAt(0) == 'R') errors += '- '+nm+' is required.\n'; }
    } if (errors) alert('The following error(s) occurred:\n'+errors);
    document.MM_returnValue = (errors == '');
    }
    //-->
    </script>
    <style type="text/css">
    <!--
    a:link {
    text-decoration: none;
    }
    a:visited {
    text-decoration: none;
    }
    a:hover {
    text-decoration: none;
    }
    a:active {
    text-decoration: none;
    }
    -->
    </style></head>

    <body>

    <table border="0" width="100%">
    <tr>
    <td width="104"> </td>
    <td width="500">
    <img border="0" src="Immagineperhome.jpg" width="471" height="205"></td>
    <td><a href="index.htm"><span style="text-decoration: none">
    <font color="#008000">Home</font></span></a><p><a href="hardware.htm">
    <span style="text-decoration: none"><font color="#008000">Info Hardware</font></span></a></p>
    <p><a href="software.htm"><span style="text-decoration: none">
    <font color="#008000">Info Software</font></span></a><p>
    <a href="notizie.htm"><span style="text-decoration: none">
    <font color="#008000">Notizie</font></span></a></td>
    </tr>
    <tr>
    <td width="104" height="57"> </td>
    <td width="500" height="57">
    <p align="center">
    <img border="0" src="Contatti.gif" width="190" height="47"></td>
    <td height="57"> </td>
    </tr>
    <tr>
    <td width="104"> </td>
    <td width="500"><p> </p>
    <p> </p>
    <form action="grazie.asp" method="post" name="frm_message" id="frm_message">
    <p>Nome:
    <input name="nome" type="text" id="nome">
    Cognome:
    <input name="cognome" type="text" id="cognome">
    </p>
    <p>Città: 
    <input name="citta" type="text" id="citta">
    Email:     
    <input name="email" type="text" id="email">
    </p>
    <p> </p>
    <p>Commenti:  
    <textarea name="commenti" id="commenti"></textarea>
    </p>
    <p>
    <input name="Submit" type="submit" onClick="MM_validateForm('nome','','R','cognome','','R','citta','','R','email','','RisEmail');return document.MM_returnValue" value="Invia">
    <input type="reset" name="Submit2" value="Cancella">
    </p>
    <p> </p>
    <p> </p>
    </form>
    <p> </p>
    <p>
    <p>
    <br>
     </p>
    <p> </p>
    <p></td>
    <td><font color="#008000">Nome Cognome</font><p>
    <img border="0" src="Gif/phone2-c.gif" width="41" height="48"><font size="2" color="#008000">numero di cell</font>
    </p>
    <p> </p>
    <p> </p>
    <p> </p>
    <p> </p>
    <p> </p>
    <p> </p>
    <p> </p>
    <p>  </p>
    <p>  </p>
    <p><p><p><p></td>
    </tr>
    </table>

    </body>

    </html>


    PAGINA GRAZIE.ASP

    <html>

    <head>
    <meta http-equiv="Content-Language" content="it">
    <meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
    <title>Info Hardware</title>
    <!--mstheme--><link rel="stylesheet" href="slat1011.css">
    <meta name="Microsoft Theme" content="slate 1011">
    </head>

    <body>
    <%
    theSchema="http://schemas.microsoft.com/cdo/configuration/"
    Set cdoConfig=server.CreateObject("CDO.Configuration")
    cdoConfig.Fields.Item(theSchema & "sendusing")=2
    cdoConfig.Fields.Item(theSchema & "smtpserver")="smtp.tele2.it"
    cdoConfig.Fields.Update

    set cdoMessage=Server.CreateObject("CDO.Message")
    cdoMessage.Configuration=cdoConfig

    cdoMessage.From=Request.Form("email")
    cdoMessage.To="[email protected]"
    cdomessage.HtmlBody="Nome:" & request.form("nome") & "<br/>Cognome:" & Request.form("cognome") & "<br/>Citta:" & request.form("citta") & "<br/>Email:" & request.Form("email") & "<br/>Commenti:" & request.Form("commenti")
    cdoMessage.Send

    Set cdoMessage=Nothing
    Set cdoConfig=Nothing

    %>

    <table border="0" width="100%">
    <tr>
    <td width="104"> </td>
    <td width="500">
    <img border="0" src="Immagineperhome.jpg" width="471" height="205"></td>
    <td><a href="index.htm"><font color="#008000">
    <span style="text-decoration: none">Home</span></font></a><p><a href="hardware.htm">
    <span style="text-decoration: none"><font color="#008000">Info Hardware</font></span></a></p>
    <p><a href="software.htm"><span style="text-decoration: none">
    <font color="#008000">Info Software</font></span></a><p>
    <font color="#008000"><a href="notizie.htm">
    <span style="text-decoration: none"><font color="#008000">Notizie</font></span></a></font></td>
    </tr>
    <tr>
    <td width="104" height="57"> </td>
    <td width="500" height="57">
    <p align="center">
    </td>
    <td height="57"> </td>
    </tr>
    <tr>
    <td width="104"> </td>
    <td width="500">
    <p> </p>
    <p align="center"><font color="#008000">Ringraziandola per l'attenzione,
    le risponderemo il più presto possibile.<br>
     </font></p>
    <p></td>
    <td> </td>
    </tr>
    </table>

    </body>

    </html>

    :ciauz:


  • User Attivo

    Le pagine asp non vengono interpretate... il web server è Apache... il server lo gestisci tu? E' installato un modulo asp? In caso contrario le asp vengono trattate come normali html.

    Ciao


  • User Attivo

    Per fare le prove in locale (dove funziona tutto) ho solamente installato IIS, il server che ospita il sito avrà sicuramente tutte le applicazioni necessarie per far funzionare le pagine ASP !