Hola!
bueno, tengo un problemita de memoria :rolleyes:
osea, se me olvida el 1 cuando voy pensando el 2 :-\
Yo tengo un list con, por ejemplo
c:\program files\a.exe
c:\a.text
c:\xxx\mr frog, la bestia sexual\parte 1/100.avi
y necesito que con un boton, chequee si a.exe esta en program files, si a.txt esta en c:\
no quiero codigo, necesito ayuda con esto de la logica... como ya dije, cuanto hasta 2 , y me olvide el 1. :-(
para verificar si algo existe yo hice un modulo y se termino convirtiendo en un reto. busca bien.
Ahora para la logica te lo dejo en pseudocodigo mas o menos
si existe el archivo "c:\program files\a.exe" & existe el archivo "c:\a.txt" entonces
Haces la vertical en el bidet
sino
miras un video XXX de mr Frog O.o?
finsi
Asi es lo que necesitas? :S
Aquí tienes un ejemplo usando la función más rápida del minireto. :rolleyes:
http://goo.gl/soolr
'-------------------------------------------------
'Añade 2 ListBox (List1 y List2)
'-------------------------------------------------
Option Explicit
Private Declare Function GetFileAttributesW Lib "KERNEL32" (ByVal lpFileName As Long) As Long
'LeandroA mod Karcrack mod Raul338 mod Mr.Frog
Public Static Function DoFileExistsRII(ByRef sPath As String) As Boolean
DoFileExistsRII = (GetFileAttributesW(StrPtr(sPath)) > -1)
End Function
Private Sub Form_Load()
Dim lngCount As Long
Dim strTmp As String
Dim Q As Long
With List1
.AddItem "c:\hola.txt"
.AddItem "c:\Text\34543554.jpg"
.AddItem "c:\La reproducción de las ranas.mpeg"
lngCount = .ListCount - 1 '// Cantidad de Items
'// Guardaré en el List2 sólo los archivos que existen xP
For Q = 0 To lngCount
strTmp = .List(Q) '// El Item actual
If DoFileExistsRII(strTmp) Then '// Si existe... (¿Aquí estaba el fallo de lógica? xD)
List2.AddItem strTmp '// Lo añado a List2
End If
Next Q
End With
End Sub
Resultado en el 2º ListBox (List2):
c:\hola.txt
c:\La reproducción de las ranas.mpeg
DoEvents! :P
Esta bueno, pero no me entendieron, o no me exprese bien...
Yo quiero saber si el elemento x de el listbox, esta en...
nose como explicarlo, por eso preguntaba de logica..
en el list tengo
c:\windows\a.txt
Yo se que un archivo que se llama a.txt , tiene que estar en c:\, pero ese esta en c:\windows
Entonces, como el archivo no esta donde deberia, que salte, por ejemplo, un msgbox
Necesito usar la logica para eso ;D
Alguna idea?
add: ustedes respondieron con un codigo que comprueba si existe el archivo, pero yo no necesito saber si existe, necesito saber si esta en la ruta correcta :rolleyes:
¿ y como se supone que sabes donde tiene que estar cada archivo ? ahi vos tenes unas rutas, puede que existan ahi o no, y si no existen ahi ¿ donde deben estar ?debes tener una segunda ruta por ahi para saberlo...
explorer.exe siempre va a estar en environ$("windir") & "\"
son archivos como ese, con una ubicacion "unica"