
| Path : /home/gujo45me/public_html/margarita/pdf/ |
| Disable Functions : exec,passthru,shell_exec,system System : Linux server-604606.appsiete.com 3.10.0-1160.119.1.el7.tuxcare.els25.x86_64 #1 SMP Wed Oct 1 17:37:27 UTC 2025 x86_64 [ Home ][ Zone-h ][ Jumping ][ Symlink ][ Mass Depes ][ Command ] |
| Current File : /home/gujo45me/public_html/margarita/pdf/enviaCorreoNota.php |
<?php
header('Content-Type: text/html; charset=UTF-8');
require("fpdf/fpdf.php");
require_once("PDF417/vendor/autoload.php");
use BigFish\PDF417\PDF417;
use BigFish\PDF417\Renderers\ImageRenderer;
include ("letras/NumeroALetras.php");
include ("config.php");
/******************************************************************************************/
/* clase PDF
/******************************************************************************************/
class PDF extends FPDF{
function Footer($footer = false){
if ($footer) {
$this->SetTextColor(0,0,0);
$this->SetFont('arial','I',10);
$this->SetXY(18,26.2);
$this->Cell(0.8, 0.25, utf8_decode("Página ").$this->PageNo().' de {nb}', 0, 1,'L', 0);
}
}
function GetMultiCellHeight($w, $h, $txt, $border=null, $align='J') {
// Calculate MultiCell with automatic or explicit line breaks height
// $border is un-used, but I kept it in the parameters to keep the call
// to this function consistent with MultiCell()
$cw = &$this->CurrentFont['cw'];
if($w==0)
$w = $this->w-$this->rMargin-$this->x;
$wmax = ($w-2*$this->cMargin)*1000/$this->FontSize;
$s = str_replace("\r",'',$txt);
$nb = strlen($s);
if($nb>0 && $s[$nb-1]=="\n")
$nb--;
$sep = -1;
$i = 0;
$j = 0;
$l = 0;
$ns = 0;
$height = 0;
while($i<$nb)
{
// Get next character
$c = $s[$i];
if($c=="\n")
{
// Explicit line break
if($this->ws>0)
{
$this->ws = 0;
$this->_out('0 Tw');
}
//Increase Height
$height += $h;
$i++;
$sep = -1;
$j = $i;
$l = 0;
$ns = 0;
continue;
}
if($c==' ')
{
$sep = $i;
$ls = $l;
$ns++;
}
$l += $cw[$c];
if($l>$wmax)
{
// Automatic line break
if($sep==-1)
{
if($i==$j)
$i++;
if($this->ws>0)
{
$this->ws = 0;
$this->_out('0 Tw');
}
//Increase Height
$height += $h;
}
else
{
if($align=='J')
{
$this->ws = ($ns>1) ? ($wmax-$ls)/1000*$this->FontSize/($ns-1) : 0;
$this->_out(sprintf('%.3F Tw',$this->ws*$this->k));
}
//Increase Height
$height += $h;
$i = $sep+1;
}
$sep = -1;
$j = $i;
$l = 0;
$ns = 0;
}
else
$i++;
}
// Last chunk
if($this->ws>0)
{
$this->ws = 0;
$this->_out('0 Tw');
}
//Increase Height
$height += $h;
return $height;
}
}
/******************************************************************************************/
/* consultas SQL
/******************************************************************************************/
$id_nota = $_GET['id_nota'];
$mysqli = new mysqli($db_host,$db_user,$db_pass,$db_name);
//Para obtener los datos de la nota
$query_1 = "SELECT n.nombre_nota as nombre_nota, n.fecha_emision, n.motivo, n.descripcion, v.id_venta, u.username FROM notas n INNER JOIN ventas v ON v.id_nota = n.id_nota INNER JOIN usuarios u ON n.id_usuario = u.id_usuario WHERE n.id_nota = '".$id_nota."' ";
$result_1 = $mysqli->query($query_1);
$row_1 = $result_1->fetch_assoc();
$id = $row_1['id_venta'];
//Para obtener los datos de la venta
$query1 = "SELECT v.*, v.created_at as hora, u.username, c.*, l.direccion as direc, l.telefono as telef FROM ventas v INNER JOIN clientes c ON v.id_cliente = c.id_cliente INNER JOIN local l ON v.id_local = l.id_local INNER JOIN usuarios u ON v.id_usuario = u.id_usuario WHERE id_venta = '".$id."' ";
$result1 = $mysqli->query($query1);
$row1 = $result1->fetch_assoc();
//Para obtener los detalles de la venta
$query2 = "SELECT d.* , p.* , u.abreviatura FROM detalle_venta d INNER JOIN productos p ON d.id_producto = p.id_producto INNER JOIN unidad_medida u ON p.id_unidad_medida = u.id_unidad_medida WHERE id_venta = '".$id."' ";
$result2 = $mysqli->query($query2);
//Para obtener los datos de la empresa
$query3 = "SELECT * FROM empresa WHERE id_empresa = '1' ";
$result3 = $mysqli->query($query3);
$row3 = $result3->fetch_assoc();
//Para obtener los datos del tipo de comprobante
$query4 = "SELECT t.* FROM ventas v INNER JOIN tipo_comprobante t ON v.id_tipo_comprobante = t.id_tipo_comprobante WHERE id_venta = '".$id."' ";
$result4 = $mysqli->query($query4);
$row4 = $result4->fetch_assoc();
//Para obtener los datos del tipo de comprobante
$query_4 = "SELECT t.* FROM notas n INNER JOIN tipo_comprobante t ON n.id_tipo_comprobante = t.id_tipo_comprobante WHERE n.id_nota = '".$id_nota."' ";
$result_4 = $mysqli->query($query_4);
$row_4 = $result_4->fetch_assoc();
// Variables correspondientes a la factura.
$RUC = $row1['numero_documento']; // RUC.
$NomRazSoc = $row1['nombre']; // Nombre o Razón social.
$FecEmi = $row1['fecha_venta']; // Fecha de emisión.
$Domicilio = $row1['direccion']; // Domicilio.
$CodHash = ""; // Código Hash.
$TipoDoc = $row1['id_tipo_comprobante']; // Tipo de documento.
$TotGrav = 0; // Total gravado.
$TotIGV = 0; // Total IGV.
$TotMonto = 0; // Total importe.
$autoriza = $row3['autorizacion'];
$pagina = $row3['pagina_web'];
$empresa = $row3['razon_social'];
$xml = @file_get_contents('../sunat/xml/notas/'.$row3['ruc'].'-'.$row_4['codigo'].'-'.$row_1['nombre_nota'].'.xml');
if ($xml) {
// Obteniendo datos del archivo .XML
$DOM = new DOMDocument('1.0', 'ISO-8859-1');
$DOM->preserveWhiteSpace = FALSE;
$DOM->loadXML($xml);
// Obteniendo Codigo Hash
$DocXML = $DOM->getElementsByTagName('DigestValue');
$i=0;
foreach($DocXML as $Nodo){
if ($i==0){
$CodHash = $Nodo->nodeValue;
}
$i++;
}
}
// TOTALES DE LA FACTURA
$sub_total_afe = 0;
$sub_total_exo = 0;
$sub_total_ina = 0;
$total = 0;
$igv = 0;
$desc = 0;
$ii=0;
while($row2 = $result2->fetch_assoc())
{
$array['detalle'][$ii]['descripcion'] = $row2['nombre']." ".$row2['descripcion'];
$array['detalle'][$ii]['unidad_medida'] = $row2['abreviatura'];
$array['detalle'][$ii]['cantidad'] = number_format($row2['cantidad'] , 4, ".", "");
$array['detalle'][$ii]['precio_unitario'] = number_format($row2['precio_venta'], 4, ".", "");
$array['detalle'][$ii]['subtotal'] = number_format($row2['precio_venta_total'] , 2, ".", "");
$array['detalle'][$ii]['descuento'] = number_format($row2['descuento'] , 2, ".", "");
if ( $row2['situacion_impuesto'] == "AFECTO") {
$sub_total_afe = $sub_total_afe + $row2['precio_venta_neto'];
$igv = $igv + $row2['impuesto'];
}
else if ( $row2['situacion_impuesto'] == "EXONERADO") {
$sub_total_exo = $sub_total_exo + $row2['precio_venta_neto'];
}
else if ( $row2['situacion_impuesto'] == "INAFECTO") {
$sub_total_ina = $sub_total_ina + $row2['precio_venta_neto'];
}
$ii++;
}
$TotGrav = number_format($sub_total_afe+$sub_total_exo+$sub_total_ina, 2, '.', '');
$TotIGV = number_format($igv, 2, '.', '');
$TotMonto = number_format($row1['total_venta'], 2, '.', '');
// Crear el gráfico con el código de barras
$nom_f = $row1['nombre_comprobante'];
$tip_f = $row4['nombre'];
$ruc_e = $row3['ruc'];
$textoCodBar = "
| RUC : $ruc_e
| $tip_f ELECTRONICA
| $nom_f
| SUBTOTAL : $TotGrav
| IGV : $TotIGV
| TOTAL : $TotMonto
| $FecEmi
| $CodHash
";
$pdf417 = new PDF417();
$codigo_barra = $pdf417->encode($textoCodBar);
// Create a PNG image
$renderer = new ImageRenderer( ['format' => 'png'] );
$image = $renderer->render($codigo_barra);
$image->save('image/image_hash.png');
/******************************************************************************************/
/* Creamos documento PDF
/******************************************************************************************/
$pdf=new PDF('P','cm','Letter');
$pdf->AliasNbPages();
$pdf->AddPage();
$pdf->AddFont('IDAutomationHC39M','','IDAutomationHC39M.php');
$pdf->AddFont('verdana','','verdana.php');
$pdf->SetAutoPageBreak(true);
$pdf->SetMargins(0, 0, 0);
$pdf->SetLineWidth(0.02);
$pdf->SetFillColor(0,0,0);
$pdf->Footer(true);
function cargarEncabezado($pdf, $row1, $row2, $row3, $row4, $Domicilio, $autoriza, $pagina, $CodHash, $row_1, $row_4) {
/******************************************************************************************/
/* ENCABEZADO
/******************************************************************************************/
$pdf->SetTextColor(0,0,150);
$pdf->image("../public/img/logo_empresa.jpg", 1.2, 1.2 , 4.2, 1.5); // x , y, ancho, alto
$pdf->RoundedRect(1, 1, 10, 2.5, 0.2, '');
$pdf->SetFont('arial','B',10);
$pdf->SetXY(5.5,1.5);
$pdf->MultiCell(5.5, 0.4, utf8_decode($row3['razon_social']), 0, "C", 0);
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','',7);
$pdf->SetXY(1,2.9);
$pdf->MultiCell(10, 0.3, utf8_decode($row1['direc']), 0,'C', 0);
$pdf->SetXY(1,3.2);
$pdf->MultiCell(10, 0.3, ""."Telf: ".$row1['telef'], 0,'C', 0);
$pdf->RoundedRect(12, 1, 8, 2.5, 0.2, '');
$pdf->SetTextColor(170,0,0);
$pdf->SetFont('arial','',14);
$pdf->SetXY(12,1.5);
$pdf->Cell(8, 0.25, "RUC: ".$row3['ruc']."", 0, 1,'C', 0);
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','B',12);
$pdf->SetXY(12,2.2);
$pdf->Cell(8, 0.25, utf8_decode($row_4['nombre']." ELECTRÓNICA"), 0, 1,'C', 0);
$pdf->SetTextColor(0,0,150);
$pdf->SetFont('arial','',14);
$pdf->SetXY(12,2.9);
$pdf->Cell(8, 0.25, $row_1['nombre_nota'], 0, 1,'C', 0);
/******************************************************************************************/
/* DATOS DEL CLIENTE
/******************************************************************************************/
$h_titu = $pdf->GetMultiCellHeight(15.3, 0.15, utf8_decode($row1['nombre']) , $border=null, $align='L');
$h_domi = $pdf->GetMultiCellHeight(15.3, 0.15, utf8_decode($Domicilio) , $border=null, $align='L');
$pdf->SetTextColor(255,0,0);
$pdf->SetFont('arial','BI',7);
$pdf->SetXY(0.9,3.6);
$pdf->Cell(1, 0.35, utf8_decode("DOCUMENTO QUE MODIFICA :"), 0, 1,'L', 0);
$pdf->RoundedRect(1, 4, 19, 3.7+$h_titu+$h_domi, 0.2, '');
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','B',10);
if ($row4['nombre'] == "FACTURA") {
$pdf->SetXY(1.1,4.2);
$pdf->Cell(1, 0.35, utf8_decode("Razon Social :"), 0, 1,'L', 0);
$pdf->SetXY(1.1,5.4+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, utf8_decode("RUC"), 0, 1,'L', 0);
}
else {
$pdf->SetXY(1.1,4.2);
$pdf->Cell(1, 0.35, utf8_decode("Señor(es) :"), 0, 1,'L', 0);
$pdf->SetXY(1.1,5.4+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, utf8_decode("DNI"), 0, 1,'L', 0);
}
$pdf->SetXY(1.1,4.8+$h_titu);
$pdf->Cell(1, 0.35, utf8_decode("Dirección :"), 0, 1,'L', 0);
$pdf->SetXY(1.1,6.0+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, utf8_decode("Fecha de anulación"), 0, 1,'L', 0);
$pdf->SetXY(1.1,6.6+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, utf8_decode("Nº ".$row4['nombre']), 0, 1,'L', 0);
$pdf->SetXY(1.1,7.2+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, utf8_decode("Sustento"), 0, 1,'L', 0);
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','',10);
$pdf->SetXY(5.0,4.2);
$pdf->MultiCell(15.3, 0.35, utf8_decode($row1['nombre']), 0, 'L', 0);
$pdf->SetXY(5.0,4.8+$h_titu);
$pdf->MultiCell(15.3, 0.35, utf8_decode($Domicilio), 0, 'L', 0);
$pdf->SetXY(4.7,5.4+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, ": ".utf8_decode($row1['numero_documento']), 0, 1,'L', 0);
$pdf->SetXY(4.7,6.0+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, ": ".date_format(date_create($row_1['fecha_emision']), 'd-m-Y'), 0, 1,'L', 0);
$pdf->SetXY(10.7,6.0+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, utf8_decode("Moneda : SOLES"), 0, 1,'L', 0);
$pdf->SetXY(4.7,6.6+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, ": ".utf8_decode($row1['nombre_comprobante']), 0, 1,'L', 0);
$pdf->SetXY(10.7,6.6+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, "Motivo : ". utf8_decode($row_1["motivo"]), 0, 1,'L', 0);
$pdf->SetXY(4.7,7.2+$h_titu+$h_domi);
$pdf->Cell(1, 0.35, ": ".utf8_decode($row_1["descripcion"]), 0, 1,'L', 0);
/******************************************************************************************/
/* ENCABEZADO DE PRODUCTOS
/******************************************************************************************/
$Y = $h_titu+$h_domi;
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','B',10);
$pdf->SetXY(1,$Y+8);
$pdf->Cell(2, 0.5, utf8_decode("Cant."), 1, 1,'C', 0);
$pdf->SetXY(3,$Y+8);
$pdf->Cell(2, 0.5, utf8_decode("U.M."), 1, 1,'C', 0);
$pdf->SetXY(5,$Y+8);
$pdf->Cell(9, 0.5, utf8_decode("Descripción"), 1, 1,'C', 0);
$pdf->SetXY(14,$Y+8);
$pdf->Cell(2, 0.5, utf8_decode("Precio"), 1, 1,'C', 0);
$pdf->SetXY(16,$Y+8);
$pdf->Cell(2, 0.5, utf8_decode("Descuento"), 1, 1,'C', 0);
$pdf->SetXY(18,$Y+8);
$pdf->Cell(2, 0.5, utf8_decode("Importe"), 1, 1,'C', 0);
/******************************************************************************************/
/* PIE DE PAGINA
/******************************************************************************************/
$pdf->line(1, 25.8, 20.5, 25.8);
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','I',9);
$pdf->SetXY(1,26);
$pdf->MultiCell(19.5, 0.35, utf8_decode("Representación Impresa del Comprobante Electrónico \n Código Hash: $CodHash
Autorizado para ser Emisor Electrónico por la $autoriza \n $pagina \n GRACIAS POR SU PREFERENCIA !!"), 0, 'C');
return $Y;
}
$Y2 = cargarEncabezado($pdf, $row1, $row2, $row3, $row4, $Domicilio, $autoriza, $pagina, $CodHash, $row_1, $row_4);
/******************************************************************************************/
/* LISTA DE PRODUCTOS
/******************************************************************************************/
$Y = $Y2 + 8.5;
$Y1 = 0;
for ($i=0; $i < sizeof($array['detalle']) ; $i++) {
$pdf->SetFont('arial','', 9);
$h_descrip = $pdf->GetMultiCellHeight(9, 0.5, utf8_decode($array['detalle'][$i]['descripcion']), $border=null, $align='L');
$pdf->SetXY(1,$Y+$Y1);
$pdf->Cell(2, $h_descrip, utf8_decode($array['detalle'][$i]['cantidad']), 1, 1,'C', 0);
$pdf->SetXY(3,$Y+$Y1);
$pdf->Cell(2, $h_descrip, utf8_decode($array['detalle'][$i]['unidad_medida']), 1, 1,'C', 0);
$pdf->SetXY(5,$Y+$Y1);
$pdf->MultiCell(9, 0.5, utf8_decode($array['detalle'][$i]['descripcion']) , 1, "L", 0);
$pdf->SetXY(14,$Y+$Y1);
$pdf->Cell(2, $h_descrip, $array['detalle'][$i]['precio_unitario'], 1, 1,'R', 0);
$pdf->SetXY(16,$Y+$Y1);
$pdf->Cell(2, $h_descrip, ($array['detalle'][$i]['descuento']==0 ? $array['detalle'][$i]['descuento'] : '-'.$array['detalle'][$i]['descuento'] ), 1, 1,'R', 0);
$pdf->SetXY(18,$Y+$Y1);
$pdf->Cell(2, $h_descrip, $array['detalle'][$i]['subtotal'], 1, 1,'R', 0);
$Y1 = $Y1 + $h_descrip;
if ($Y1>12) {
$pdf->AddPage();
$pdf->Footer(true);
$Y2 = cargarEncabezado($pdf, $row1, $row2, $row3, $row4, $Domicilio, $autoriza, $pagina, $CodHash, $row_1, $row_4);
$Y = $Y2 + 8.5;
$Y1 = 0;
}
}
$pdf->image('image/image_hash.png',0.7, $Y1+9.3, 9, 3);
$pdf->SetTextColor(0,0,0);
$pdf->SetFont('arial','',10);
if ($row1['id_tipo_comprobante'] == 1) {
if ($sub_total_afe != 0) {
$pdf->SetXY(9.9,$Y1+9.5);
$pdf->Cell(7.6, 0.5, utf8_decode("Valor de Venta - Operaciones Gravadas S/ "), 1, 1,'R', 0);
$pdf->SetXY(17.5,$Y1+9.5);
$pdf->Cell(2.5, 0.5, number_format($sub_total_afe,2), 1, 1,'R', 0);
$Y1 = $Y1 + 0.5;
}
if ($sub_total_exo != 0) {
$pdf->SetXY(9.9,$Y1+9.5);
$pdf->Cell(7.6, 0.5, utf8_decode("Operaciones Exoneradas S/ "), 1, 1,'R', 0);
$pdf->SetXY(17.5,$Y1+9.5);
$pdf->Cell(2.5, 0.5, number_format($sub_total_exo,2), 1, 1,'R', 0);
$Y1 = $Y1 + 0.5;
}
if ($sub_total_ina != 0) {
$pdf->SetXY(9.9,$Y1+9.5);
$pdf->Cell(7.6, 0.5, utf8_decode("Operaciones Inafectas S/ "), 1, 1,'R', 0);
$pdf->SetXY(17.5,$Y1+9.5);
$pdf->Cell(2.5, 0.5, number_format($sub_total_ina,2), 1, 1,'R', 0);
$Y1 = $Y1 + 0.5;
}
$pdf->SetXY(9.9,$Y1+9.5);
$pdf->Cell(7.6, 0.5, utf8_decode("IGV S/ "), 1, 1,'R', 0);
$pdf->SetXY(17.5,$Y1+9.5);
$pdf->Cell(2.5, 0.5, number_format($TotIGV,2), 1, 1,'R', 0);
}
$pdf->SetFont('arial','B',12);
$pdf->SetXY(9.9,$Y1+10);
$pdf->Cell(7.6, 0.7, utf8_decode("Importe Total S/ "), 1, 1,'R', 0);
$pdf->SetXY(17.5,$Y1+10);
$pdf->Cell(2.5, 0.7, number_format($TotMonto,2), 1, 1,'R', 0);
//Monto en letras
$letras = NumeroALetras::convertir($TotMonto, 'soles', 'centimos');
$pdf->SetFont('helvetica','BI',8);
$pdf->SetXY(9.9, $Y1+11);
$pdf->MultiCell(10.1, 0.4,"SON : ".$letras ." SOLES", 0, 'L');
$h_letras = $pdf->GetMultiCellHeight(10.1, 0.4, $letras, $border=null, $align='L');
// nombre de usuario
$pdf->SetXY(0.9,$Y1+12.5);
$pdf->MultiCell(5, 0.4,"USUARIO : ".$row_1['username'] , 0, 'L');
//==============================================================================
$NomArchPDF = "comprobante.pdf";
$pdf->Output($NomArchPDF, 'F'); // Se graba el documento .PDF en el disco duro o unidad de estado sólido.
chmod ($NomArchPDF,0777); // Se dan permisos de lectura y escritura.
//$pdf->Output($NomArchPDF, 'I'); // COMENTAR
$ruta_xml = '../sunat/xml/notas/'.$row3['ruc'].'-'.$row_4['codigo'].'-'.$row_1['nombre_nota'].'.xml';
$nombre_xml = $row3['ruc'].'-'.$row_4['codigo'].'-'.$row_1['nombre_nota'].'.xml';
$archivos = [['name' => "comprobante.pdf", 'type' => "pdf", 'ruta' => "comprobante.pdf"],['name' => $nombre_xml, 'type' => "xml", 'ruta' => $ruta_xml]];
if (isset($_GET['email_cliente'])) {
form_mail($_GET['email_cliente'], $row3['razon_social'], "Estimado cliente le adjuntamos su comprobante electronico, gracias por su preferencia!!", $row3['email'], $archivos);
echo "<script>window.close();</script>";
}
unlink('image/image_hash.png');
function form_mail($sPara, $sAsunto, $sTexto, $sDe, $archivos)
{
$bHayFicheros = 0;
$sCabeceraTexto = "";
$sAdjuntos = "";
$sCuerpo = $sTexto;
$sSeparador = uniqid("_Separador-de-datos_");
$sCabeceras = "MIME-version: 1.0\n";
foreach ($archivos as $vAdjunto)
{
if ($bHayFicheros == 0)
{
$bHayFicheros = 1;
$sCabeceras .= "Content-type: multipart/mixed;";
$sCabeceras .= "boundary=\"".$sSeparador."\"\n";
$sCabeceraTexto = "--".$sSeparador."\n";
$sCabeceraTexto .= "Content-type: text/plain;charset=iso-8859-1\n";
$sCabeceraTexto .= "Content-transfer-encoding: 7BIT\n\n";
$sCuerpo = $sCabeceraTexto.$sCuerpo;
}
$sAdjuntos .= "\n\n--".$sSeparador."\n";
$sAdjuntos .= "Content-type: application/".$vAdjunto['type']."; name=\"".$vAdjunto["name"]."\"\n";
$sAdjuntos .= "Content-Transfer-Encoding: BASE64\n";
$sAdjuntos .= "Content-disposition: attachment;filename=\"".$vAdjunto["name"]."\"\n\n";
$oFichero = fopen($vAdjunto["ruta"], 'rb');
$sContenido = fread($oFichero, filesize($vAdjunto["ruta"]));
$sAdjuntos .= chunk_split(base64_encode($sContenido));
fclose($oFichero);
}
if ($bHayFicheros)
$sCuerpo .= $sAdjuntos."\n\n--".$sSeparador."--\n";
if ($sDe)$sCabeceras .= "From:".$sDe."\n";
return(mail($sPara, $sAsunto, $sCuerpo, $sCabeceras));
}