[gml] Procurar sub-pastas e arquivos

por **PedroX** Ter 03 Jan 2012, 22:03

Esse script serve para procurar todas as sub-pastas de um diretório.

Script:

Código:: ds_list_add(argument0,argument1+'\'); for (i = 0; i < ds_list_size(argument0); i += 1) { path = ds_list_find_value(argument0, i); if file_attributes(path,fa_directory) file = file_find_first(path+"*", fa_directory); while (file != "") { if (file != "." && file != "..") { if file_attributes(path+file, fa_directory) ds_list_add(argument0,path+file+'\') else ds_list_add(argument0,path+file) } file = file_find_next(); //procura o próximo } file_find_close(); //para de procurar } ds_list_delete(argument0, 0); //[deleta a pasta inicial]

Para usar, você pode fazer isso:

Código:: files=ds_list_create(); nome_do_script(files, working_directory);

Até mais!

por luiz_eldorado Qua 04 Jan 2012, 00:02

Notei um "erro" neste script. No final, voce deleta a lista e depois retorna ela? E no exemplo do draw, tem um "i<ds...", sendo que deveria ser "j".
siam étA!

por **PedroX** Qua 04 Jan 2012, 00:04

Eu não deletei a lista, deletei a primeira posição...

Sobre o j, vou arrumar.

por luiz_eldorado Qua 04 Jan 2012, 00:09

Desculpa ai, é que eu confundi com "ds_list_destroy"...
Esqueci de dizer que é uma bom script pra procurar todas as imagens do computador, dando pra fazer uma apresentacao de slides.

siam étA! = Até mais!

por **PedroX** Sex 06 Jan 2012, 19:00

Consegui aumentar o potencial do script, agora ele pode procurar por sub-pastas e arquivos (antes só encontrava as sub-pastas).

Removido e adicionado ao post inicial.

Você já viu como desenhar, então é isso.

Até mais!

por **saim** Sex 06 Jan 2012, 22:41

Maravilhoso, Pedrø. Eu tinha me virado usando a primeira lista (só de pastas) como base de um "for" e procurado, em cada pasta, todos os arquivos com uma extensão específica.
Do meu jeito, podemos filtrar os arquivos, mas do seu fica fácil de adaptar pra fazer a mesma coisa de uma forma mais elegante e mais rápida.

Kudos pra você.

Kudos extra se conseguir fazer esse filtro entrar como argumento do script.

por luiz_eldorado Sex 06 Jan 2012, 22:52

Sabe Pedro, eu testei o script e ficou estranho. Tinha as pastas e arquivos juntos, mas no final tinha uma copia das pastas, e o nome delas estava duplicado, tipo: "PastaPasta".
Teria como excluir todas as pastas da lista e deixar so os arquivos?

por **PedroX** Sex 06 Jan 2012, 22:57

@saim
Pode me dizer como você fez?

Editado: troque a linha parecida com a seguinte pela seguinte:

Código:: file = file_find_first(path+"*."+argument2, fa_directory);

Agora coloque a extensão assim: nome(files, working_directory, 'exe');

@luiz
~~Como sempre, achando um erro.~~

Aqui funcionou normal. Está fazendo direito?

por **saim** Sex 06 Jan 2012, 23:28

Do jeito tosco, ora!
De posse de uma lista com todas as sub-pastas, bastou usar file_find (first e next, como você fez no script) em cada item da list pra ter uma lista completa dos arquivos. Pra achar só de um tipo de arquivo, basta colocar a extensão na mask.
Quando achava alguma coisa, punha numa segunda lista o caminho e o arquivo.

Como eu disse, seu método é mais elegante. Mas admito que não cheguei a testá-lo. Eu já tinha me virado, ficou mais como informação.

Só que eu nem fiz a segunda lista, já joguei direto pro arquivo de texto que eu estava tentando fazer. Separei o path e o arquivo por ";" e ficou facinho de importar o texto pro excell.
Agora, ainda tenho que pegar o script do ninja8086 e jogar as demais informações no texto. Depois, ler aula-por-aula de binário pra ver se entendo o script dele, também...

Edit: só depois vi que o seu edit era pra mim...
Kudos extra! Merecidos!

por Conteúdo patrocinado

[gml] Procurar sub-pastas e arquivos

[gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos

Re: [gml] Procurar sub-pastas e arquivos