Test-Contrato-Convenios-Obra-Publica

Obra Pública

echo "

";

function arbol_directorio($ruta){

if ( is_dir($ruta) ){
echo "

";
if ( $dh = scandir($ruta) ){

foreach( $dh as $file ){

if ($file == "." || $file == ".."){

}else{
echo "

• ";
  echo "
  ";
  preg_match('/\((.+)\)/', $file,$titulo);

  if ( count($titulo) > 0){
  echo "".substr($file,0,6) ." ". $titulo[1]."";
  }else{
  if ( strlen($file) <= 4 ){
  $texto = $file;
  }else{
  $texto = substr($file,2);
  }

  echo "".$texto."";

  }
  echo "

  ";
  //echo $file;
  }

  if ( is_dir($ruta.$file) && $file != "." && $file != ".."){
  //echo "$ruta$file";
  arbol_directorio($ruta.$file."/");
  }else{
  "

";
}

}

echo "

";
}

}else{
echo "Ruta inválida";
}

}
?>

Toing