import System.Win32.Com import System.Win32.Com.Automation main = do coInitialize shell