全球主机交流论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

CeraNetworksBGVM服务器IP归属甄别会员请立即修改密码
查看: 218|回复: 6

有没有WIN软件一键更改3389.打开关闭21等这些功能的软件?

[复制链接]
发表于 2021-4-16 16:27:28 | 显示全部楼层 |阅读模式
有没有这样的软件
发表于 2021-4-16 16:48:04 | 显示全部楼层
  1. [url=home.php?mod=space&uid=20206]@echo[/url] off
  2. >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
  3. if '%errorlevel%' NEQ '0' (
  4. goto UACPrompt
  5. ) else ( goto gotAdmin )
  6. :UACPrompt
  7. echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
  8. echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
  9. "%temp%\getadmin.vbs"
  10. exit /B
  11. :gotAdmin
  12. if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" )
  13. title 修改远程端口与用户密码
  14. mode con: cols=55 lines=10
  15. color 17
  16. set "ing=ping -n 5 127.0.0.1 > nul"
  17. :Menu
  18. cls
  19. echo ==============================
  20. echo.
  21. echo 1.修改远程端口
  22. echo.
  23. echo 2.修改用户密码
  24. echo.
  25. echo 3.重启计算机
  26. echo.
  27. echo ==============================
  28. choice /C:123 /N /M "请输入你的选项 [1,2,3]":
  29. if errorlevel 3 goto:Restart
  30. if errorlevel 2 goto:Password
  31. if errorlevel 1 goto:RemotePort
  32. :RemotePort
  33. cls
  34. set /P "Port=自定义远程桌面端口(1-65535): "
  35. if %Port% leq 65535 (
  36. Reg add "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server\Wds\rdpwd\Tds\tcp" /v "PortNumber" /t REG_DWORD /d "%Port%" /f > nul
  37. Reg add "HKLM\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp" /v "PortNumber" /t REG_DWORD /d "%Port%" /f > nul
  38. Reg add "HKLM\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules" /v "{338933891-3389-3389-3389-338933893389}" /t REG_SZ /d "v2.29|Action=Allow|Active=TRUE|Dir=In|Protocol=6|LPort=%Port%|Name=Remote Desktop(TCP-In)|" /f > nul
  39. Reg add "HKLM\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\FirewallRules" /v "{338933892-3389-3389-3389-338933893389}" /t REG_SZ /d "v2.29|Action=Allow|Active=TRUE|Dir=In|Protocol=17|LPort=%Port%|Name=Remote Desktop(UDP-In)|" /f > nul
  40. echo 修改成功
  41. echo 请牢记,你的远程端口是: %Port%
  42. echo 重启计算机生效
  43. %ing% && goto:Menu) else (echo 错误的端口,%Port% 大于所设置的范围,请在"1-65535"内。
  44. %ing% && goto:RemotePort)
  45. :Password
  46. cls
  47. echo 当前修改Administrator用户密码
  48. set /p pwd1=请输入密码:
  49. cls
  50. set /p pwd2=请再次输入密码:
  51. if "%pwd1%"=="%pwd2%" (
  52. net user Administrator %pwd2% > nul
  53. echo 修改成功,请牢记你的密码。
  54. %ing% && goto:Menu)else (echo 密码错误,请重新输入。
  55. %ing% && goto:Password)
  56. :Restart
  57. shutdown.exe /r /f /t 0
复制代码
发表于 2021-4-16 16:28:17 | 显示全部楼层
有的,我家里电脑就存了一份。不急的话,下班了,回去传给你
发表于 2021-4-16 16:28:22 | 显示全部楼层
这还需要软件?

bat一键解决
发表于 2021-4-16 16:40:30 | 显示全部楼层
你直接写个bat用的时候执行就完了。
发表于 2021-4-16 16:51:06 | 显示全部楼层
一千好像用过
发表于 2021-4-16 16:52:48 | 显示全部楼层
修改RDP端口和防火墙

  1. [url=home.php?mod=space&uid=175]@[/url] echo off
  2. color f0
  3. echo 修改远程桌面3389端口(支持Windows 2003 2008 2008R2 2012 2012R2 7 8 10 )
  4. echo 自动添加防火墙规则
  5. echo %date%   %time%
  6. echo    ARK
  7. set /p c= 请输入新的端口:
  8. if "%c%"=="" goto end
  9. goto edit

  10. :edit
  11. netsh advfirewall firewall add rule name="Remote PortNumber" dir=in action=allow protocol=TCP localport="%c%"
  12. netsh advfirewall firewall add rule name="Remote PortNumber" dir=in action=allow protocol=TCP localport="%c%"

  13. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\Wds\rdpwd\Tds\tcp" /v "PortNumber" /t REG_DWORD /d "%c%" /f
  14. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Terminal Server\WinStations\RDP-Tcp" /v "PortNumber" /t REG_DWORD /d "%c%" /f

  15. echo 修改成功
  16. echo 重启后生效,按任意键重启
  17. pause
  18. shutdown /r /t 0
  19. exit

  20. :end
  21. echo 修改失败
  22. pause
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|全球主机交流论坛

GMT+8, 2021-5-17 11:49 , Processed in 0.069469 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表