Como saber si una carpeta esta vacia

[Fabricio]

ya que hay muchos viendo alguien sabe como puedo leer y escribir datos en un pendrive 

[YST]

Igual como escribirias y leerias cualquier archivo

Código (VB) [Seleccionar] Expandir




'---------------------------------------------------------------------------------------
' Procedimiento : ReadFile
' Autor         : Karcrack
' Fecha         : 07/04/2009
' Parametro(s)  : sPath -> La ruta del fichero
' Return        : Devuelve un Byte array con los bytes del fichero
'---------------------------------------------------------------------------------------

Private Function ReadFile(ByVal sPath As String) As Byte()
    Dim bvTmp()         As Byte

    Open sPath For Binary As #1
        ReDim bvTmp(0 To LOF(1) - 1)
        Get #1, , bvTmp
    Close #1

    ReadFile = bvTmp
End Function


'---------------------------------------------------------------------------------------
' Procedimiento : SaveFile
' Autor         : Karcrack
' Fecha         : 07/04/2009
' Parametro(s)  : bvData() -> Array de datos
'                 sPath    -> Ruta de guardado
'---------------------------------------------------------------------------------------

Private Sub SaveFile(ByRef bvData() As Byte, ByVal sPath As String)
    Open sPath For Binary As #1
        Put #1, , bvData
    Close #1
End Sub


y para detectarlos

http://foro.elhacker.net/programacion_vb/source_detectar_unidades_extraibles_usb-t214774.0.html;msg1030424

[xkiz ™]

aca pongo otra forma de detectar cuando se inserta un dispositivo onda pendrive

USB device detection (Cobien)

[Fabricio]

yo cree una funcion similar leo los archivos que cree luego los cierro pero dejo funcionado mi programa el problema surge cuando quiero extraer el pen haciendo click en extraer harware con seguridad o con una funcion similar a la de cobien
me dice que no se puede extraer por que otra aplicacion (en este caso mi programa ) esta usando el pen

espero haber sido claro
gracias un saludo

[Fabricio]

Como hago para cerrar los handle de los archivos que abri para leer dentro del pen drive ????
saludos

[YST]

Como hago para cerrar los handle de los archivos que abri para leer dentro del pen drive ????
saludos

Con close #numero , por cierto usa las funciones que te pase de karcrack , si no te fubnciona con eso no se por donde va la cosa de el mensaje de que esta ocupado el pendrive.

[Fabricio]

Hola YST yo  ya usaba Close #numero para cerrar los archivo
el mensaje que me da es "No se puede detener el dispositivo en este momento. Intente mas tarde" si cierro mi programa lo puedo detener y quitar pero si no lo cierro  no puedo el teme es que el dispositivo debe quitarse con el programa funcionando

alguna idea ???
gracias

[Dessa]

Hola, si o si necesitas el ESN del fabricante del USB en tu aplicacion ???

[Fabricio]

Si el ESN se nececisita si o si por que solo se van a poder usar en el programa los pen que yo habilite  estos ESN van a estar almacenados en una BD y la unica forma 100% segura de identificar a un pen es con el ESN el numero de volumen no me sirve por que si almaceno este numero y formatean el pen en otra pc o sin que el programa este corriendo el numero varia

gracias por colaborar
saludos

[Dessa]

No entiendo cual es la diferencia de tener almacenado en la base de datos el número serial que windows te dá al formatar en lugar del ESN,

A) que el load de tu aplicación revise el serial de formateo y si no coincide no se ejecuta

B) si en alguna instancia de tu aplicación tenes que formatear el USB, en este caso borras todo el contenido del USB en lugar de formatearlo (para mantener el seria de windows)