Jump to content


Photo

Será Que Aguém Pode Alterar?


  • Faça o login para participar
2 replies to this topic

#1 fabian

fabian

    12 Horas

  • Usuários
  • 152 posts
  • Sexo:Não informado

Posted 20/08/2004, 05:11

Olá, tenho este script, que baixei na net, ele faz parte de código de uma newsletter, esse fragmento do código é a parte de envio de e-mail para os cadastrados:

<?php
   }

   if($acao == "enviar")
   {
       $dados = file($file_cad);
       $aux = 0;
       $url.="apaga.php";

       while (each($dados))
       {
             $subdados_aux = explode("][",$dados[$aux]);
            $mailaddr = $subdados_aux[1];
            $chave_ap = $subdados_aux[2];

         $corpo_a  = $corpo;
         $corpo_a .= "\n\nSe deseja sair da lista clique no link:";
         $corpo_a .= "  $url?chave_ap=$chave_ap";

             $mime_list = array("html"=>"text/html","htm"=>"text/html", "txt"=>"text/plain", "rtf"=>"text/enriched","csv"=>"text/tab-separated-values","css"=>"text/css","gif"=>"image/gif"); 

             $ABORT = FALSE; 
             $boundary = "XYZ-" . date(dmyhms) . "-ZYX"; 

             $message = "--$boundary\n"; 
             $message .= "Content-Transfer-Encoding: 8bits\n";
             $message .= "Content-Type: text/plain; charset=\"ISO-8859-1\"\n\n"; 
             $message .= $corpo_a; 
             $message .= "\n"; 

             #//attachment file names with full path 
             $attachments[1] = $anexo; 
             #$attachments[2] = "c:\etc"; 
             #$attachments[3] = "c:\etc"; 

             //verifica se existe um arquivo anexado no código
             foreach ($attachments as $key => $full_path) 
     { 
                  if ($full_path !='') 
      { 
                      if (file_exists($full_path))
        { 
                          //try to open 
                          if ($fp = fopen($full_path,"rb")) 
          { 
                              //get the file name from the path 
                              $filename = array_pop(explode(chr(92),$full_path)); 
                              $contents = fread($fp,filesize($full_path));  

                              //encode data 
                              $encoded = base64_encode($contents); 
                              //*****SPLIT THE ENCODED DATA***** 
                              $encoded_split = chunk_split($encoded); 
                              fclose($fp); 
                              $message .= "--$boundary\n"; 
                              $message .= "Content-Type: $anexo_type\n"; 
                              $message .= "Content-Disposition: attachment; filename=\"$anexo_name\" \n"; 
                              $message .= "Content-Transfer-Encoding: base64\n\n"; 
                              $message .= "$encoded_split\n"; 
                          } 
                          else 
          { 
                              echo "Cannot open file$key: $filename"; 
                              $ABORT = TRUE; 
                          } 
                      } 
                      else 
        { 
                          echo "File$key does not exist: $filename"; 
                          $ABORT = TRUE; 
                      }
                  } 
             } 

             $message .= "--$boundary--\r\n"; 

             $headers = "MIME-Version: 1.0\n"; 
             $headers .= "From: <$from>\r\n";
             $headers .= "Content-type: multipart/mixed; boundary=\"$boundary\"\r\n";

             $mensagem=mail($mailaddr, $mailsubject, $message, $headers);

           /*  mail($mailaddr, $mailsubject, "$corpo 

Se deseja sair da lista clique no limk a frente $url?chave_ap=$chave_ap","Remetido por $nome_ad
<$mail_ad>");*/

	$aux++;
	}
?>

No Remetente ele envia o meu e-mail, ao invés do meu nome. Será que alguém pode ajudar a mudar isso?

Ex.:

De: paulo@paulo.com.br
Assunto: Blá blá blá!

Mensagem:
fdfdfdfdfdfd
fdfdsfdsfds
fdfdsfds
fdsfds

E deveria ser assim:

De: Paulo Henrrique
Assunto: Blá blá blá

Mensagem:
fdfdfdfdfdfd
fdfdsfdsfds
fdfdsfds
fdsfds

Valeu!
Fabian

#2 Balala

Balala

    What you want for yourself?

  • Ex-Admins
  • 3357 posts
  • Sexo:Não informado
  • Localidade:Jaraguá do Sul - SC
  • Interesses:http://forum.wmonline.com.br/index.php?showtopic=5792

Posted 20/08/2004, 07:53

Altere essa parte do script:

$headers .= "From: <$from>\r\n";


Para isso:

$headers .= "From: Meu Nome<$from>\r\n";


Balala - Admin Geral Webfórum - Retired
Twitter
Stop Spreading Lies!
Posted Image

#3 fabian

fabian

    12 Horas

  • Usuários
  • 152 posts
  • Sexo:Não informado

Posted 21/08/2004, 16:02

Valeu cara, valeu mesmo! Fiz assim:
$headers .= "From: $nome_ad<$from>\r\n";

Pq $nome_ad é a variável que pega o nome, algumas linhas acima, valeu!

Fabian




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq