[重要通告]如您遇疑難雜癥,本站支持知識(shí)付費(fèi)業(yè)務(wù),掃右邊二維碼加博主微信,可節(jié)省您寶貴時(shí)間哦!

摘要：利用CMDshell查看3389端口VBS版方法，很多時(shí)候我們只能暫時(shí)取得肉雞的Cmd 權(quán)限，很多時(shí)候肉雞的3389端口已經(jīng)被更改，在這種情況下，大家不妨 用這個(gè)方法來查看一下，使用方法，完全復(fù)制，粘貼到cmd上，回車即可! ...
利用CMDshell查看3389端口VBS版方法，很多時(shí)候我們只能暫時(shí)取得肉雞的Cmd 權(quán)限，很多時(shí)候肉雞的3389端口已經(jīng)被更改，在這種情況下，大家不妨

用這個(gè)方法來查看一下，使用方法，完全復(fù)制，粘貼到cmd上，回車即可!

---------------------------------------------------------------------------------------
Echo Dim ReadComputerName >>misswe.vbs
Echo Set ReadComputerName=WScript.CreateObject("WScript.Shell") >>misswe.vbs
Echo Dim TSName,TSRegPath >>misswe.vbs
Echo TSRegPath="HKLM\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp\PortNumber" >>misswe.vbs
Echo TSName=ReadComputerName.RegRead(TSRegPath) >>misswe.vbs
Echo WScript.Echo("TermService port is:"^&TSName) >>misswe.vbs
Cscript misswe.vbs

方法1 ： VBS 版
Dim ReadComputerName
Set ReadComputerName=WScript.CreateObject("WScript.Shell")
Dim TSName,TSRegPath
TSRegPath="HKLM\System\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp\PortNumber"
TSName=ReadComputerName.RegRead(TSRegPath)
WScript.Echo("終端端口為:"&TSName)
WScript.Echo

將以上內(nèi)容保存后綴名為VBS即可 。

方法2 ：bat 版
@echo off
mode con cols=32 lines=6
for /f "skip=4 tokens=1,2 delims=x" %%a in ('reg query "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp" /v "PortNumber"') do (
set pnL=%%a
set pnR=%%b
)
set /a pn=%pnL:~-1%x%pnR%
echo. & echo 你的終端端口為 : %pn%
echo. & echo 按任意鍵退出 & pause>nul

-------------------------------------------------------------

問題未解決？付費(fèi)解決問題加Q或微信 2589053300 (即Q號(hào)又微信號(hào))右上方掃一掃可加博主微信

所寫所說，是心之所感，思之所悟，行之所得；文當(dāng)無敷衍，落筆求簡潔。 以所舍，求所獲；有所依，方所成！