AutoHotKey: Mark Of The Web verwijderen
- 11/11/2024
Inleiding
Wanneer je files gaat downloaden, zeker wanneer er code of macro's mee gemoeid zijn, dan gaat Windows de zogenaamde Mark Of The Web (MOTW) toepassen: dat is een markering om aan te duiden dat het bestand afkomstig van internet, email, enz. Potentieel kan het gevaarlijk zijn voor uw systeem. Je moet dan in de eigenschappen van het bestand gaan en die markering verwijderen. Bvb. macro's in een Excel bestand zullen niet werken als die MOTW niet verwijderd werd. Je moet een vinkje weghalen en zo de blokkering ongedaan maken.
Wanneer ik dus een aantal files download, wens ik automatisch die MOTW markering weg te halen. Onderstaand AutoHotKey script kan die markering verwijderen voor alle files in de Downloads folder die recenter zijn dan de laatste 5 minuten. Die parameter is eenvoudig aan te passen.
^q:: ; Ctrl+q hotkey { ; Haal de huidige tijd op om het meest recente tijdswindow te berekenen recentThreshold := 5 * 60 ; Tijd in seconden recentTime := A_Now EnvAdd, recentTime, -%recentThreshold%, Seconds cPath_Downloads := A_MyDocuments "\..\Downloads" Loop, Files, %cPath_Downloads%\* { ; Check of het bestand nieuwer is dan de threshold if (A_LoopFileTimeModified > recentTime) { ; Check de MOTW (Zone.Identifier alternatieve data stroom) if (FileExist(A_LoopFileLongPath ":Zone.Identifier")) { ; Neem de MOTW markering weg door die data stroom te verwijderen FileDelete, %A_LoopFileLongPath%:Zone.Identifier if ErrorLevel MsgBox, 48, Error, De MOTW markering weghalen faalde voor bestand: %A_LoopFileName% } } } } return
Bespreking van de code
De code is vrij rechttoe rechtaan denk ik. Ik neem hier Ctrl-q als shortcut key (hotkey) maar misschien verkies jij wel een andere combinatie.