当前位置： 移动技术网 > IT编程>脚本编程>VBScript > 用VBS修改远程桌面3389端口并添加到Windows防火墙的代码

用VBS修改远程桌面3389端口并添加到Windows防火墙的代码

2017年12月12日  | 移动技术网IT编程  | 我要评论
将下面代码存为.vbs，双击运行。然后重启一下系统，就修改了系统的远程桌面的默认的3389端口

'#####################
'vbs修改远程桌面的默认端口,并添加至windows防火墙
'作者51windows.net
'56868为要设置的端口
'#####################

set wshshell = wscript.createobject("wscript.shell")
wshshell.regwrite "hkey_local_machine\system\currentcontrolset\control\terminal server\winstations\rdp-tcp\portnumber",56868,"reg_dword"
wshshell.regwrite "hkey_local_machine\system\currentcontrolset\control\terminal server\wds\rdpwd\tds\tcp\portnumber",56868,"reg_dword"


function addfirewall(name,port,state)
 set objfirewall = createobject("hnetcfg.fwmgr")
 set objpolicy = objfirewall.localpolicy.currentprofile

 set objport = createobject("hnetcfg.fwopenport")
 objport.port = port
 objport.name = name
 objport.enabled = state
 set colports = objpolicy.globallyopenports
 errreturn = colports.add(objport)
end function

call addfirewall("远程桌面56868",56868,1)
set wshshell = nothing

msgbox "设置成功"

您可能感兴趣的文章:

如对本文有疑问， 点击进行留言回复！！

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网