Needs["NETLink`"]; InstallNET[]; ShowNETConsole["stdout"]; LoadNETType["System.Console"]; Console`Out@WriteLine["Hello from .NET"]; Module[{}, file = "C:\\Users\\a\\Desktop\\test.txt"; w = NETNew["System.IO.FileSystemWatcher"]; LoadNETType["System.IO.NotifyFilters"]; LoadNETType["System.IO.File"]; w@Path = FileNameJoin@Drop[FileNameSplit[file], -1]; w@NotifyFilter = NotifyFilters`LastWrite; w@Filter = Last@FileNameSplit[file]; e = AddEventHandler[w@Changed, myHandler]; time = File`GetLastWriteTime[file]@ToBinary[]; myHandler[source_, e_] := ( time2 = File`GetLastWriteTime[file]@ToBinary[]; If[time == time2, Console`Out@WriteLine["Should display once."]; ]; time = time2; ); w@EnableRaisingEvents = True; ]