Board logo

标题: [系统相关] 请教这个批处理，输入2后，执行哪些内容 [打印本页]
作者: ceo80    时间: 2019-8-26 11:04     标题: 请教这个批处理，输入2后，执行哪些内容

  1. @echo off

  2. color 2f

  3. mode con cols=50 lines=30

  4. title  Share 

  5. ver | findstr "6.1">nul && set bulid=nt6 && goto sc_top

  6. ver | findstr "10.">nul && set bulid=nt10 && goto sc_top

  7. ver | findstr "5.">nul && set bulid=nt5 && goto sc_top

  8. ver | findstr "6.3">nul && set bulid=nt10 && goto sc_top

  9. ver | findstr "6.2">nul && set bulid=nt10 && goto sc_top

  10. echo.&echo.&echo.&echo.&echo.&echo.&echo.

  11. echo                       igm

  12. echo.     

  13. echo.&echo.&echo.

  14. echo          it ok!

  15. pause>nul 2>nul

  16. exit

  17. :sc_top

  18. cls

  19. del /q %temp%\info.txt>nul 2>nul

  20. :sc_menu

  21. echo.&echo.&echo.

  22. echo             share 19.3.13

  23. echo.

  24. echo    --------------------------------------------

  25. echo.&echo.&echo.

  26. echo               1、network information

  27. echo.

  28. echo               2、simple share（no password）

  29. echo.

  30. echo               3、password share

  31. echo.

  32. echo               4、share and power manage

  33. echo.

  34. echo               5、power setup（image）

  35. echo.

  36. echo               6、print share setup（image）

  37. echo.

  38. echo               7、update and retroaction

  39. echo.&echo.&echo.&echo.&echo.

  40. set select=

  41. set str1=1234567

  42. set /p select= enter unmber，enter:

  43. if not defined select goto sc_wrong

  44. echo %select%|findstr "[%str1%]">nul||goto sc_wrong

  45. if %select%==1 (goto sc_info)

  46. if %select%==2 (goto sc_zd)

  47. if %select%==3 (goto sc_sd)

  48. if %select%==4 (goto sc_gl) 

  49. if %select%==5 (goto sc_help) 

  50. if %select%==6 (goto sc_print) 

  51. if %select%==7 (goto sc_update) 

  52. :sc_wrong

  53. mshta vbscript:msgbox("1-7",64,"fe")(window.close) 

  54. goto sc_top

  55. :sc_info

  56. cls

  57. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.

  58. echo                  Processing information....

  59. if %bulid%==nt5 (goto sc_nt5) else (goto sc_nt6)

  60. :sc_nt5

  61. (echo.

  62. echo.)>>%temp%\info.txt

  63. ping www.baidu.com -n 1 >nul || echo              互联网状态：       [ 离线 ]>>%temp%\info.txt && goto sc_ver_nt5

  64. echo              互联网状态：       [ 在线 ]>>%temp%\info.txt

  65. :sc_ver_nt5

  66. (echo ----------------------------------------------------------

  67. echo.)>>%temp%\info.txt

  68. for /f "skip=1 tokens=2-4 delims=, " %%a in ('wmic os get caption') do (

  69. if exist %windir%\SysWOW64 echo         系统版本：       %%a %%b %%c  64位>>%temp%\info.txt & goto sc_ver_nt5_next

  70. echo         系统版本：       %%a %%b %%c  32位>>%temp%\info.txt

  71. )

  72. :sc_ver_nt5_next

  73. (echo.

  74. echo         计算机名：            %COMPUTERNAME%

  75. echo.)>>%temp%\info.txt

  76. for /f "tokens=2 delims= " %%a in ('net config workstation^|findstr /c:"工作站域"') do echo         工作组：              %%a>>%temp%\info.txt & goto sc_info_nt5

  77. :sc_info_nt5

  78. (echo.

  79. echo         当前用户：            %USERNAME%

  80. echo.)>>%temp%\info.txt

  81. for /f "delims=" %%a in ('date /t') do echo         本机日期：            %%a>>%temp%\info.txt

  82. echo.>>%temp%\info.txt

  83. for /f "delims=" %%a in ('time /t') do echo         本机时间：            %%a>>%temp%\info.txt

  84. echo ---------------------------------------------------------->>%temp%\info.txt

  85. goto sc_info_more

  86. :sc_nt6

  87. (echo.

  88. echo.)>>%temp%\info.txt

  89. ping www.baidu.com -n 1 >nul || echo          互联网状态：       [ 离线 ]>>%temp%\info.txt && goto sc_ver_nt6

  90. echo          互联网状态：       [ 在线 ]>>%temp%\info.txt

  91. :sc_ver_nt6

  92. (echo ----------------------------------------------------------

  93. echo.)>>%temp%\info.txt

  94. for /f "skip=1 tokens=2-5 delims=?, " %%a in ('wmic os get caption') do (

  95. if exist %windir%\SysWOW64 echo    系统版本：      %%a %%b %%c %%d 64位>>%temp%\info.txt & goto sc_ver_nt6_next

  96. echo    系统版本：       %%a %%b %%c %%d 32位>>%temp%\info.txt

  97. )

  98. :sc_ver_nt6_next

  99. (echo.

  100. echo    计算机名：            %COMPUTERNAME%

  101. echo.)>>%temp%\info.txt

  102. for /f "tokens=2 delims= " %%a in ('net config workstation^|findstr /c:"工作站域"') do echo    工作组：              %%a>>%temp%\info.txt

  103. (echo.

  104. echo    当前用户：            %USERNAME%

  105. echo.)>>%temp%\info.txt

  106. for /f "delims=" %%a in ('date /t') do echo    本机日期：            %%a>>%temp%\info.txt

  107. echo.>>%temp%\info.txt

  108. for /f "delims=" %%a in ('time /t') do echo    本机时间：            %%a>>%temp%\info.txt

  109. echo ---------------------------------------------------------->>%temp%\info.txt

  110. :sc_info_more

  111. if %bulid%==nt5 ipconfig /all|findstr /v /c:"Windows IP Configuration"|findstr /v /c:"Host Name"|findstr /v /c:"Primary Dns Suffix"|findstr /v /c:"Node Type"|findstr /v /c:"IP Routing Enabled"|findstr /v /c:"WINS Proxy Enabled">>%temp%\info.txt && goto sc_info_next

  112. ipconfig /all|findstr /v /c:"Windows IP 配置"|findstr /v /c:"主机名"|findstr /v /c:"主 DNS 后缀"|findstr /v /c:"节点类型"|findstr /v /c:"IP 路由已启用"|findstr /v /c:"WINS 代理已启用">>%temp%\info.txt

  113. :sc_info_next

  114. (echo.

  115. echo ----------------------------------------------------------

  116. echo.

  117. echo.)>>%temp%\info.txt

  118. start /w notepad %temp%\info.txt

  119. del /q %temp%\info.txt>nul 2>nul

  120. goto sc_top

  121. :sc_zd

  122. call :sc_qxfix

  123. cls

  124. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.

  125. echo                   action......

  126. net user guest /active:yes>nul 2>nul

  127. net user guest "">nul 2>nul

  128. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x1 /f>nul 2>nul

  129. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v LimitBlankPasswordUse /t REG_DWORD /d 0x0 /f>nul 2>nul

  130. if %bulid%==nt10 reg add "HKLM\SYSTEM\CurrentControlSet\Services\LanmanWorkstation\Parameters" /v AllowInsecureGuestAuth /t REG_DWORD /d 0x1 /f>nul 2>nul

  131. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v restrictanonymoussam /t REG_DWORD /d 0x0 /f>nul 2>nul

  132. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\MSV1_0" /v LmCompatibilityLevel /t REG_DWORD /d 0x1 /f>nul 2>nul

  133. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v everyoneincludesanonymous /t REG_DWORD /d 0x1 /f>nul 2>nul

  134. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v NoLmHash /t REG_DWORD /d 0x0 /f>nul 2>nul

  135. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v restrictnullsessaccess /t REG_DWORD /d 0x0 /f>nul 2>nul

  136. goto sc_main

  137. :sc_sd

  138. call :sc_qxfix

  139. cls

  140. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.

  141. echo                    Start repairing......

  142. net user guest /active:no>nul 2>nul

  143. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x0 /f>nul 2>nul

  144. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\MSV1_0" /v NtlmMinClientSec /t REG_DWORD /d 0x0 /f>nul 2>nul

  145. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\MSV1_0" /v NtlmMinServerSec /t REG_DWORD /d 0x0 /f>nul 2>nul

  146. goto sc_main

  147. :sc_main

  148. sc config LanmanWorkstation start= auto>nul 2>nul

  149. sc config LanmanServer start= auto>nul 2>nul

  150. sc config Winmgmt start= auto>nul 2>nul

  151. sc config RpcSs start= auto>nul 2>nul

  152. sc config Netman start= auto>nul 2>nul

  153. sc config RasMan start= demand>nul 2>nul

  154. sc config SSDPSRV start= auto>nul 2>nul

  155. sc config BFE start= auto>nul 2>nul

  156. sc config ALG start= demand>nul 2>nul

  157. sc config SharedAccess start= auto>nul 2>nul

  158. net start SharedAccess /y>nul 2>nul

  159. sc config Browser start= auto>nul 2>nul

  160. net start Browser /y>nul 2>nul

  161. sc config Dnscache start= auto>nul 2>nul

  162. net start Dnscache /y>nul 2>nul

  163. sc config Dhcp start= auto>nul 2>nul

  164. net start Dhcp /y>nul 2>nul

  165. sc config lmhosts start= auto>nul 2>nul

  166. net start lmhosts /y>nul 2>nul

  167. sc config Spooler start= auto>nul 2>nul

  168. net start Spooler /y>nul 2>nul

  169. sc config upnphost start= demand>nul 2>nul

  170. net start upnphost /y>nul 2>nul

  171. reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\Netlogon" /v Start|findstr "0x4">nul 2>nul && sc config Netlogon start= demand>nul 2>nul

  172. reg add "HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v TransportBindName /t REG_SZ /d \Device\ /f>nul 2>nul

  173. reg delete "HKLM\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v SMB1 /F>nul 2>nul

  174. reg delete "HKLM\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v SMB2 /F>nul 2>nul

  175. reg delete "HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v SMBDeviceEnabled /F>nul 2>nul

  176. sc config netbt start= system>nul 2>nul

  177. net start netbt>nul 2>nul

  178. if %bulid%==nt5 (goto sc_sernt5) else (goto sc_sernt6)

  179. :sc_sernt5

  180. sc config PlugPlay start= auto>nul 2>nul

  181. sc config TapiSrv start= auto>nul 2>nul

  182. sc config Nla start= auto>nul 2>nul

  183. net start Nla /y>nul 2>nul

  184. netsh firewall set service type = fileandprint mode = enable scope = subnet>nul 2>nul

  185. set "nbt=HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters\Interfaces"

  186. for /f "tokens=2 delims={" %%a in ('reg query "%nbt%"') do (reg query "%nbt%\TCPIP_{%%a" /s|findstr /i /c:"NetbiosOptions">nul && reg add "%nbt%\TCPIP_{%%a" /v NetbiosOptions /t REG_DWORD /d 0x0 /f>nul 2>nul)

  187. goto sc_main2_etc

  188. :sc_sernt6

  189. sc config DcomLaunch start= auto>nul 2>nul

  190. sc config RpcEptMapper start= auto>nul 2>nul

  191. sc config SamSs start= auto>nul 2>nul

  192. sc config nsi start= auto>nul 2>nul

  193. sc config SstpSvc start= demand>nul 2>nul

  194. sc config MpsSvc start= auto>nul 2>nul

  195. net start MpsSvc /y>nul 2>nul

  196. sc config NlaSvc start= auto>nul 2>nul

  197. sc config netprofm start= auto>nul 2>nul

  198. sc config fdPHost start= auto>nul 2>nul

  199. net start fdPHost /y>nul 2>nul

  200. sc config FDResPub start= auto>nul 2>nul

  201. net start FDResPub /y>nul 2>nul

  202. sc config HomeGroupListener start= auto>nul 2>nul

  203. sc config WMPNetworkSvc start= auto>nul 2>nul

  204. net start WMPNetworkSvc /y>nul 2>nul

  205. sc config HomeGroupProvider start= auto>nul 2>nul

  206. net start HomeGroupProvider /y>nul 2>nul

  207. netsh advfirewall firewall set rule group=\"网络发现\" new enable=Yes>nul 2>nul

  208. netsh advfirewall firewall set rule group=\"文件和打印机共享\" new enable=Yes>nul 2>nul

  209. if %bulid%==nt10 powershell -NonInteractive "Enable-WindowsOptionalFeature -Online -FeatureName SMB1Protocol">nul 2>nul

  210. for /f "delims=" %%a in ('reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\NetBT\Parameters\Interfaces" /s /e /f "0x2"^|findstr "\Tcpip_"') do reg add "%%a" /v NetbiosOptions /t REG_DWORD /d 0x0 /f>nul 2>nul

  211. :sc_main2_etc

  212. (echo [Unicode]

  213. echo Unicode=yes

  214. echo [Version]

  215. echo signature="$CHICAGO$"

  216. echo Revision=1

  217. echo [Privilege Rights]

  218. echo sedenynetworklogonright = 

  219. echo senetworklogonright = Everyone,Administrators,Users,Power Users,Backup Operators,guest)>>%temp%\zcl.inf

  220. secedit /configure /db %temp%\zcl.sdb /cfg %temp%\zcl.inf /log %temp%\zcl.log /quiet

  221. del /q %temp%\zcl.*>nul 2>nul

  222. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v restrictanonymous /t REG_DWORD /d 0x0 /f>nul 2>nul

  223. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v AutoShareServer /t REG_DWORD /d 0x1 /f>nul 2>nul

  224. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v AutoShareWks /t REG_DWORD /d 0x1 /f>nul 2>nul

  225. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Browser\Parameters" /v MaintainServerList /t REG_SZ /d Auto /f>nul 2>nul

  226. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Browser\Parameters" /v IsDomainMaster /t REG_SZ /d FALSE /f>nul 2>nul

  227. reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v EnableLMHOSTS|findstr "0x0">nul 2>nul && reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v EnableLMHOSTS /t REG_DWORD /d 0x1 /f>nul 2>nul

  228. reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace\{D6277990-4C6A-11CF-8D87-00AA0060F5BF}" /f>nul 2>nul

  229. net use * /del /y>nul 2>nul

  230. net config server /hidden:no>nul 2>nul

  231. net share ipc$>nul 2>nul

  232. reg delete "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v NodeType /f>nul 2>nul

  233. reg delete "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v DhcpNodeType /f>nul 2>nul

  234. goto sc_tip

  235. :sc_gl

  236. cls

  237. reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest|findstr "0x1">nul 2>nul||goto classic

  238. reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x0 /f>nul 2>nul

  239. set jlb=y

  240. :classic

  241. echo.&echo.&echo.&echo.

  242. echo          功能：管理本机共享，修改共享权限

  243. echo.

  244. echo              家庭版系统仅支持查看共享

  245. echo   ----------------------------------------------

  246. echo.&echo.&echo.&echo.&echo.

  247. echo                    【使用说明】

  248. echo.&echo.

  249. echo        点左侧“共享”可查看本机所有共享；

  250. echo.

  251. echo        右键点左侧“共享”可“新建共享”；

  252. echo.

  253. echo        右键点右侧共享可“停止共享”（能多选）；

  254. echo.

  255. echo        右键点右侧共享选“属性”可修改权限；

  256. echo.&echo.&echo.&echo.&echo.&echo.&echo.

  257. fsmgmt.msc

  258. if %jlb%==y reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x1 /f>nul 2>nul

  259. goto sc_top

  260. :sc_tip

  261. cls

  262. echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.

  263. echo                  itok！！！

  264. mshta vbscript:msgbox("it is RE",64,"提示")(window.close) 

  265. exit

  266. :sc_help

  267. cls

  268. start "%ProgramFiles%\Internet Explorer\iexplore.exe" "https://zhuanlan.zhihu.com/p/24285252"

  269. goto sc_top

  270. :sc_print

  271. cls

  272. start "%ProgramFiles%\Internet Explorer\iexplore.exe" "https://zhuanlan.zhihu.com/p/24187152"

  273. goto sc_top

  274. :sc_update

  275. cls

  276. start "%ProgramFiles%\Internet Explorer\iexplore.exe" "https://zhuanlan.zhihu.com/p/24178142"

  277. goto sc_top

  278. goto :eof

  279. :sc_qxfix

  280. cls

  281. echo.&echo.&echo.

  282. echo                     【fo】

  283. echo    --------------------------------------------

  284. echo.

  285. echo         copy

  286. echo.

  287. echo           print enter

  288. echo.&echo.&echo.&echo.&echo.&echo.&echo.

  289. echo f enter:

  290. echo.&echo.

  291. set /p lj=

  292. for %%a in ("%lj%") do set name=%%~na

  293. net share "%name%"="%lj%">nul 2>nul

  294. if %bulid%==nt5 cacls "%lj%" /t /e /p everyone:f >nul 2>nul && goto :eof

  295. icacls "%lj%" /grant everyone:(oi)(ci)F>nul 2>nul

  296. goto :eof
复制代码
作者: Batcher    时间: 2019-8-26 13:01

if %select%==2 (goto sc_zd)
作者: ceo80    时间: 2019-8-26 14:09

if %select%==2 (goto sc_zd)
Batcher 发表于 2019-8-26 13:01


没这么简单， sc_zd后面还很多呢。请看看，简单就不问了。
作者: Batcher    时间: 2019-8-26 14:43

回复 3# ceo80


    没错，就是执行121行到136行那些好多代码的。
作者: holley    时间: 2019-8-27 12:49

回复 3# ceo80


    你疑惑的是这个？
  1. call :sc_qxfix
复制代码
简单共享——就是开启guest用户，并设置几个共享服务注册表键值。
作者: lancer    时间: 2019-8-27 12:51

写这个批处理的人牛掰啊
作者: ceo80    时间: 2019-9-6 15:06

回复 5# holley


    是啊，看的头大。具体 是执行哪些代码 呢，能否帮我列出来或者说明下，是第几行到第几行。
作者: ceo80    时间: 2019-9-6 15:07

回复  ceo80


    没错，就是执行121行到136行那些好多代码的。
Batcher 发表于 2019-8-26 14:43



    除了121到136，还有别的行数吧？
作者: Batcher    时间: 2019-9-6 16:13

回复 8# ceo80


我给出个主意吧：
你把 @echo off 删掉，在每一行下面加一句 pause
这样就能知道具体执行了哪些代码，不用自己猜，也不用听信别人告诉你的结论。用实践来检验。



欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2