首页 > 编程 > VBScript > 正文

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

2019-10-26 18:01:03
字体:
来源:转载
供稿:网友
将下面代码存为.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 "设置成功"

您可能感兴趣的文章:

Linux下查看端口占用进程号,程序名的方法Linux SSH 安全策略 更改 SSH 端口Linux VPS安全设置之一 修改SSH端口(CentOS/Debian)Windows批量添加防火墙例外端口的批处理代码Linux/window下怎样查看某个端口被哪个程序/进程占用linux 监视端口是否正常的shell脚本windows apache多端口虚拟主机配置方法linux环境apache多端口配置虚拟主机的方法深入介绍C#获取Windows进程监听的TCP/UDP端口实例Windows服务器系统服务端口对照表Windwos下使用winscp和批处理实现通过SSH端口上传文件到Linux服务器上如何解决windows系统和linux系统中端口被占用的问题
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表

图片精选