Sometimes we need to purge the Microsoft Teams profile to essentially ‘reset’ the Teams client. This could be for various reasons, such as the Outlook Teams Add-In not installing correctly or some other functionality not working such as breakout rooms.
Here is a simple VBScript can asks the user to close Teams/Outlook (and forces the closure if needs be) and purges the Teams profile.
Option Explicit
On Error Resume Next
dim svc : set svc=getobject("winmgmts:root\cimv2")
dim sQuery : sQuery="select * from win32_process where name='teams.exe' OR name='outlook.exe'"
dim wshShell : Set wshShell = Wscript.CreateObject("WScript.Shell")
dim appData : appData = wshShell.ExpandEnvironmentStrings("%APPDATA%")
dim teamsCache : teamsCache = appData & "\Microsoft\Teams"
'check specific processes are closed
Do
dim cproc : set cproc=svc.execquery(sQuery)
If cproc.count = 0 Then
Exit Do
End If
Msgbox "Please close Teams and Outlook. When you have done this click OK.", 0,"Please Close Applications"
'Forcibly close
wshShell.Run "taskkill /F /IM teams.exe", 0, true
wshShell.Run "taskkill /F /IM outlook.exe", 0, true
WScript.Sleep 1000
Loop
'delete cache
wshShell.Run "cmd.exe /c RD /S /Q " & chr(34) & teamsCache & chr(34), 0, true
'recreate dir
wshShell.Run "cmd.exe /c MD " & chr(34) & teamsCache & chr(34), 0, true
Msgbox "Teams was reset successfully. You can now launch Teams again.", 0,"Please Launch Teams"
Set svc = Nothing
Set wshShell = Nothing
