Leer nombre de carpetas

Iniciado por elqueteconte, 9 Noviembre 2015, 14:50 PM

0 Miembros y 1 Visitante están viendo este tema.

Eleкtro

#10
Cita de: elqueteconte en  9 Noviembre 2015, 22:53 PM
Código (vbnet) [Seleccionar]
Convert.ToInt32(DTPUntil.Value.ToString("yyyyMMdd"))

Es esto correcto?

Si.




Cita de: elqueteconte en  9 Noviembre 2015, 22:53 PMhe intentado con la variable targetDirInfo y dirInfo pero  me está dando error de no declarado o inaccesible.

Siempre puedes declarar el miembro o variable con una visibilidad pública y usar el keyword Shared para hacer el miembro globalmente accesible desde el resto de classes.

Código (vbnet) [Seleccionar]
Public Shared targetDirInfo As DirectoryInfo
Public Shared dirInfo As DirectoryInfo





Cita de: elqueteconte en 12 Noviembre 2015, 17:28 PM
Código (vbnet) [Seleccionar]

Dim directories As IEnumerable(Of DirectoryInfo) = SelectDirectories(dateDir, Me.year, monthNumber, Enumerable.Range(InitialDate.Day, differenceInDays))


error de IEnumerable (Of Integer) to String.


CitarQue estoy haciendo mal? :-\

El número y tipo de argumentos que intentas usar no cuadra con ninguna firma del método SelectDirectories

Debes llamar a este método y para ello te falta asignarle el último parámetro (dateFormat), ya lo habiamos hablado.

Código (vbnet) [Seleccionar]
SelectDirectories(ByVal sourceDir As String,
                 ByVal year As Integer,
                 ByVal month As Integer,
                 ByVal days As IEnumerable(Of Integer),
                 ByVal dateFormat As String)


Saludos








elqueteconte

#11
Saludos amigo,

Gracias mil por la acotación creo que mezcle peras con manzanas.

Voy a dividir las dudas en función de la manera como se puede llamar al método MoveDateDirectories
1.- Mensual:
La definición o declaración de la variable sería:
Código (vbnet) [Seleccionar]
Dim directories As IEnumerable(Of DirectoryInfo) = DateUtil.SelectDirectories(dateDir, Me.year, monthNumber, DateUtil.DirNameFormat)
El llamado al metodo sería:
Código (vbnet) [Seleccionar]

MoveDirectories(directories, dateDir)


Pero al hacer debuging y evaluar los resultados, el metodo no está moviendo las carpetas, revisando mas a fondo encuentro que al evaluar la variable directories esta emite un mensaje que reza: Empty = "La enumeración no produjo ningún resultado".


2.- Semanal:
La definición o declaración de la variable sería:
Código (vbnet) [Seleccionar]
Dim directories As IEnumerable(Of DirectoryInfo) = SelectDirectories(dateDir, Me.year, monthNumber, Enumerable.Range(InitialDate.Day, differenceInDays), DateUtil.DirNameFormat)
El llamado al metodo sería el mismo que el mensual:
Código (vbnet) [Seleccionar]
MoveDirectories(directories, dateDir)

Preguntas:
a.- Porque la variable directories tiene ese mensaje de error?

b.- Donde y para qué se colocaría la declaración de:
Código (vbnet) [Seleccionar]

Public Shared targetDirInfo As DirectoryInfo
Public Shared dirInfo As DirectoryInfo


Desde ya mil gracias brother. :laugh:

Un abrazo y el mejor de los días para todos....


elqueteconte

RESUELTO...!!!!  :laugh: ;-) :silbar: ::)

Encontré la solución...

Explicación:

El problema era que en la definición de la variable directories; el primer parametro que el metodo SelectDirectories recibe es el sourcedir (directorio origen) y yo le estaba pasando dateDir (directorio destino) entonces pues se generaba un conflicto y el metodo no generaba la lista de los días y se generaba la variable vacía.

La solución fue utilizar el valor del SelectedPath y voilà caso resuelto.
La definición quedaría de la siguiente manera:
Código (vbnet) [Seleccionar]
Dim directories As IEnumerable(Of DirectoryInfo) = DateUtil.SelectDirectories(Me.fdg.SelectedPath, Me.year, monthNumber, DateUtil.DirNameFormat)

Sigo trabajando....

Gracias mil...!