CMDSHELL下利用VBS查看3389端口

Echo Dim ReadComputerName &gt;&gt;port.<b>vbs</b>

Echo Set ReadComputerName=WScript.CreateObject("WScript.Shell") &gt;&gt;port.<b>vbs</b>

Echo Dim TSName,TSRegPath &gt;&gt;port.<b>vbs</b>

Echo TSRegPath="HKLM\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp\PortNumber" &gt;&gt;port.<b>vbs</b>

Echo TSName=ReadComputerName.RegRead(TSRegPath) &gt;&gt;port.<b>vbs</b>

Echo WScript.Echo("TermService port is:"^&amp;TSName) &gt;&gt;port.<b>vbs</b>

Cscript port.<b>vbs</b>

<b></b>

<b> 本文转自 simeon2005 51CTO博客，原文链接:http://blog.51cto.com/simeon/46233</b>