当前位置:96看吧 > 技术文档 > 操作系统 > 修改远程桌面的默认3389端口

修改远程桌面的默认3389端口

时间:2010/02/01
作者:海娃
来源:51windows.net
查看:
标签:3389

'#####################
'VBS修改远程桌面的默认端口,并添加至Windows防火墙
'4000为要设置的端口
'#####################

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp\PortNumber",4000,"REG_DWORD"
WshShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\Wds\rdpwd\Tds\tcp\PortNumber",4000,"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("远程桌面4000",4000,1)
set WshShell = nothing

msgbox "设置成功"

 

上一篇:iisapp.vps的使用方法
下一篇:什么是Win2008 Server Core服务器核心?
页面举报
Report
关闭页面
Close
收藏页面
Favorites
分享页面
Share
版权信息:栏目内,站内会员所分享的全部“资源/素材/文章”,仅供学习与参考,版权为原作者所有。
下载提示:非注册用户每天可下载一个文件,已注册会员不受限制。
网友评论
数据载入中
验证码
  • 请您注意:
  • ·请不要在评论中含与内容无关的广告链接。
  • ·不良评论请用报告管理员,以利管理员及时删除。
  • ·遵守中华人民共和国的各项有关法律法规
  • ·承担一切因您的行为而直接或间接导致的民事或刑事法律责任
  • ·本站管理人员有权保留或删除评论中的任意内容
  • ·您在本站发表的作品,本站有权在网站内转载或引用
  • ·参与本评论即表明您已经阅读并接受上述条款
相关最新
相关热门