Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 12
  1. #1

    voglio spedire mail in HTML via asp ma.....

    Ciao a tutti , usando questo codice che prende i dati da un form spedice corretamente la mail con tutti i dati richiesti ma non arriva in formato html bensi cosi':

    codice sendmail.asp

    codice:
    <%
    Response.Expires = 0
    nome=Trim(Request.Form("nome"))
    'nome=Request.QueryString("nome"))
    email=Trim(Request.Form("email"))
    tel=Trim(Request.Form("tel"))
    oggetto=Trim(Request.Form("oggetto"))
    msg=Trim(Request.Form("msg"))
    sito_web="www.marcoticket.com"
    
    Dim objMail
    
    ' Crea l'oggetto email
    Set objMail = Server.createObject("CDONTS.NewMail")
    
    
    'crea il messaggio
    objMail.To = email
    objMail.Cc ="altramail@mail.it" 
    objMail.Bcc = "altramail@mail.it" 
    objMail.From = "altramail@mail.it"
    'objMail.ReplyTo = "altramail@mail.it"
    objMail.Subject = oggetto
    
    HTML =""
    HTML = HTML &"<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.01 Transitional//EN"">"
    HTML = HTML & "<html>"
    HTML = HTML & "<head>"
    HTML = HTML & "<title>"& sito_web &"</title>"
    HTML = HTML & "<meta http-equiv=""Content-Type"""
    HTML = HTML & "<content=""text/html; charset=windows-1251"">"
    
    HTML = HTML & "</head>"
    HTML = HTML & "<body bgcolor=#F1F3F5 leftmargin=0 topmargin=0 marginwidth=0 marginheight=0>"
    HTML = HTML & "<table>"
    HTML = HTML & "<tr><td align=""center"" colspan=""2"">"& sito_web &"</td></tr>"      
    HTML = HTML & "<tr><td colspan=""2""></td></tr>"
    HTML = HTML & "<tr><td align=""center"">Nome:</td><td align=""left"">"& nome &" </td></tr>" 
    HTML = HTML & "<tr><td align=""center"">Email:</td><td align=""left"">"& email &"</td></tr>" 
    HTML = HTML & "<tr><td align=""center"">Telefono:</td><td align=""left""> "&tel&"</td></tr>"
    HTML = HTML & "<tr><td align=""center"">Richieste:</td><td align=""left"">"& msg&"</td></tr>"
    HTML = HTML & "</table>"
    HTML = HTML & "</body></html>"
    
    'objMail.TextBody = "messaggio in formato testuale"
    'Impostiamo la formattazione
    objMail.BodyFormat = 1 ' 0 Testo; 1 HTML
    objMail.MailFormat = 1 ' 0 Testo; 1 HTML 
    objMail.Body = HTML
    objMail.Send
    
    Set objMail = Nothing 
    
    Response.write("ris=ok")
    
    %>
    output in outlook:

    codice:
    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><title>www.marcoticket.com</title><meta
    http-equiv="Content-Type"<content="text/html;
    charset=windows-1251"></head><body bgcolor=#F1F3F5 leftmargin=0 topmargin=0 marginwidth=0 marginheight=0><table><tr><td align="center" 
    colspan="2">www.altramail@mail.it</td></tr><tr><td
    colspan="2"></td></tr><tr><td align="center">Nome:</td><td align="left">maurizio </td></tr><tr><td align="center">Email:</td><td align="left">altramail@mail.it</td></tr><tr><td
    align="center">Telefono:</td><td align="left"> 2435462627</td></tr><tr><td align="center">Richieste:</td><td align="left">23/08/2006 15:21:12 CONCERTO Muse - Forum Assago - (MI) - 04/12/2006
    QUANTITA': 100
    </td></tr></table></body></html>

    xxhe'?

    grazie a tutti....
    -Nextart.it Graphic Solutions

  2. #2
    prova a dirgli che è testo e non html...
    Ah, Jedis! I had no ideas! What can i do for you, honored Jedis?

    I'm not Jedi. I'm a guy with a lighsaber and a few questions.

  3. #3
    Ciao Killer99, modifico,provo,ricevo e ti dico.....
    -Nextart.it Graphic Solutions

  4. #4
    ok, ora ottengo questo formattato:

    codice:
    www.website.com 
      
    Nome: iimposto zero  
    Email: roberto.a@reteet.it 
    Telefono: 42355657257 
    Richieste: 23/08/2006 15:45:40 CONCERTO Rock in Idro - Idroscalo - (MI) - 02/09/2006 QUANTITA': 1
    pero' richieste non mantiene la formattazione, nel'area di testo e' cosi':
    23/08/2006 15:45:40
    CONCERTO
    Rock in Idro - Idroscalo (MI) - 02/09/2006

    il campo si chiama 'msg' e lo recupero cosi':
    msg=Trim(Request.Form("msg"))

    -Nextart.it Graphic Solutions

  5. #5
    mmm prova a sostituire i vbcrlf con br o chr(13)
    Ah, Jedis! I had no ideas! What can i do for you, honored Jedis?

    I'm not Jedi. I'm a guy with a lighsaber and a few questions.

  6. #6
    ok, fatto cosi':

    msg = Trim(Request.Form("msg")) 'Riceviamo il testo
    msg = Replace(msg, VbCrLf, "
    ") 'Sostituiamo i ritorni a capo
    ma ottengo questo:

    23/08/2006 16:42:19 CONCERTO Rock in Idro - Idroscalo - (MI) - 02/09/2006 QUANTITA': 1 CONCERTO Carmen Consoli - Mazda Palace - (MI) - 09/09/2006 QUANTITA': 1 CONCERTO Pearl Jam - Mazda Palace - (MI) - 17/09/2006 QUANTITA': 1 CONCERTO Placebo - Mazda Palace - (MI) - 09/10/2006 QUANTITA': 1 CONCERTO Francesco Guccini - Forum Assago - (MI) - 10/11/2006 QUANTITA': 1


    non va a capo.....
    -Nextart.it Graphic Solutions

  7. #7
    se non va a capo con BR prova con chr(13)
    Ah, Jedis! I had no ideas! What can i do for you, honored Jedis?

    I'm not Jedi. I'm a guy with a lighsaber and a few questions.

  8. #8
    ho fatto cosi':

    msg = Trim(Request.Form("msg")) 'Riceviamo il testo
    msg = Replace(msg, VbCrLf, chr(13)) 'Sostituiamo i ritorni a capo

    ma nulla, ottengo sempre:

    23/08/2006 17:1:01 CHAMPIONS LEAGUE 3° giornata - Ascoli - Milan2 - (and. 28/8/2005 - rit. 18/1/2006) QUANTITA': 1 CONCERTO Rock in Idro - Idroscalo - (MI) - 02/09/2006 QUANTITA': 1 CONCERTO Carmen Consoli - Mazda Palace - (MI) - 09/09/2006 QUANTITA': 1 CONCERTO Pearl Jam - Mazda Palace - (MI) - 17/09/2006 QUANTITA': 1 CHAMPIONS LEAGUE 1° giornata - Ascoli - Milan - (and. 28/8/2005 - rit. 18/1/2006) QUANTITA': 1 CHAMPIONS LEAGUE 2° giornata - Inter . Milan - (and. 28/8/2005 - rit. 18/1/2006) QUANTITA': 1

    -Nextart.it Graphic Solutions

  9. #9
    o pofferbacco [lol mi è venuto così giuro]

    non sò che dirti :S
    che roba strana...
    Ah, Jedis! I had no ideas! What can i do for you, honored Jedis?

    I'm not Jedi. I'm a guy with a lighsaber and a few questions.

  10. #10
    forse non ho detto tutto io...,

    il form da cui prendo i dati e' fatto in Flash. e il campo msg e' un

    'testo di input" - multiriga.

    la pagina asp sendmail.asp e' questa:

    codice:
    <%
    Response.Expires = 0
    nome=Trim(Request.Form("nome"))
    'nome=Request.QueryString("nome"))
    email=Trim(Request.Form("email"))
    tel=Trim(Request.Form("tel"))
    oggetto=Trim(Request.Form("oggetto"))
    
    msg = Trim(Request.Form("msg"))   'Riceviamo il testo
    msg = Replace(msg, VbCrLf, chr(13))       'Sostituiamo i ritorni a capo
    
    'msg=Trim(Request.Form("msg"))
    sito_web="www.marcoticket.com"
    
    Dim objMail
    
    ' Crea l'oggetto email
    Set objMail = Server.createObject("CDONTS.NewMail")
    
    
    'crea il messaggio
    objMail.To = email
    objMail.Cc ="maurizio.spicuglia@rasnet.it" 
    objMail.Bcc = "maury@nextart.it" 
    objMail.From = "info@marcoticket.com"
    'objMail.ReplyTo = "info@marcoticket.com"
    objMail.Subject = oggetto
    
    HTML =""
    HTML = HTML &"<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.01 Transitional//EN"">"
    HTML = HTML & "<html>"
    HTML = HTML & "<head>"
    HTML = HTML & "<title>"& sito_web &"</title>"
    HTML = HTML & "<meta http-equiv=""Content-Type"""
    HTML = HTML & "<content=""text/html; charset=windows-1251"">"
    
    HTML = HTML & "<style type=""text/css"">"
    HTML = HTML & "body {margin:0px;padding:0px;}"
    HTML = HTML & "table {width: 100%;font-family:Verdana, Arial, Helvetica, sans-serif;}"
    HTML = HTML & ".tdSX {width:30%;font-size:10px;color:#333333;}"
    HTML = HTML & ".tdDX {width:70%;font-size:10px;color:#000066;}"
    HTML = HTML & "#titolo {width: 100%;font-size:14px;color:#003366;text-decoration:underline;}"
    HTML = HTML & "</style>"
    HTML = HTML & "</head>"
    HTML = HTML & "<body bgcolor=#F1F3F5 leftmargin=0 topmargin=0 marginwidth=0 marginheight=0>"
    HTML = HTML & "<table>"
    HTML = HTML & "<tr><td align=""center"" id =""titolo"" colspan=""2"">"& sito_web &"</td></tr>"      
    HTML = HTML & "<tr><td colspan=""2""></td></tr>"
    HTML = HTML & "<tr><td align=""center"" class=""tdSX"">Nome:</td><td align=""left"" class=""tdDX"">"& nome &" 
    </td></tr>" 
    HTML = HTML & "<tr><td align=""center"" class=""tdSX"">Email:</td><td align=""left"" class=""tdDX"">"& email &"</td></tr>" 
    HTML = HTML & "<tr><td align=""center"" class=""tdSX"">Telefono:</td><td align=""left"" class=""tdDX""> "&tel&"</td></tr>"
    HTML = HTML & "<tr><td align=""center"" class=""tdSX"">Richieste:</td><td align=""left"" class=""tdDX"">"& msg&"</td></tr>"
    HTML = HTML & "</table>"
    HTML = HTML & "</body></html>"
    'objMail.TextBody = "messaggio in formato testuale"
    'Impostiamo la formattazione
    objMail.BodyFormat = 0 ' 1 Testo; 1 HTML
    objMail.MailFormat = 0 ' 1 Testo; 1 HTML 
    objMail.Body = HTML
    objMail.Send
    
    Set objMail = Nothing 
    
    Response.write("ris=ok")
    
    %>

    il tutto mi finziona con uno script PHP che ti posto. volevo fare la stessa cosa in asp ma mi da
    quel problema.
    codice PHP:

    codice:
    <?
    if(isset($_POST['flashMAIL'])){
    	//////////////////////////////////////////////
    	$nome = htmlspecialchars(stripslashes(utf8_decode(trim($_POST['nome']))),ENT_QUOTES);
    	$email = htmlspecialchars(stripslashes(utf8_decode(trim($_POST['email']))),ENT_QUOTES);
    	$telefono = htmlspecialchars(stripslashes(utf8_decode(trim($_POST['tel']))),ENT_QUOTES);
    	$oggetto = htmlspecialchars(stripslashes(utf8_decode(trim($_POST['oggetto']))),ENT_QUOTES);
    	$msg = nl2br(stripslashes(utf8_decode(trim($_POST['msg']))));
    	$msg = str_replace("
    ","[br]",$msg);
    	$msg = htmlspecialchars($msg,ENT_QUOTES);
    	$msg = str_replace("[br]","
    ",$msg);
    	
    	$page = "www.MarcoTicket.com";
    	$to = "maurizio.spicuglia@rasnet.it";
    	//////////////////////////////////////////////
    	$messaggio ='
    		<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head>
    		<title>'.$page.'</title><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
    		<style type="text/css">
    		body {margin:0px;padding:0px;}
    		table {width: 100%;font-family:Verdana, Arial, Helvetica, sans-serif;}
    		.tdSX {width:30%;font-size:10px;color:#333333;}
    		.tdDX {width:70%;font-size:10px;color:#000066;}
    		#titolo {width: 100%;font-size:14px;color:#003366;text-decoration:underline;}
    		</style>
    		</head><body><table><tr><td align="center" id="titolo" colspan="2">'.$page.'</td></tr>
    		<tr><td colspan="2"></td></tr>
                    <tr><td align="center" class="tdSX">Nome:</td><td align="left" class="tdDX">'.$nome.'</td></tr>
    		<tr><td align="center" class="tdSX">E-mail:</td><td align="left" class="tdDX">'.$email.'</td></tr>
                    <tr><td align="center" class="tdSX">Telefono:</td><td align="left" class="tdDX">'.$tel.'</td></tr>
    		<tr><td align="center" class="tdSX">Richieste:</td><td align="left" class="tdDX">'.$msg.'</td></tr>
    		<tr><td align="center" class="tdSX"></td><td align="left" class="tdDX"></td></tr>
    		</table>
    Questo messaggio viene creato in maniera automatica. Siete pregati di non rispondere alla presente email.
    Per informazioni scrivete a: info@marcoticket.com.
    Grazie</body></html>';
    	$intestazioni  = "MIME-Version: 1.0\r\n";
    	$intestazioni .= "Content-type: text/html; charset=iso-8859-1\r\n";
    	$intestazioni .= "To: ".$to."\r\n";
    	$intestazioni .= "From:".$page."\r\n";
            $intestazioni .= "Bcc: ".$email."\r\n";
    	$intestazioni .= "Return-Path: ".$nome."\n";
    	if (mail($to, $oggetto, $messaggio, $intestazioni)) { print "ris=ok"; } else { print "ris=error"; }
    } else {
    	print "ris=error";
    }
    ?>
    -Nextart.it Graphic Solutions

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.