if (substr(decoct(fileperms($DirArchivos)),-3)!="777") {
chmod( $DirArchivos, 0777 ); // Octal
}
if (trim($_FILES['Archivo' . $i]['name'])!="") {
$cNuevoArch = $DirArchivos . "/" . $_FILES['Archivo' . $i]['name'];
move_uploaded_file($_FILES['Archivo' . $i]['tmp_name'], $cNuevoArch);
chmod( $cNuevoArch, 0755 ); // Octal
$j++;
$aCampos[ 0]["Campo"] = "ArcCodigo" ; $aCampos[ 0]["Valor"] = 0 ;
$aCampos[ 1]["Campo"] = "ArcNombre"; $aCampos[ 1]["Valor"] = $_FILES['Archivo' . $i]['name'] ;
$aCampos[ 2]["Campo"] = "ArcTexto"; $aCampos[ 2]["Valor"] = fPonerBarras($_POST["Texto" . $i]) ;
$aCampos[ 3]["Campo"] = "ArcDirectorio" ; $aCampos[ 3]["Valor"] = $_POST["Directorio" . $i] ;
$aCampos[ 4]["Campo"] = "ArcTipo" ; $aCampos[ 4]["Valor"] = $cArcTipo ;
$cSql = fModiData("Archivos", "Agregar", $aCampos) ;
$nResultado = mysql_query ($cSql) or fErrorSQL($conf["EstadoSitio"], "<br /><br /><b>Error en la consulta:</b><br />" . $cSql . "<br /><br /><b>Tipo de error:</b><br />" . mysql_error() . "<br />");
}
}
} ?>
<form onsubmit="return fValidar(this)" method="post" enctype="multipart/form-data">
<? if (isset($j) and $j==1) { ?>
<span class="gralNormal"><b><center>El archivo fue subido.</center></b></span>
<? } elseif (isset($j) and $j>0) { ?>
<span class="gralNormal"><b><center>Los <?php
echo $j;
?>
archivos fueron subidos.</center></b></span>
<? } ?>
<table border="1" cellspacing="0" cellpadding="1" align="center" bordercolor="#FFFFFF" class="gralTabla">
<img src="Imagenes/botCerrar.gif" width="9" height="9" border="0" alt=""></a> </td>
</tr>
</table>
</body>
</html><?
exit;
}
// Si llegó hasta acá no hay información duplicada
// entonces ejecutamos Código PHP "retenido"
eval($cCodigoPHP);
// y luego agregamos efectivamente el registro
$cSql = fModiData($cTabla, $_REQUEST["Accion"], $aCampos) ;
$nResultado = mysql_query ($cSql) or fErrorSQL($conf["EstadoSitio"], "<br /><br /><b>Error en la consulta:</b><br />" . $cSql . "<br /><br /><b>Tipo de error:</b><br />" . mysql_error() . "<br />");
// Busca el código del último registro ingresado / modificado
// para poder actualizar (ABM) tablas vinculadas con 2L
$nCodigo = ($_REQUEST["Accion"]=="Agregar"?mysql_insert_id():$aCampos[0]["Valor"]) ;
// Armado de la matriz de Campos y Valores
// para poder actualizar (ABM) tablas vinculadas con 2L
$cSql = "SELECT * FROM sysCambios WHERE ModNombre='" . $cModulo . "' AND (CpoOrdenPpal=0 OR CpoTipo='2L') ORDER BY CpoOrdenPpal, CpoOrdenSec" ;
$nResultado = mysql_query ($cSql) or fErrorSQL($conf["EstadoSitio"], "<br /><br /><b>Error en la consulta:</b><br />" . $cSql . "<br /><br /><b>Tipo de error:</b><br />" . mysql_error() . "<br />");
// Me fijo si existen campos 2L
if (mysql_num_rows($nResultado)>1) {
