Alguien me ayuda con un tema de logica

[CAR3S?]

Hola!

bueno, tengo un problemita de memoria 

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. 

[Elemental Code]

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

Código [Seleccionar] Expandir


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

[Psyke1]

Aquí tienes un ejemplo usando la función más rápida del minireto.
http://goo.gl/soolr

Código (vb) [Seleccionar] Expandir


'-------------------------------------------------
'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ódigo [Seleccionar] Expandir


c:\hola.txt
c:\La reproducción de las ranas.mpeg

DoEvents!

[CAR3S?]

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  

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 

[seba123neo]

¿ 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...

[CAR3S?]

explorer.exe siempre va a estar en environ$("windir") & "\"

son archivos como ese, con una ubicacion "unica"