Envio de Mails
Versión 1 (Guillermo Zdanowicz, 04/10/2011 19:20)
1 | 1 | Guillermo Zdanowicz | h1. Envio de Mails |
---|---|---|---|
2 | 1 | Guillermo Zdanowicz | |
3 | 1 | Guillermo Zdanowicz | |
4 | 1 | Guillermo Zdanowicz | $ruta1="/home/www/web10/web/administracion/web/banco/".$this->getUser()->getAttribute('id').'/'; |
5 | 1 | Guillermo Zdanowicz | $fp=fopen($ruta1."/acreditacion_barrida_".$this->getUser()->getAttribute('id').".csv","w+"); |
6 | 1 | Guillermo Zdanowicz | fwrite($fp,$datos); |
7 | 1 | Guillermo Zdanowicz | fclose ($fp); |
8 | 1 | Guillermo Zdanowicz | |
9 | 1 | Guillermo Zdanowicz | //una vez genrado el archivo lo envio |
10 | 1 | Guillermo Zdanowicz | $my_path="/home/www/web10/web/administracion/web/banco/".$this->getUser()->getAttribute('id').'/'; |
11 | 1 | Guillermo Zdanowicz | |
12 | 1 | Guillermo Zdanowicz | //$my_file2="acreditacion_alfabetica_".$this->getUser()->getAttribute('id').".csv"; |
13 | 1 | Guillermo Zdanowicz | $my_file="acreditacion_barrida_".$this->getUser()->getAttribute('id').".csv"; |
14 | 1 | Guillermo Zdanowicz | //$my_file=$my_file1.",".$my_file2; |
15 | 1 | Guillermo Zdanowicz | |
16 | 1 | Guillermo Zdanowicz | $my_name = "Sistema Aranceles"; |
17 | 1 | Guillermo Zdanowicz | $my_mail = "proyectosucu@gmail.com"; |
18 | 1 | Guillermo Zdanowicz | $my_replyto = "ingguillermoz@gmail.com"; |
19 | 1 | Guillermo Zdanowicz | $my_subject = "Archivo de Acreditado en Sistema Aracneles."; |
20 | 1 | Guillermo Zdanowicz | $my_message = "Este es el archivo de barrida que fue ingresado al sistema."; |
21 | 1 | Guillermo Zdanowicz | $this->mail_attachment($my_file, $my_path, "ingguillermoz@gmail.com", $my_mail, $my_name, $my_replyto, $my_subject, $my_message); |
22 | 1 | Guillermo Zdanowicz | // $this->mail_attachment($my_file1, $my_path, "ingguillermoz@gmail.com", $my_mail, $my_name, $my_replyto, $my_subject, $my_message); |
23 | 1 | Guillermo Zdanowicz | |
24 | 1 | Guillermo Zdanowicz | |
25 | 1 | Guillermo Zdanowicz | |
26 | 1 | Guillermo Zdanowicz | |
27 | 1 | Guillermo Zdanowicz | function mail_attachment($filename, $path, $mailto, $from_mail, $from_name, $replyto, $subject, $message) { |
28 | 1 | Guillermo Zdanowicz | $file = $path.$filename; |
29 | 1 | Guillermo Zdanowicz | $file_size = filesize($file); |
30 | 1 | Guillermo Zdanowicz | $handle = fopen($file, "r"); |
31 | 1 | Guillermo Zdanowicz | $content = fread($handle, $file_size); |
32 | 1 | Guillermo Zdanowicz | fclose($handle); |
33 | 1 | Guillermo Zdanowicz | $content = chunk_split(base64_encode($content)); |
34 | 1 | Guillermo Zdanowicz | $uid = md5(uniqid(time())); |
35 | 1 | Guillermo Zdanowicz | $name = basename($file); |
36 | 1 | Guillermo Zdanowicz | $header = "From: ".$from_name." <".$from_mail.">\r\n"; |
37 | 1 | Guillermo Zdanowicz | $header .= "Reply-To: ".$replyto."\r\n"; |
38 | 1 | Guillermo Zdanowicz | $header .= "MIME-Version: 1.0\r\n"; |
39 | 1 | Guillermo Zdanowicz | $header .= "Content-Type: multipart/mixed; boundary=\"".$uid."\"\r\n\r\n"; |
40 | 1 | Guillermo Zdanowicz | $header .= "This is a multi-part message in MIME format.\r\n"; |
41 | 1 | Guillermo Zdanowicz | $header .= "--".$uid."\r\n"; |
42 | 1 | Guillermo Zdanowicz | $header .= "Content-type:text/plain; charset=iso-8859-1\r\n"; |
43 | 1 | Guillermo Zdanowicz | $header .= "Content-Transfer-Encoding: 7bit\r\n\r\n"; |
44 | 1 | Guillermo Zdanowicz | $header .= $message."\r\n\r\n"; |
45 | 1 | Guillermo Zdanowicz | $header .= "--".$uid."\r\n"; |
46 | 1 | Guillermo Zdanowicz | $header .= "Content-Type: application/octet-stream; name=\"".$filename."\"\r\n"; // use different content types here |
47 | 1 | Guillermo Zdanowicz | $header .= "Content-Transfer-Encoding: base64\r\n"; |
48 | 1 | Guillermo Zdanowicz | $header .= "Content-Disposition: attachment; filename=\"".$filename."\"\r\n\r\n"; |
49 | 1 | Guillermo Zdanowicz | $header .= $content."\r\n\r\n"; |
50 | 1 | Guillermo Zdanowicz | $header .= "--".$uid."--"; |
51 | 1 | Guillermo Zdanowicz | if (mail($mailto, $subject, "", $header)) { |
52 | 1 | Guillermo Zdanowicz | echo "mail send ... OK"; // or use booleans here |
53 | 1 | Guillermo Zdanowicz | } else { |
54 | 1 | Guillermo Zdanowicz | echo "mail send ... ERROR!"; |
55 | 1 | Guillermo Zdanowicz | } |
56 | 1 | Guillermo Zdanowicz | } |