How to view msg files
"Please contact your system administrator."
![how to view msg files how to view msg files](https://www.coolutils.com/blog/wp-content/uploads/2022/01/image1.png)
Wscript.Echo "Crucial file in script could not be found." &vbNewLine & _ StrKeyProfileVersionPath,strProfileVersionName,ProfileVersion ObjRegistry.SetDWORDValue HKEY_CURRENT_USER,_ ObjRegistry.CreateKey HKEY_CURRENT_USER,strKeyProfileVersionPath 'Save the applied ProfileVersion if larger than 1. StrKeyOutlookSetupPath,strFirstRun2ValueName StrKeyOutlookSetupPath,strFirstRunValueName ObjRegistry.DeleteValue HKEY_CURRENT_USER,_ StrKeyOutlookSetupPath,strImportPRFValueName,strImportPRFValue ObjRegistry.SetStringValue HKEY_CURRENT_USER,_ ObjRegistry.CreateKey HKEY_CURRENT_USER,strKeyOutlookSetupPath StrKeyOutlookSetupPath = "SOFTWARE\Microsoft\Office\" & strOutlookVersion & "\Outlook\Setup" 'Create the Setup key, set the ImportPRF value and delete the First-Run values. StrOutlookVersion = Left(strOutlookVersionNumber, inStr(strOutlookVersionNumber, ".0") + 1) StrOutlookVersionNumber = objFSO.GetFileVersion(strOutlookPathValue & "outlook.exe") If objFSO.FileExists(strOutlookPathValue & "outlook.exe") AND objFSO.FileExists(ProfilePath) Then Set objFSO = CreateObject("Scripting.FileSystemObject") 'Verify that the outlook.exe and the configured prf-file exist HKEY_LOCAL_MACHINE,strKeyOutlookAppPath,strOutlookPath,strOutlookPathValue StrKeyOutlookAppPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\OUTLOOK.EXE" 'The mail profile doesn't exist yet so we'll set the the ImportPRF key and remove the FirstRun keys If IsNull(strValueLastChangeVer) OR ReapplyPrf Then If IsNull(strValueProfileVersion) OR ProfileVersion > strValueProfileVersion Then HKEY_CURRENT_USER,strKeyProfileVersionPath,strProfileVersionName,strValueProfileVersion StrKeyProfileVersionPath = "SOFTWARE\HowTo-Outlook\DeployPRF" HKEY_CURRENT_USER,strKeyProfilePath,strLastChangeVer,strValueLastChangeVer "Software\Microsoft\Windows NT\CurrentVersion\Windows Messaging Subsystem\Profiles\" _ StrComputer & "\root\default:StdRegProv")
![how to view msg files how to view msg files](https://www.encryptomatic.com/images/mvp-view-msg-files-in-html.jpg)
Set objRegistry = GetObject("winmgmts:\\" & _
![how to view msg files how to view msg files](https://www.recoveryandmanagement.com/wp-content/uploads/2021/02/default-message.png)
'=STOP EDITING UNLESS YOU KNOW WHAT YOU ARE DOING= 'Increase the ProfileVersion whenever you want to reapply the prf-file ProfilePath = "\\server\share\profile.prf" 'For more information about this file see 'the mail profile configuration settings. 'If it doesn't, it will set the path to the prf-file containing 'This script determines if a specified mail profile already exists. Script is named deployprf.vbs and placed in the \\domain.local\sysvol\domain.local\scripts Created this script via (Thank you Robert). Used the Office Customization Tool (Office "setup.exe /admin") to export a PRF file containing my custom Outlook config with blank/garbage POP settings, etc.)Ģ. I ran into a couple of snags along the way so I thought I'd post the steps I took to get this working.ġ. I spent the last couple days making your idea work for me, so I apologize for the delayed response.