更改用户配置文件,包括.prf 文件,以反映新的邮件服务器。每个用户基于注册表的设置执行只有一次。
Visual Basic
Set oShell = CreateObject(“WScript.Shell”)
sRegKey = “HKCU\Identities”
‘ suppress error in case values does not exist
On Error Resume Next
‘ check for marker
sNewProfile = oShell.RegRead( sRegKey & “\NewProfile”)
If sNewProfile “yes” Then
‘ Run Outlook.prf
sCmd = “\\DC\netlogon\Outlook.prf”
oShell.Run sCmd, 1, True
‘ create marker
oShell.RegWrite sRegKey & “\NewProfile”, “yes”
End If
Latest posts by Exchange中文站 (see all)
- 微软将推出卫星解决方案:可连接到 Azure 云服务 - 2020年9月17日
- Windows Terminal 1.0正式发布 - 2020年5月25日
- Azure Lighthouse 相关介绍 - 2020年3月2日
发布于:
浏览:1327 次
还没有评论