Find ud af om fil er i mappen

Set oFSys = New Scripting.FileSystemObject

if oFSys.FileExists(Text1.Text & "\Program.exe") then
  'gør noget - filen findes
else
  'gør noget andet - filen findes ikke
end if

Set oFSys = nothing

PS: Hvis Text1.Text er = "C:\" får du "C:\\Program.exe" - du har en "\" for meget

Error: User-defined type not defined

Og den makerer det her: New Scripting.FileSystemObject

Gå til Project > References, og afkryds "Microsoft Scripting Runtime"

Error: Variable not defined (oFSys)

<-- Hvad skal den være? Bare Dim oFSys ?

Havde glemt at Dim'me

Indsæt "Dim oFSys As FileSystemObject" lige før "Set oFS.....

Tak ;)