' Are You Doing The Right Things
' Description: A Simple Message VBScript
' Created by Beau Turner
' v0.1 released on July 15, 2009
' 
' Note: If you want this to show up and disappear after a designated time period rather than
'       pressing the OK button you just need to change the 0 in the last line ex. 3 = 3 seconds
'
strTitle="The 4-Hour Work week" 

Dim WSHShell 
Set WSHShell=WScript.CreateObject("WScript.Shell") 

WSHShell.Popup"Are you inventing things to do to avoid the important?",0,strTitle