@echo off

REM * This script's purpose is to delete and recreate all components of a user's mail profile *
REM 
REM * This script is only intended to be run for repairing outlook on the terminal servers *
REM 

REM We start with closing outlook processes if they are still running.

taskkill /IM ObClnt32.exe /F
taskkill /IM Outlook.exe /F
taskkill /IM CTFMON.exe /F
taskkill /IM obunity.exe /F

REM Lets pause for a few moments to make sure everything is closed

Timeout /T 5 /NOBREAK

REM Now we're going to delete the current Office settings for our user.
REM First we'll delete the data saved to the network.

Del "\\netshare\userconfigs$\%username%\PSCitrixconfig\Outlook\Outlookran.txt" /q
Del "\\netshare\userconfigs$\%username%\PSCitrixconfig\Outlook\Outlookmessaging.reg" /q
Del "\\netshare\userconfigs$\%username%\PSCitrixconfig\Outlook\Office.reg" /q

REM second we delete the local data

Reg Delete "HKCU\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem" /va /f
Reg Delete "HKCU\Software\Microsoft\Office\14.0\Outlook\Setup" /v FirstRun /f
Reg Delete "HKCU\Software\Microsoft\Office\14.0\Outlook\Setup" /v First-Run /f
Reg Delete "HKCU\Software\Microsoft\Office\14.0\Outlook\Setup" /v ImportPRF /f

RD "c:\users\%username%\Appdata\Local\Microsoft\Outlook" /S /Q
RD "C:\users\%username%\Appdata\Roaming\Microsoft\Outlook" /S /Q

REM now that all data has been purged, lets pause again to catch our breath.

Timeout /T 5 /NOBREAK

REM Now we recreate profile folders and insert the default Outlook startup registry values

MD "c:\users\%username%\Appdata\local\Microsoft\Outlook"
MD "c:\users\%username%\Appdata\Roaming\Microsoft\Outlook"

Reg Add "HKCU\Software\Microsoft\Office\14.0\Outlook\Setup" /v FirstRun /t Reg_dword /d 0
Reg Add "HKCU\Software\Microsoft\Office\14.0\Outlook\Setup" /v First-Run /t Reg_dword /d 0
Reg Add "HKCU\Software\Microsoft\Office\14.0\Outlook\Setup" /v ImportPRF /t Reg_Sz /d "c:\Progra~2\Micros~2\Custom14.prf"

REM In theory our settings have been defaulted, now lets try launching Outlook.

Timeout /T 5 /NOBREAK

Start Ctxhide.exe "C:\Program Files (x86)\Microsoft office\office14\Outlook.exe"
Xcopy "C:\scripts\Outlookran.txt" "\\netshare\userconfigs$\%username%\PsCitrixConfig\Outlook" /Y

Timeout /T 5 /NOBREAK

taskkill /IM Outlook.exe /F
taskkill /IM CTFMON.exe /F
regedit /E "\\netshare\userconfigs$\%username%\PsCitrixConfig\Outlook\Outlookmessaging.reg" "HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem"
regedit /E "\\netshare\userconfigs$\%username%\PsCitrixConfig\Outlook\Office.reg" "HKEY_CURRENT_USER\Software\Microsoft\Office"

Timeout /t 5 /NOBREAK

c:
cd\

exit

SetConsole('SHOW')
;
; Declaring Global Variables
;
DIM $Selection ;Used to determine the button pressed by the user.
DIM $FILE1 ; OutlookRan.txt on netshare share
DIM $FILE2 ; OutlookMessaging.reg on netshare share
DIM $FILE3 ; Office.reg on netshare share
DIM $FILE4 ; Default PRF file for profile setup
DIM $FILE5 ; OutlookRan.txt check file
DIM $PATH1 ; Path to Outlook folder on netshare
DIM $PATH2 ; Local Appdata path to Outlook settings
DIM $PATH3 ; Roaming Appdata path to Outlook settings
DIM $REGPATH1 ; Registry key path to Windows Messaging subsystem
DIM $REGPATH2 ; Registry key path to FirstRun Setup key
DIM $REGPATH3 ; Registry key path to First-Run Setup key
DIM $REGPATH4 ; Registry key path to ImportPRF Setup key
DIM $APP ; The EXE we want to run
DIM $KILLAPP1 ; script that makes sure Outlook is not running
DIM $REGEXPORTS ; script for registry exports
;
$Rc = SetOption('NoVarsInString', 'On')
$Rc = SetOption('NoMacrosInString', 'On')
;
; Specify File and Path Variables
;
$FILE1 = '\\netshare\userconfigs$\' + @userid + '\PsCitrixConfig\Outlook\Outlookran.txt'
$FILE2 = '\\netshare\userconfigs$\' + @userid + '\PSCitrixConfig\Outlook\OutlookMessaging.reg'
$FILE3 = '\\netshare\userconfigs$\' + @userid + '\PSCitrixConfig\Outlook\Office.reg'
$FILE4 = 'c:\Progra~2\Micros~2\Custom14.prf'
$FILE5 = 'c:\Scripts\OutlookRan.txt'
$PATH1 = '\\netshare\userconfigs$\' + @userid + '\PSCitrixConfig\Outlook'
$PATH2 = 'c:\users\' + @userid + '\Appdata\Local\Microsoft\Outlook'
$PATH3 = 'c:\users\' + @userid + '\Appdata\Roaming\Microsoft\Outlook'
;
; Specify Registry Path Variables
;
$REGPATH1 = 'HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem'
$REGPATH2 = 'HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Outlook\Setup'
$REGPATH3 = 'HKEY_CURRENT_USER\Software\Microsoft\Office'
;
; Specify application variables
;
$APP = 'C:\scripts\Apphelpscripts\LaunchOutlook.cmd'
;
; Specify additional script variables
;
$KILLAPP1 = 'c:\scripts\apphelpscripts\taskkilloutlook.cmd'
$REGEXPORTS = 'c:\scripts\apphelpscripts\regexports.cmd'
;
; Provide the user a popup message asking them if they want to proceed with this script or to exit.
;
$Selection = MessageBox ("This will rebuild your Outlook profile, Do you wish to continue? Press YES to rebuild your outlook profile, or press NO to cancel", "                                      Rebuild Outlook profile", 36) 
If $Selection = 6
		; Now we're going to start deleteing data
		MessageBox ("Once you click OK on this message the Outlook reset process will start. Please wait until you see another message informing you the rebuild has completed before using any office applications.", "                  Outlook profile rebuild started.....", 0, 10)
		RUN $KILLAPP1
		Sleep 5 
		DELTREE ($REGPATH1)
		DELVALUE ($REGPATH2, "FirstRun")
		DELVALUE ($REGPATH2, "First-Run")
		DELVALUE ($REGPATH2, "ImportPRF")
		DEL $FILE1 /c
		DEL $FILE2 /c
		DEL $FILE3 /c
		SHELL '%comspec% /c RD $PATH2 /S /Q'
		SHELL '%comspec% /c RD $PATH3 /S /Q'
		Sleep 5 ; script paused for 5 seconds, after the pause we start re-adding default data
		MD $PATH2
		MD $PATH3
		WriteValue ($REGPATH2, "FirstRun", "0", "REG_DWORD")
		WriteValue ($REGPATH2, "First-Run", "0", "REG_DWORD")
		WriteValue ($REGPATH2, "ImportPRF", $FILE4, "REG_SZ")
		SLEEP 5 ; Now we're going to start outlook up
		RUN $APP
		SLEEP 10 ; Pausing the let outlook sort out it's profile, next we kill Outlook. 
		RUN $KILLAPP1
		SLEEP 5 ; Pause a moment to let Outlook close and clean up, then we copy our correct outlook profile settings out to our network share for safe keeping
		COPY $FILE5 $PATH1 
		RUN $REGEXPORTS
		SLEEP 5 ; Last pause before our final message box.
		MessageBox ("Your Outlook profile has been Rebuilt, and your e-mail should now work properly. If you continue to have problems with using Outlook, please open a Helpdesk or contact extention 2500.", "                           Outlook Profile Rebuild Completed!", 0, 10)
	ELSE
		EXIT
ENDIF
EXIT

shell '%comspec% /c Taskkill /IM outlook.exe /F'

$APP = 'c:\program files (x86)\Microsoft\Office\Outlook.exe'
RUN $App

shell '%compspec% /c Reg Export $REGPATH3 $FILE3'