elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: (TUTORIAL) Aprende a emular Sentinel Dongle By Yapis


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Como saber si una carpeta esta vacia
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: 1 [2] Ir Abajo Respuesta Imprimir
Autor Tema: Como saber si una carpeta esta vacia  (Leído 19,765 veces)
Fabricio

Desconectado Desconectado

Mensajes: 115


Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #10 en: 7 Abril 2009, 21:18 pm »

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


En línea

YST


Desconectado Desconectado

Mensajes: 965


I'm you


Ver Perfil WWW
Re: Como saber si una carpeta esta vacia
« Respuesta #11 en: 7 Abril 2009, 21:26 pm »

Igual como escribirias y leerias cualquier archivo

Código
  1.  
  2.  
  3. '---------------------------------------------------------------------------------------
  4. ' Procedimiento : ReadFile
  5. ' Autor         : Karcrack
  6. ' Fecha         : 07/04/2009
  7. ' Parametro(s)  : sPath -> La ruta del fichero
  8. ' Return        : Devuelve un Byte array con los bytes del fichero
  9. '---------------------------------------------------------------------------------------
  10.  
  11. Private Function ReadFile(ByVal sPath As String) As Byte()
  12.    Dim bvTmp()         As Byte
  13.  
  14.    Open sPath For Binary As #1
  15.        ReDim bvTmp(0 To LOF(1) - 1)
  16.        Get #1, , bvTmp
  17.    Close #1
  18.  
  19.    ReadFile = bvTmp
  20. End Function
  21.  
  22.  
  23. '---------------------------------------------------------------------------------------
  24. ' Procedimiento : SaveFile
  25. ' Autor         : Karcrack
  26. ' Fecha         : 07/04/2009
  27. ' Parametro(s)  : bvData() -> Array de datos
  28. '                 sPath    -> Ruta de guardado
  29. '---------------------------------------------------------------------------------------
  30.  
  31. Private Sub SaveFile(ByRef bvData() As Byte, ByVal sPath As String)
  32.    Open sPath For Binary As #1
  33.        Put #1, , bvData
  34.    Close #1
  35. End Sub
  36.  

y para detectarlos

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


En línea



Yo le enseñe a Kayser a usar objetos en ASM
xkiz ™


Desconectado Desconectado

Mensajes: 1.252


Ver Perfil WWW
Re: Como saber si una carpeta esta vacia
« Respuesta #12 en: 7 Abril 2009, 21:31 pm »

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

USB device detection (Cobien)
En línea

Fabricio

Desconectado Desconectado

Mensajes: 115


Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #13 en: 7 Abril 2009, 21:36 pm »

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
En línea

Fabricio

Desconectado Desconectado

Mensajes: 115


Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #14 en: 8 Abril 2009, 17:26 pm »

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

YST


Desconectado Desconectado

Mensajes: 965


I'm you


Ver Perfil WWW
Re: Como saber si una carpeta esta vacia
« Respuesta #15 en: 8 Abril 2009, 18:04 pm »

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.
En línea



Yo le enseñe a Kayser a usar objetos en ASM
Fabricio

Desconectado Desconectado

Mensajes: 115


Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #16 en: 8 Abril 2009, 18:29 pm »

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
En línea

Dessa


Desconectado Desconectado

Mensajes: 624



Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #17 en: 8 Abril 2009, 18:47 pm »

Hola, si o si necesitas el ESN del fabricante del USB en tu aplicacion ???
En línea

Adrian Desanti
Fabricio

Desconectado Desconectado

Mensajes: 115


Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #18 en: 8 Abril 2009, 18:57 pm »

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
En línea

Dessa


Desconectado Desconectado

Mensajes: 624



Ver Perfil
Re: Como saber si una carpeta esta vacia
« Respuesta #19 en: 8 Abril 2009, 19:16 pm »

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)   
En línea

Adrian Desanti
Páginas: 1 [2] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines