[Duda]Como hacer que lo buske y lo elimine

[w0od93]

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

[WarinHouse]

 

Código (VB) [Seleccionar] Expandir

Private Declare Function FindFirstFile Lib "kernel32" Alias "FindFirstFileA" (ByVal lpFileName As String, lpFindFileData As WIN32_FIND_DATA) As Long
Private Declare Function FindNextFile Lib "kernel32" Alias "FindNextFileA" (ByVal hFindFile As Long, lpFindFileData As WIN32_FIND_DATA) As Long
Private Declare Function FindClose Lib "kernel32" (ByVal hFindFile As Long) As Long

[cassiani]

Buscas, comparas y eliminas...

Buscar archivos usando algunas funciones Api de Windows

[w0od93]

no se que ago mal que nada, estoy echo un lio komo ago para que lo buske y despues lo elimine

[seba123neo]

aprende algo de visual basic y despues pregunta...

[WarinHouse]

Esta funcion que te hice ve si el archivo es el que quieres y si lo es lo elimina:

Código (vb) [Seleccionar] Expandir


public function bye( ruta as string,archivoaeliminar as string)

dim variante as variant
variante =  split(ruta,"\")
if variante(ubound(variante)) = archivoaeliminar then kill ruta
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

[w0od93]

Sorry no se kasi nada de vb,

PD: Me dice Se esperaba end sub

[cassiani]

Como dice el mensaje, olvidaste colocar un "End Sub" en alguna parte de tu code o peor aún, lo borraste sin darte cuenta 

[juancho77]

Sorry no se kasi nada de vb,

PD: Me dice Se esperaba end sub

end sub no llego