[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[系统相关] 批处理修改计算机名、网络连接ip、网关、子网掩码、dns

  1. @echo off
  2. title 小程序 Ver 1.0 【 Design:musicbug 】
  3. mode con: cols=64 lines=26 & color 9f
  4. :loop
  5. CLS
  6. @echo.
  7. @echo     ※※※※※※※※※※※※※※※※※※※※※※※※※※※※
  8. @echo     ※                                                    ※
  9. @echo     ※      本程序将为您设置计算机名和本地连接IP地址      ※
  10. @echo     ※                                                    ※
  11. @echo     ※                                                    ※
  12. @echo     ※      「1」- 设置计算机名称                         ※
  13. @echo     ※                                                    ※
  14. @echo     ※      「2」- 手动设置本地连接 IP 和 DNS             ※
  15. @echo     ※                                                    ※
  16. @echo     ※      「3」- 自动获取 IP 和 DNS                     ※
  17. @echo     ※                                                    ※
  18. @echo     ※      「4」- 退出程序                               ※
  19. @echo     ※                                                    ※
  20. @echo     ※※※※※※※※※※※※※※※※※※※※※※※※※※※※
  21. @echo.
  22. @echo      ******请选择设置方式 [1,2,3,4],并按回车确定执行******
  23. @echo.
  24. @echo.
  25. @echo.
  26. @echo.
  27. @echo.
  28. @echo.
  29. @echo.
  30. @ SET /P ST="请输入序号:"
  31. echo.
  32. if /I "%ST%"=="1" goto setup1
  33. if /I "%ST%"=="2" goto setup2
  34. if /I "%ST%"=="3" goto setup3
  35. if /I "%ST%"=="4" exit
  36. goto loop
  37. :setup1
  38. cls
  39. @echo.
  40. @echo         ******即将修改计算机名,输入完成请回车确定******
  41. @echo.
  42. @echo.
  43. set /p pcname="请输入计算机名:"
  44. reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\ComputerName\ActiveComputerName"  /v ComputerName /t reg_sz /d %pcname% /f  >nul 2>nul
  45. reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v "NV Hostname"  /t reg_sz /d %pcname% /f  >nul 2>nul
  46. reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Tcpip\Parameters" /v Hostname /t  reg_sz /d %pcname% /f  >nul 2>nul
  47. reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\lanmanserver\Parameters" /v srvcomment /t reg_sz /d %pcname% /f >nul 2>nul
  48. cls
  49. set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
  50. echo.
  51. set/p=    <nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
  52. echo    100%%
  53. @echo.
  54. @echo.
  55. @echo.
  56. @echo.
  57. @echo.
  58. @echo           ---------------------------------------------
  59. @echo            成功将计算机名设置为:%pcname%      
  60. @echo           ---------------------------------------------
  61. @echo.
  62. @echo.
  63. @echo.
  64. @echo.
  65. @echo.
  66. @echo.
  67. @echo.
  68. @echo.
  69. @echo.
  70. @echo.
  71. @echo.
  72. @echo.
  73. @echo.
  74. @echo.
  75. @ pause
  76. goto loop
  77. :setup2
  78. cls
  79. @echo.
  80. @echo       ******手动设置本地连接IP地址,输入完成请回车确定******
  81. @echo.
  82. @echo.
  83. set /p add="请输入 IP 地址:"
  84. @echo.
  85. set /p mask="请输入子网掩码:"
  86. @echo.
  87. set /p gw="请输入默认网关:"
  88. @echo.
  89. set /p DNS1="请输入首选 DNS:"
  90. @echo.
  91. set /p DNS2="请输入备用 DNS:"
  92. netsh interface ip set address name="本地连接" source="static" addr="%add%" mask="%mask%" gateway="%gw%" >nul 2>nul
  93. netsh interface ip add dns name="本地连接" addr=%DNS1% register=primary  >nul 2>nul
  94. netsh interface ip add dns name="本地连接" addr=%DNS2% index=2  >nul 2>nul
  95. ipconfig /flushdns >nul 2>nul
  96. cls
  97. set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
  98. echo.
  99. set/p=    <nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
  100. echo    100%%
  101. @echo.
  102. @echo.
  103. @echo.
  104. @echo.
  105. @echo.
  106. @echo              -------------------------------------
  107. @echo                成功设置本地连接IP地址和DNS
  108. @echo.
  109. @echo                当前 IP 地址:%add%
  110. @echo                当前子网掩码:%mask%  
  111. @echo                当前默认网关:%gw%
  112. @echo                当前首选 DNS:%DNS1%
  113. @echo                当前备用 DNS:%DNS2%   
  114. @echo              -------------------------------------
  115. @echo.
  116. @echo.
  117. @echo.
  118. @echo.
  119. @echo.
  120. @echo.
  121. @echo.
  122. @echo.
  123. @ pause
  124. goto loop
  125. :setup3
  126. cls
  127. netsh interface ip set address name = "本地连接" source = dhcp  >nul 2>nul
  128. netsh interface ip set dns name = "本地连接" source = dhcp  >nul 2>nul
  129. ipconfig /flushdns >nul 2>nul
  130. cls
  131. set a=^set /p=■%b%^<nul^&ping/n 0 127.1^>nul^&
  132. echo.
  133. set/p=    <nul&%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%%a%
  134. echo    100%%
  135. @echo.
  136. @echo.
  137. @echo.
  138. @echo.
  139. @echo.
  140. @echo              -------------------------------------
  141. @echo            成功设置本地连接自动获取IP地址和DNS
  142. @echo              -------------------------------------
  143. @echo.
  144. @echo.
  145. @echo.
  146. @echo.
  147. @echo.
  148. @echo.
  149. @echo.
  150. @echo.
  151. @echo.
  152. @echo.
  153. @echo.
  154. @echo.
  155. @echo.
  156. @echo.
  157. @ pause
  158. goto loop
复制代码

请问下,为什么要用这么多@符号 ?

TOP

太长了吧代码
喜欢批处理的逗比. . .

TOP

[attach]10569[/attach]
喜欢批处理的逗比. . .

TOP

为什么试了没用?

TOP

返回列表