'*********************************************************
' Function FileExists(File As String) As Boolean
'
' Este método devuelve True si la ruta de un archivo 
' existe
'
' Argumentos:
'   File: Ruta completa del archivo del cual se quiere
'   conocer la existencia
'
Sub wzFileExists()
Dim wzFile As String

    WizHook.Key = 51488399
    
    wzFile = "C:\Autoexec.bat"
    Debug.Print WizHook.FileExists(wzFile)
    
End Sub
'*********************************************************