Hi,

I need a vbscript to write a REG_DWORD value.

Below is the key for which I want a vbscript.

HKCU\Software\Microsoft\Office\Frontpage\AddIns\PDMAddIn.Connect\LoadBehavior",dword:00000003

Can any one give the VB Script for this.

Thanks,
Sanhivi
0 Comments   [ + ] Show Comments

Comments

Please log in to comment

Rating comments in this legacy AppDeploy message board thread won't reorder them,
so that the conversation will remain readable.

Answers

0
Hi,

You can write the script in 2 mins. anyway, You can find the help here...http://msdn.microsoft.com/en-us/library/yfdfhz1b(VS.85).aspx

The script must be executed only when user is logged in. If you want to create the registry for every user whoever logon to that machine then run the script thru active setup.

let me know if you need more details.

regards
Answered 05/20/2010 by: WSPPackager
Senior Purple Belt

Please log in to comment
0
I have written the VB Script.
Option Explicit
On Error Resume Next
Dim WshShell
Set WshShell=CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\Software\Microsoft\Office\Frontpage\AddIns\PDMAddIn.Connect\LoadBehavior","3","REG_DWORD"

It is working fine.

Thanks
Sanhivi
Answered 05/21/2010 by: sanhivi
Second Degree Green Belt

Please log in to comment
0
As is common with beginners, you have zero error-trapping, to cater for the time when it stops working fine. And it will...
Answered 05/21/2010 by: VBScab
Red Belt

Please log in to comment
0

Is there an script to create multiple registry string values\

Answered 11/09/2016 by: bha
White Belt

Please log in to comment
0
Below is the example code I found on the internet long ago complete with examples.  I use it in almost all of my vbscript when editing, reading, changing the registry.

'-----------------------------------------------------
' Set Optional Registry Entries
'-----------------------------------------------------
Dim strKeyPath, iValues, oReg, BinaryValueName, DWordValueName, DWordValue
Dim StringValueName, StringValue
Const HKEY_CURRENT_USER = &H80000001
Const HKEY_LOCAL_MACHINE =  &H80000002
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
Set WShShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
userProfilePath = WSHShell.ExpandEnvironmentStrings("%UserProfile%")
WShShell.Popup "Optional Registry Entries being Updated.", 1, "Siemens Industry, Inc", 64
'-----------------------------------------------------
' Variables and Examples used in Registry Settings
'-----------------------------------------------------
' SetStringValue = REG_SZ
' SetDWORDValue = REG_DWORD
' SetBinaryValue = REG_BINARY
' SetExpandedStringValue = REG_EXPAND_SZ
' SetMultiStringValue =
' CreateKey
' DeleteKey
' DeleteValue
      'Regtype should be “REG_SZ” for string, “REG_DWORD” for a integer,…
      '”REG_BINARY” for a binary or boolean, and “REG_EXPAND_SZ” for an expandable string
'“REG_DWORD”
'strKeyPath = ""
'DWordValueName = ""
'DWordValue = ""
'oReg.SetDWordValue HKEY_LOCAL_MACHINE,strKeyPath, DWordValueName, DWordValue

'”REG_BINARY”
'strKeyPath = ""
'iValues = Array(&H,&H)' Default = "00,00,00,00"
'BinaryValueName = ""
'oReg.SetBinaryValue HKEY_LOCAL_MACHINE,strKeyPath,BinaryValueName,iValues

'“REG_SZ”
'strKeyPath = ""
'StringValueName = ""
'StringValue = "" ' Default = "00000000"
'oReg.SetStringValue HKEY_CURRENT_USER,strKeyPath, StringValueName, StringValue

'“REG_EXPAND_SZ”
'strKeyPath = ""
'StringValueName = ""
'StringValue = "" ' Default = "00000000"
'oReg.SetExpandedStringValue HKEY_CURRENT_USER,strKeyPath, StringValueName, StringValue
Answered 11/22/2016 by: lkitsmiller
Yellow Belt

Please log in to comment
0
Here's an actual example to see how everything is filled out:

'-----------------------------------------------------
' Show all SystemTray Icons
'-----------------------------------------------------
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Explorer"
DWordValueName = "EnableAutoTray"
DWordValue = "00000000"
oReg.SetDWordValue HKEY_LOCAL_MACHINE,strKeyPath, DWordValueName, DWordValue
Answered 11/22/2016 by: lkitsmiller
Yellow Belt

Please log in to comment
Answer this question or Comment on this question for clarity
Admin Script Editor
Admin Script Editor is an integrated scripting environment available free here at ITNinja

Share