[Resolvido]Abrir aplicativo se "tal arquivo existir"

Boa tarde amigos,gostaria de um exemplo que só abrisse se existisse uma pasta com um arquivo qualquer, em um lugar do pc ex: "C:\Windows\XPTO.dll" ' .
Se não existir essa pasta o aplicativo não abriria.
E existindo abriria normal a tela de login.
Alguém teria...

REsolvido,mestre Avelino me deu o caminho da pedras.
Abç.

Olá Kaynan Almeida,
Pode partilhar a solução.
Os utilizadores do fórum agradecem.
Abraço

Com esse código resolvi.
Abç.


Dim fso
Dim file As String
file = "C:\Windows\JARS.dll" ' caminho do ficheiro
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FileExists(file) Then
MsgBox " Esse programa não está autorizado a rodar nesse computador,contate seu programador.", vbInformation, "Protegido por Direitos Autorais"
DoCmd.Quit
Else
End If