windows - WMIを介してリモートデスクトップポートを設定できますか？

Question

リモートデスクトップのWMI管理クラスを介して、リモートデスクトップがリッスンするポートを設定する方法を見つけようとしています。レジストリを介してポートを変更できることはわかっていますが、WMIを介してリスニングポートを設定することは可能ですか、それともレジストリを編集する必要がありますか？

Answer 1

はい、できます。これが、このMicrosoftリンクとこれを参照するコードです。3389を使用する新しい値に置き換えます。

const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
'Set StdOut = WScript.StdOut
Set oReg=GetObject( _
    "winmgmts:{impersonationLevel=impersonate}!\\" &_ 
    strComputer & "\root\default:StdRegProv")
strKeyPath = "SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp"
strValueName = "PortNumber"

' Display old value
oReg.GetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
WScript.Echo "Old RDP value=" & dwValue

' Set new value
dwValue= 3389
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
If Err = 0 Then
   oReg.GetDWORDValue _
       HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
   WScript.Echo "New RDP Value =" & dwValue
Else 
   WScript.Echo "Error in creating key" & _
       " and DWORD value = " & Err.Number
End If