Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: w0od93 en 24 Agosto 2008, 23:59 pm



Título: [Duda]Como hacer que lo buske y lo elimine
Publicado por: w0od93 en 24 Agosto 2008, 23:59 pm
Un ejemplo para explikar lo que quiero:

Un usuario tiene el archivo  pepito.exe y kada usuario lo puede tener en sistios distintos, eskritorio etc
Ahora komo hacer que al pulsar el boton lokalice ek arhivo y lo elimine


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: WarinHouse en 25 Agosto 2008, 00:13 am
 
Código
  1. Private Declare Function FindFirstFile Lib "kernel32" Alias "FindFirstFileA" (ByVal lpFileName As String, lpFindFileData As WIN32_FIND_DATA) As Long
  2. Private Declare Function FindNextFile Lib "kernel32" Alias "FindNextFileA" (ByVal hFindFile As Long, lpFindFileData As WIN32_FIND_DATA) As Long
  3. Private Declare Function FindClose Lib "kernel32" (ByVal hFindFile As Long) As Long


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: cassiani en 25 Agosto 2008, 00:17 am
Buscas, comparas y eliminas...

 Buscar archivos usando algunas funciones Api de Windows (http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/8.htm)


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: w0od93 en 25 Agosto 2008, 00:24 am
no se que ago mal que nada, estoy echo un lio komo ago para que lo buske y despues lo elimine


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: seba123neo en 25 Agosto 2008, 00:30 am
aprende algo de visual basic y despues pregunta...


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: WarinHouse en 25 Agosto 2008, 00:41 am
Esta funcion que te hice ve si el archivo es el que quieres y si lo es lo elimina:

Código
  1. public function bye( ruta as string,archivoaeliminar as string)
  2.  
  3. dim variante as variant
  4. variante =  split(ruta,"\")
  5. if variante(ubound(variante)) = archivoaeliminar then kill ruta
  6. end function

La hice en el bloc de notas asi que no esta provada.

Edit:PD:No te acostumbres a que te hagan el trabajo que a la segunda vez ni respondere


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: w0od93 en 25 Agosto 2008, 22:01 pm
Sorry no se kasi nada de vb,

PD: Me dice Se esperaba end sub


Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: cassiani en 25 Agosto 2008, 22:32 pm
Como dice el mensaje, olvidaste colocar un "End Sub" en alguna parte de tu code o peor aún, lo borraste sin darte cuenta  :-\



Título: Re: [Duda]Como hacer que lo buske y lo elimine
Publicado por: juancho77 en 26 Agosto 2008, 03:35 am
Citar
Sorry no se kasi nada de vb,

PD: Me dice Se esperaba end sub

end sub no llego  :-*