Re: Silent or sysocmgr install of 2003 R2 Hardware Management Feature



Thanks for the help
Here is the vbscript subroutine and the .txt file I used. It took a
few tweaks to get going. Just wanted to post a working solution for
others.

Public Sub R2HWMgmt()

Const HKEY_LOCAL_MACHINE = &H80000002

sho.RegWrite
"HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup\SourcePath",
SysDrive & "\INSTALL", "REG_SZ"
sho.RegWrite
"HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Setup\ServicePackSourcePath",
SysDrive & "\INSTALL", "REG_SZ"

Dim aValues
aValues = Array("C:\INSTALL", "C:\INSTALL\I386",
"C:\INSTALL\CMPNENTS\R2")
sKey = "SOFTWARE\Microsoft\Windows\CurrentVersion\Setup"
sMultiValueKey = "Installation Sources"
Set
oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")
oReg.SetMultiStringValue HKEY_LOCAL_MACHINE, sKey, sMultiValueKey,
aValues

ManufacCheck =
UCase((GetObject("WinMgmts:Win32_ComputerSystem='.').Manufacturer))

If InStr(ManufacCheck, "DELL") Then
sho.Run "C:\WINDOWS\System32\sysocmgr /i:C:\WINDOWS\inf\sysoc.inf
/u:C:\INSTALL\SCRIPTS\Settings\HWMgmt.txt",,1

wscript.sleep 3000

sho.Run "cmd.exe /c rundll32 ipmisetp.dll, AddTheDevice",,1
End If

End Sub

HWmgmt.txt:

[Components]
HWMgmt = On

.