Spara följande kod i C:\WINNT\reminder.vbs och exekvera:
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "net send DATORNAMN Är det inte dags att arbeta lite nu?", 0
WshShell.Run "C:\WINNT\[url=http://www.microsoft.com/windows2000/techinfo/reskit/tools/existing/soon-o.asp]soon.exe[/url] 900 C:\WINNT\reminder.vbs", 0
Kanske inte världens bästa, men det funkar. Endast testat under Windows 2000.
