Listar os arquivos de uma pasta

Listar os arquivos de uma pasta Existe algum exemplo de como listar os arquivos de uma pasta e adicionar para seleção em um componente, para visualização? Eu tentei o TSortList, mas não obtive sucesso!...

Fechado

Marcelo Silva 07/07/2015 (há 8 anos)

Existe algum exemplo de como listar os arquivos de uma pasta e adicionar para seleção em um componente, para visualização?
Eu tentei o TSortList, mas não obtive sucesso!

Pacotão Dominando o Adianti Framework 7

O material mais completo de treinamento do Framework.
Curso em vídeo aulas + Livro completo + Códigos fontes do projeto ERPHouse.
Conteúdo Atualizado! Versão 7.4

Dominando o Adianti 7 Quero me inscrever agora!

Comentários (5)

weliton jose 08/07/2015 (há 8 anos)

espero ter ajudado

<?php
$pasta = 'imagens/'; //NOME DA PASTA
if(is_dir($pasta)) //VERIFICA SE REALMENTE É UM DIRETORIO
{
$diretorio = dir($pasta); // LE O QUE TEM DENTRO DA PASTA
$item = array();
while(($arquivo = $diretorio->read()) !== false) //LE ARQUIVO POR ARQUIVO
{
$item[$arquivo] = $arquivo; //CRIA A ARRAY COM DADOS QUE IRA SER EXIBIDA NA TSortList
}
$diretorio->close();
}
$lista = new TSortList('nome_do_meu_campo'); //CRIA A TSortList
$lista->addItems( $item );//ADD ARRAY EM LISTA
?>

Leandro Coelho 08/07/2015 (há 8 anos)

Não sei se vai ajudar, mais neste exemplo: www.adianti.com.br/framework_files/tutor/index.php?class=FormInterac

tem TCombo::reload('form_interaction', 'response_b', $options); que alimenta uma combo, talvez de para adaptar ai.

Marcelo Silva - AUTOR DO POST 09/07/2015 (há 8 anos)

Obrigado,
foi exatamente o que buscava.

Luiz Jampolsky 11/07/2015 (há 8 anos)

<?php
/**
* CompleteDataGridView Listing
*
* @version 1.0
* @package samples
* @subpackage tutor
* @author Pablo Dall'Oglio
* @copyright Copyright (c) 2006-2013 Adianti Solutions Ltd. (http://www.adianti.com.br)
* @license http://www.adianti.com.br/framework-license
*/
class PublicarInternoForm extends TPage
{
private $form; // registration form
/**
* Class constructor
* Creates the page, the form and the listing
*/
public function __construct()
{
parent::__construct();
// creates the form
$this->form = new TForm('form_Fotografo');
$this->form->class = 'tform'; // CSS class
$this->form->style = 'width: 500px';
// creates a table
$table = new TTable;
$table-> width = '100%';
$this->form->add($table);
// add the table inside the form
// create the form fields
$file = new TCombo('file');
//preenche o combo com os arquivos da pasta
$diretorio = "app/output/";
$arquivos = array();
$i=1;
$ponteiro = opendir($diretorio);
// monta os vetores com os itens encontrados na pasta
while ($nome_itens = readdir($ponteiro)) {
$itens[] = $nome_itens;
}
sort($itens);
// percorre o vetor para fazer a separacao entre arquivos e pastas
foreach ($itens as $listar)
{
// retira "./" e "../" para que retorne apenas pastas e arquivos
if ($listar!="." && $listar!="..")
{
// checa se o tipo de arquivo encontrado é uma pasta
if (is_file($diretorio.$listar))
{
$arquivos[$listar]=$listar;
$i++;
}
}
}
$file->addItems($arquivos);
// add a row for the field nome
$row=$table->addRow();
$row->class = 'tformtitle'; // CSS class
$row->addCell( new TLabel('Publica Arquivos Servidor') )->colspan = 3;
$table->addRowSet( new TLabel('Arquivo: '), $file);
$table->addRowSet( " "," ");
//cria botao de acao
$publica_button = TButton::create('publica', array($this, 'onPublicarInternoSuaFoto'), 'Publicar-SUAfoto', 'ico_print.png');
$mostra_button = TButton::create('mostra', array($this, 'onMostra'), 'Exibir', 'ico_print.png');
$excluir_button = TButton::create('excluir', array($this, 'onExcluir'), 'Excluir', 'ico_print.png');
$download_button = TButton::create('download', array($this, 'onDownload'), 'Download', 'ico_print.png');
$buttons_box = new THBox;
$buttons_box->add($publica_button);
$buttons_box->add($mostra_button);
$buttons_box->add($excluir_button);
$buttons_box->add($download_button);
// add a row for the form actions
$row=$table->addRow();
$row->class = 'tformaction'; // CSS class
$row->addCell($buttons_box)->colspan = 3;
// define wich are the form fields
$this->form->setFields(array($file, $publica_button,$mostra_button,$excluir_button,$download_button));
parent::add($this->form);
}
function onPublicarInternoSuaFoto()
{
try
{
// open a transaction with database 'samples'
TTransaction::open('suafoto');
$conn = TTransaction::get(); //obtem uma conexão
// get the form data into an active record Book
$object = $this->form->getData();
if($object->file<>"")
{
$querie = file_get_contents("app/output/".$object->file);
$result = $conn->query($querie);
new TMessage('info','Banco atualizado com sucesso '.$result->rowCount());
}else{
new TMessage('info','Escolha um arquivo');
}
// close the transaction
TTransaction::close();
}
catch (Exception $e) // in case of exception
{
// shows the exception error message
new TMessage('error', '<b>Error</b> ' . $e->getMessage());
// undo all pending operations
TTransaction::rollback();
}
}
function onMostra()
{
$object = $this->form->getData();
if($object->file<>"")
{
$this->form->setData($object);
$scroll = new TScroll;
$scroll->setSize(640, 460);
$scroll->style = 'padding: 4px; border-radius: 4px;';
$source = new TSourceCode;
$source->loadFile("app/output/".$object->file);
$scroll->add($source);
// wrap the page content
$vbox = new TVBox;
$vbox->add($scroll);
parent::add($vbox);
}
}
function onExcluir()
{
try
{
$object = $this->form->getData();
// define the delete action
//$action = new TAction(unlink("app/output/".$object->file));
//$action->setParameters($param); // pass the key parameter ahead
unlink("app/output/".$object->file);
// shows a dialog to the user
new TMessage('info','Arquivo excluido');
//new TQuestion('Confirma a EXCLUSÃO ?', $action);
}
catch (Exception $e) // in case of exception
{
// shows the exception error message
new TMessage('error', '<b>Error</b> ' . $e->getMessage());
// undo all pending operations
TTransaction::rollback();
}
// preciso de uma forma de recarregar a pagina ou remover este item do $file
}
function onDownload()
{
$object = $this->form->getData();
$file="app/output/".$object->file;
parent::openfile($file);
}
}
?>

Luiz Jampolsky 11/07/2015 (há 8 anos)

preciso de uma ajuda na linha 180 , quando apago um arquivo, ele apaga do diretorio, esta correto, porem não sei como recarregar a lista para não aparecer mais, tenho que sair e voltar.