'archivo a verificar su existencia
file = "C:\WINDOWS\system32\symldrvc.exe"

set fso = CreateObject("Scripting.fileSystemObject")
if (fso.FileExists(file)) Then
 MsgBox("Existe:" & file)
else 
 MsgBox("NO existe:" & file)
end if