Hem / Tips & tricks
testFile = InputBox("Enter a file or directory to test with","NTAccess.Permissions","c:\someFile.txt") if Trim(testFile) <> "" then DoTest end if