Martini
|
PAROBÉ
RS - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 15/12/2004 09:39 hs
Olá pessoal Eu preciso a partir de uma determinada pasta, pegar todos os arquivos de um determinado tipo (*.prw), que estejam dentro desta pasta ou subpasta desta pasta, com caminho e nome completo, essas informações eu vou adiocionando numa string. O usuário vai selecionar a pasta (isto eu já fiz, coloca o caminho num textbox), e programa vai adiocionar nesta string todos os arquivos (*.prw) dentro desta pasta ou das subpastas da pasta de origem. Obrigado |
|
|
|
|
|
|
|
Postada em 15/12/2004 18:01 hs
MARTINI, BOA TARDE.. Me de seu email que lhe um pequeno programa de exemplo que pode lhe ser util Um abraço |
|
|
|
|
|
Postada em 15/12/2004 23:35 hs
Dê uma olhada: Tem lá programas para localização de arquivos que, devidamente adaptados, servirão para o que necessita.
João Mateus Se precisar de ajuda extra, visite: http://joaomateus.planetaclix.pt
|
|
|
|
Martini
|
PAROBÉ
RS - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 16/12/2004 07:34 hs
|
|
|
|
Sandro
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 17/12/2004 00:30 hs
Olá martini, veja se isso te ajuda: dim Arquivo as String, ListaArquivos as String Arquivo = Dir("C:/Pasta/*.prw") ListaArquivos = "" Do While Arquivo <> "" If ListaArquivo<> "" Then ListaArquivos = ListaArquivos & ", " End If ListaArquivos = ListaArquivos & Arquivo Arquivo = Dir Loop
Debug.print ListaArquivo |
|
|
|
