Necesito saber como generar una lista de archivos

Hola,

en VB 2005 sería:

Imports System.IO

Dim Archivos As String = ""
Dim Ruta As String = "C:\"
Dim Files As String()
Dim File As String
Dim FileOptimo As String
Files = Directory.GetFiles(Ruta, "*.jpg")
For Each File In Files
FileOptimo = Mid(File, Len(Ruta) + 1)
Archivos += FileOptimo & vbCrLf
Next
MessageBox.Show(Archivos.ToString())


En VB 2003 y VB 2002 sería algo similar a (sino me equivoco mucho):

Imports System.IO

Dim Archivos As String = ""
Dim Ruta As String = "C:\"
Dim StoreFile As Directory
Dim Files As String()
Dim File As String
Dim FileOptimo As String
Files = StoreFile.GetFiles(Ruta, "*.jpg")
For Each File In Files
FileOptimo = Mid(File, 4)
Archivos += FileOptimo & vbCrLf
Next
MessageBox.Show(Archivos.ToString())



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


"Miguel Angel Lopez Ortega" wrote:

necesito saber como puedo generar una lista de archivos que se encuentran en
un directorio, para poder realizar el clasico upload atravez de web asp