Const HKEY_LOCAL_MACHINE = &H80000002
Fijar el oReg=GetObject (“winmgmts: ¡{impersonationLevel=impersonate}! \ \. \ raíz \ defecto: StdRegProv”)
strKeyPath = “SISTEMA \ CurrentControlSet \ servicios \ lanmanserver \ parámetros”
strVal = “IRPStackSize”
oreg.getdwordvalue HKEY_LOCAL_MACHINE, strKeyPath, strVal, dwValue
si isnull (dwValue) entonces
oReg.SetDwordValue HKEY_LOCAL_MACHINE, strKeyPath, strVal, 33
Dwvalue de WScript.Echo
Si dwvalue <> 33 entonces oReg.SetDwordValue HKEY_LOCAL_MACHINE, strKeyPath, strVal, 33
Terminar si
|