Buscar archivos

Hola Pablo,

espero que esta rutina te ayude.

Dim Files As String()
Dim File As String
Dim strDirectorio As String = "C:\"
Files = Directory.GetFiles(strDirectorio, "*.jpg")
Dim miFileInfo As FileInfo
For Each File In Files
TextBox1.Text = TextBox1.Text & (Mid(File, strDirectorio.Length
+ 1))
Next

Un saludo,

Jorge Serrano Pérez
Microsoft MVP VB.NET
http://www.portalvb.com/
http://weblogs.golemproject.com/jorge/


"Pablo Fabian Savino" wrote:

Hola,

como puedo buscar archivos de una extencion determinada en una carpeta de mi
disco?

saludos

Graciasssssssssssss
funciona de mil maravillas!!!

Saludos Jorge

"Jorge Serrano [MVP VB]"
wrote in
message news:

Hola Pablo,

espero que esta rutina te ayude.

Dim Files As String()
Dim File As String
Dim strDirectorio As String = "C:\"
Files = Directory.GetFiles(strDirectorio, "*.jpg")
Dim miFileInfo As FileInfo
For Each File In Files
TextBox1.Text = TextBox1.Text & (Mid(File, strDirectorio.Length
+ 1))
Next

Un saludo,

Jorge Serrano Pérez
Microsoft MVP VB.NET
http://www.portalvb.com/
http://weblogs.golemproject.com/jorge/


"Pablo Fabian Savino" wrote:

Hola,

como puedo buscar archivos de una extencion determinada en una carpeta de
mi
disco?

saludos

En este caso, que objeto es "directory" y "Files"

Hola Pablo,

espero que esta rutina te ayude.

Dim Files As String()
Dim File As String
Dim strDirectorio As String = "C:\"
Files = Directory.GetFiles

(strDirectorio, "*.jpg")

Dim miFileInfo As FileInfo
For Each File In Files
TextBox1.Text = TextBox1.Text & (Mid(File,

strDirectorio.Length

+ 1))
Next

Un saludo,

Jorge Serrano Pérez
Microsoft MVP VB.NET
http://www.portalvb.com/
http://weblogs.golemproject.com/jorge/


"Pablo Fabian Savino" wrote:

Hola,

como puedo buscar archivos de una extencion

determinada en una carpeta de mi

disco?

saludos

.

Hola,

pertenencen al nombre de espacio System.IO.

Un saludo,

Jorge Serrano Pérez
MVP VB.NET


"" wrote:

En este caso, que objeto es "directory" y "Files"
>Hola Pablo,
>
>espero que esta rutina te ayude.
>
> Dim Files As String()
> Dim File As String
> Dim strDirectorio As String = "C:\"
> Files = Directory.GetFiles
(strDirectorio, "*.jpg")
> Dim miFileInfo As FileInfo
> For Each File In Files
> TextBox1.Text = TextBox1.Text & (Mid(File,
strDirectorio.Length
>+ 1))
> Next
>
>Un saludo,
>
>Jorge Serrano Pérez
>Microsoft MVP VB.NET
>http://www.portalvb.com/
>http://weblogs.golemproject.com/jorge/
>
>
>"Pablo Fabian Savino" wrote:
>
>> Hola,
>>
>> como puedo buscar archivos de una extencion
determinada en una carpeta de mi
>> disco?
>>
>> saludos
>>
>>
>>
>.
>