写了一个修改远程桌面端口的小程序可是修改注册表之后... - TC官方合作论坛

function 远程端口修改程序_init()
ret = reggetvalue("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server\\Wds\\rdpwd\\Tds\\tcp", "PortNumber")
ret1 = reggetvalue("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server\\WinStati**\\RDP-Tcp", "PortNumber")
ret2 = reggetvalue("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server", "fDenyTSConnecti**")
if(ret == null || ret1 == null || ret2 == null)
messagebox("windows系统异常,无法获取远程状态信息!")
exit()
end
if(ret == ret1)
staticsettext("static4", ret)
else
ret = regcreatekey("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server\\Wds\\rdpwd\\Tds\\tcp", "PortNumber", 3389, 0)
ret1 = regcreatekey("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server\\WinStati**\\RDP-Tcp", "PortNumber", 3389, 0)
messagebox("端口异常,已帮您恢复默认端口3389")
远程端口修改程序_init()
end
if(ret2 == 1)
staticsettext("static3", "关闭")
butt**ettext("button0", "开启远程端口")
elseif(ret2 == 0)
staticsettext("static3", "开启")
butt**ettext("button0", "关闭远程端口")
else
ret = regcreatekey("HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server", "fDenyTSConnecti**", 1, 0)
messagebox("端口状态异常,已帮您关闭远程端口")
远程端口修改程序_init()
end
end

复制代码