/C#/Commandline to open outlook minimized

Commandline to open outlook minimized

OPTION EXPLICIT

CONST PATH_TO_OUTLOOK = """C:\Program Files (x86)\Microsoft Office\Office14\OUTLOOK.EXE"""
CONST SHOW_MAXIMIZED = 3
CONST MINIMIZE = 1

DIM shell, outlook

SET shell = WScript.CreateObject("WScript.Shell")

' Open Outlook
shell.Run PATH_TO_OUTLOOK, SHOW_MAXIMIZED, FALSE

ON ERROR RESUME NEXT

' Grab a handle to the Outlook Application and minimize 
SET outlook = WScript.CreateObject("Outlook.Application")
WScript.Sleep(100)
outlook.ActiveExplorer.WindowState = SHOW_MAXIMIZED

' Loop on error to account for slow startup in which case the
' process and/or the main Outlook window is not available
WHILE Err.Number <> 0
  Err.Clear
  WScript.Sleep(100)
  SET outlook = NOTHING
  SET outlook = WScript.CreateObject("Outlook.Application")
  outlook.ActiveExplorer.WindowState = MINIMIZE
WEND

ON ERROR GOTO 0

SET outlook = NOTHING
SET shell = NOTHING

Source: superuser.com

Similar codes

0 vote114 views2 answers
For c#
C#
0 vote154 views1 answer
Unity gun clipping through walls
C#Unity
0 vote105 views1 answer
SonarQube UnitTests
C#
0 vote108 views1 answer
Use c#9
C#
15 votes112 views2 answers
Convert base64 string to string c#
C#
0 vote114 views1 answer
Flatten a list of lists in C#
C#
5 votes127 views1 answer
Asp.net core .gitignore
C#
0 vote113 views1 answer
Unity if object doens't exist
C#
0 vote113 views2 answers
C# read large file
C#
13 votes152 views5 answers
How to unlock cursor in unity
C#Unity