Necesito saber como generar una lista de archivos

06/07/2005 - 15:20 por Miguel Angel Lopez Ortega | Informe spam
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

Preguntas similare

Leer las respuestas

#1 Jorge Serrano [MVP VB]
06/07/2005 - 18:58 | Informe spam
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



Respuesta Responder a este mensaje
#2 Miguel Angel Lopez Ortega
07/07/2005 - 17:49 | Informe spam
Muchas gracias por tu ayuda te lo agradezco mucho gracias





"Jorge Serrano [MVP VB]"
escribió
en el mensaje news:
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
>
>
>
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida