Saturday, April 5, 2008

Script to Add Template path for RMS clients

you will just have to set  office type according to your environment:

Option Explicit

Dim objShell

Dim strMessage, strWelcome, strWinLogon

strWelcome = "AdminTemplatePath" ' New Key

strMessage = "\\server\templates"

strWinLogon = "HKCU\SOFTWARE\Microsoft\office\11.0\common\DRM\"

Shell")

 

objShell.RegWrite strWinLogon & strWelcome, 1, "REG_EXPAND_SZ"

objShell.RegWrite strWinLogon & strWelcome, strMessage, "REG_EXPAND_SZ"

Quit

 

 

 

No comments: