Laufwerk überwachen. Verwenden von VB Script

Ich möchte ein Laufwerk mit VBScript auf Dateiänderungen überwachen. Ich habe den folgenden Code. Es funktioniert gut für