网管员神器-网管工具v1.0 【制作：地理作业】代码

复制代码到txt，扩展名改为bat。
主要功能修复打印机共享问题，快速打开win实用工具，重启网络连接等。
1、查看网络信息
2、简单共享（无密码）
3、密码共享
4、共享和权限设置
5、ping 检查
6、重启打印服务
7、任务管理器
8、计算机管理
9、打开注册表
10、时间设置
11、区域和格式
12、打开网络连接界面
13、检查DirectX信息
14、打开服务管理页面
15、打印测试页
16、打开资源网页
17、设备和打印机
18、修复win11共享打印机报错
19、重新连接网络
20、重启计算机

@echo off
color 2f
mode con cols=50 lines=60
title  网管工具v1.0  【制作：地理作业】关注今日头条 qq：263866921
ver | findstr "5.">nul || set bulid=nt6 && goto sc_yhbl
set bulid=nt5
:sc_yhbl
reg query "HKCU\Environment" /v temp >nul 2>nul||set "usertemp=%USERPROFILE%\" && goto sc_top
set usertemp=%temp%\
:sc_top
cls
del /q %temp%\info.txt>nul 2>nul
:sc_menu
echo.&echo.&echo.
echo             网管工具v1.0 by.地理作业qq263866921
echo.
echo    --------------------------------------------
echo.&echo.&echo.
echo               1、查看网络信息
echo.
echo               2、简单共享（无密码）
echo.
echo               3、密码共享
echo.
echo               4、共享和权限设置
echo.
echo               5、ping 检查
echo.
echo               6、重启打印服务
echo.
echo               7、任务管理器
echo.
echo               8、计算机管理
echo.
echo               9、打开注册表
echo.
echo               10、时间设置
echo.
echo               11、区域和格式
echo.
echo               12、打开网络连接界面
echo.
echo               13、检查DirectX信息
echo.
echo               14、打开服务管理页面
echo.
echo               15、打印测试页
echo.
echo               16、打开资源网页
echo.
echo               17、设备和打印机
echo.
echo               18、修复win11共享打印机报错
echo.
echo               19、重新连接网络
echo.
echo               20、重启计算机

echo.&echo.&echo.&echo.&echo.
set select=
set str1=1234567891011213141516171819
set /p select= 输入数字，按回车:
if not defined select goto sc_wrong
echo %select%|findstr "[%str1%]">nul||goto sc_wrong
if %select%==1 (goto sc_info)
if %select%==2 (goto sc_zd)
if %select%==3 (goto sc_sd)
if %select%==4 (goto sc_gl) 
if %select%==5 (goto sc_help) 
if %select%==6 (goto sc_print) 
if %select%==7 (goto sc_update) 
if %select%==8 (goto sc_compmgmt) 
if %select%==9 (goto sc_regedit)
if %select%==10 (goto sc_timedate)
if %select%==11 (goto sc_intl)
if %select%==12 (goto sc_ncpa)
if %select%==13 (goto sc_dxdiag)
if %select%==14 (goto sc_services)
if %select%==15 (goto sc_printpage)
if %select%==16 (goto sc_page)
if %select%==17 (goto sc_dayinji)
if %select%==18 (goto sc_win11)
if %select%==19 (goto sc_eth1)
if %select%==20 (goto sc_restart)
mshta vbscript:msgbox("只能输入1-20的数字",64,"提示")(window.close) 
goto sc_top
:sc_info
cls
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
echo                  正在处理信息....
if "%bulid%"=="nt6" goto sc_nt6
:sc_nt5
(echo.
echo.)>>%usertemp%info.txt
ping www.baidu.com -n 1 >nul || echo              互联网状态：       [ 离线 ]>>%usertemp%info.txt && goto sc_ver_nt5
echo              互联网状态：       [ 在线 ]>>%usertemp%info.txt
:sc_ver_nt5
(echo ----------------------------------------------------------
echo.)>>%usertemp%info.txt
for /f "skip=1 tokens=2-4 delims=, " %%a in ('wmic os get caption') do (
if exist %windir%\SysWOW64 echo         系统版本：       %%a %%b %%c  64位>>%usertemp%info.txt & goto sc_ver_nt5_next
echo         系统版本：       %%a %%b %%c  32位>>%usertemp%info.txt
)
:sc_ver_nt5_next
(echo.
echo         计算机名：            %COMPUTERNAME%
echo.)>>%usertemp%info.txt
for /f "tokens=2 delims= " %%a in ('net config workstation^|findstr /c:"工作站域"') do echo         工作组：              %%a>>%usertemp%info.txt & goto sc_info_nt5
:sc_info_nt5
(echo.
echo         当前用户：            %USERNAME%
echo.)>>%usertemp%info.txt
for /f "delims=" %%a in ('date /t') do echo         本机日期：            %%a>>%usertemp%info.txt
echo.>>%usertemp%info.txt
for /f "delims=" %%a in ('time /t') do echo         本机时间：            %%a>>%usertemp%info.txt
echo ---------------------------------------------------------->>%usertemp%info.txt
goto sc_info_more
:sc_nt6
(echo.
echo.)>>%usertemp%info.txt
ping www.baidu.com -n 1 >nul || echo          互联网状态：       [ 离线 ]>>%usertemp%info.txt && goto sc_ver_nt6
echo          互联网状态：       [ 在线 ]>>%usertemp%info.txt
:sc_ver_nt6
(echo --------------------------------------------------
echo.)>>%usertemp%info.txt
for /f "skip=1 tokens=2-5 delims=?, " %%a in ('wmic os get caption') do (
if exist %windir%\SysWOW64 echo    系统版本：      %%a %%b %%c %%d 64位>>%usertemp%info.txt & goto sc_ver_nt6_next
echo    系统版本：       %%a %%b %%c %%d 32位>>%usertemp%info.txt
)
:sc_ver_nt6_next
(echo.
echo    计算机名：            %COMPUTERNAME%
echo.)>>%usertemp%info.txt
for /f "tokens=2 delims= " %%a in ('net config workstation^|findstr /c:"工作站域"') do echo    工作组：              %%a>>%usertemp%info.txt
(echo.
echo    当前用户：            %USERNAME%
echo.)>>%usertemp%info.txt
for /f "delims=" %%a in ('date /t') do echo    本机日期：            %%a>>%usertemp%info.txt
echo.>>%usertemp%info.txt
for /f "delims=" %%a in ('time /t') do echo    本机时间：            %%a>>%usertemp%info.txt
echo -------------------------------------------------->>%usertemp%info.txt
:sc_info_more
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">>%usertemp%info.txt && goto sc_info_next
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 代理已启用">>%usertemp%info.txt
:sc_info_next
start /w notepad %temp%\info.txt
del /q %temp%\info.txt>nul 2>nul
goto sc_top
:sc_zd
call :sc_qxfix
cls
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
echo                    开始修复......
net user guest /active:yes>nul 2>nul
net user guest "">nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x1 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v LimitBlankPasswordUse /t REG_DWORD /d 0x0 /f>nul 2>nul
goto sc_main
:sc_sd
call :sc_qxfix
cls
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
echo                    开始修复......
net user guest /active:no>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x0 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\MSV1_0" /v NtlmMinClientSec /t REG_DWORD /d 0x0 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\MSV1_0" /v NtlmMinServerSec /t REG_DWORD /d 0x0 /f>nul 2>nul
goto sc_main
:sc_main
sc config LanmanWorkstation start= auto>nul 2>nul
sc config LanmanServer start= auto>nul 2>nul
sc config Winmgmt start= auto>nul 2>nul
sc config RpcSs start= auto>nul 2>nul
sc config Netman start= auto>nul 2>nul
sc config RasMan start= demand>nul 2>nul
sc config SSDPSRV start= auto>nul 2>nul
sc config BFE start= auto>nul 2>nul
sc config ALG start= demand>nul 2>nul
sc config SharedAccess start= auto>nul 2>nul
net start SharedAccess /y>nul 2>nul
sc config Browser start= auto>nul 2>nul
net start Browser /y>nul 2>nul
sc config Dnscache start= auto>nul 2>nul
net start Dnscache /y>nul 2>nul
sc config Dhcp start= auto>nul 2>nul
net start Dhcp /y>nul 2>nul
sc config lmhosts start= auto>nul 2>nul
net start lmhosts /y>nul 2>nul
sc config Spooler start= auto>nul 2>nul
net start Spooler /y>nul 2>nul
sc config upnphost start= demand>nul 2>nul
net start upnphost /y>nul 2>nul
reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\Netlogon" /v Start|findstr "0x4">nul 2>nul && sc config Netlogon start= demand>nul 2>nul
reg add "HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v TransportBindName /t REG_SZ /d \Device\ /f>nul 2>nul
reg delete "HKLM\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v SMB1 /F>nul 2>nul
reg delete "HKLM\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v SMB2 /F>nul 2>nul
reg delete "HKLM\SYSTEM\CurrentControlSet\services\NetBT\Parameters" /v SMBDeviceEnabled /F>nul 2>nul
sc config netbt start= system>nul 2>nul
net start netbt>nul 2>nul
if "%bulid%"=="nt6" goto sc_sernt6
:sc_sernt5
sc config PlugPlay start= auto>nul 2>nul
sc config TapiSrv start= auto>nul 2>nul
sc config Nla start= auto>nul 2>nul
net start Nla /y>nul 2>nul
netsh firewall set opmode mode=disable>nul 2>nul
goto sc_main2_etc
:sc_sernt6
sc config DcomLaunch start= auto>nul 2>nul
sc config RpcEptMapper start= auto>nul 2>nul
sc config SamSs start= auto>nul 2>nul
sc config nsi start= auto>nul 2>nul
sc config SstpSvc start= demand>nul 2>nul
sc config MpsSvc start= auto>nul 2>nul
net start MpsSvc /y>nul 2>nul
sc config NlaSvc start= auto>nul 2>nul
sc config netprofm start= auto>nul 2>nul
sc config fdPHost start= auto>nul 2>nul
sc config FDResPub start= auto>nul 2>nul
sc config HomeGroupListener start= auto>nul 2>nul
sc config WMPNetworkSvc start= auto>nul 2>nul
net start WMPNetworkSvc /y>nul 2>nul
sc config HomeGroupProvider start= auto>nul 2>nul
net start HomeGroupProvider /y>nul 2>nul
netsh advfirewall set allprofiles state off>nul 2>nul
:sc_main2_etc
(echo [Unicode]
echo Unicode=yes
echo [Version]
echo signature="$CHICAGO$"
echo Revision=1
echo [Privilege Rights]
echo sedenynetworklogonright = 
echo senetworklogonright = Everyone,Administrators,Users,Power Users,Backup Operators,guest)>>%usertemp%zcl.inf
secedit /configure /db %usertemp%zcl.sdb /cfg %usertemp%zcl.inf /log %usertemp%zcl.log /quiet
del /q %usertemp%zcl.*>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa\MSV1_0" /v LmCompatibilityLevel /t REG_DWORD /d 0x1 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v restrictanonymous /t REG_DWORD /d 0x0 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v restrictanonymoussam /t REG_DWORD /d 0x0 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v everyoneincludesanonymous /t REG_DWORD /d 0x1 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v NoLmHash /t REG_DWORD /d 0x0 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v AutoShareServer /t REG_DWORD /d 0x1 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v AutoShareWks /t REG_DWORD /d 0x1 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\services\LanmanServer\Parameters" /v restrictnullsessaccess /t REG_DWORD /d 0x0 /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Browser\Parameters" /v MaintainServerList /t REG_SZ /d Auto /f>nul 2>nul
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Browser\Parameters" /v IsDomainMaster /t REG_SZ /d FALSE /f>nul 2>nul
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
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
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace\{D6277990-4C6A-11CF-8D87-00AA0060F5BF}" /f>nul 2>nul
net use * /del /y>nul 2>nul
net config server /hidden:no>nul 2>nul
net share ipc$>nul 2>nul
goto sc_tip
:sc_gl
cls
reg query "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest|findstr "0x1">nul 2>nul||goto classic
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x0 /f>nul 2>nul
set jlb=y
:classic
echo.&echo.&echo.&echo.
echo         功能：管理共享，修改共享文件夹权限
echo   ----------------------------------------------
echo.&echo.&echo.&echo.&echo.
echo                    【使用说明】
echo.&echo.
echo        点左侧“共享”可查看本机所有共享；
echo.
echo        右键点左侧“共享”可“新建共享”；
echo.
echo        右键点右侧共享可“停止共享”（能多选）；
echo.
echo        右键点右侧共享选“属性”可修改权限；
echo.&echo.&echo.&echo.&echo.&echo.&echo.
fsmgmt.msc
if "%jlb%"=="y" reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v forceguest /t REG_DWORD /d 0x1 /f>nul 2>nul
cls
echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.&echo.
echo                     设置完成！
echo.&echo.&echo.
echo            按键盘任意键返回，或直接关闭！
pause>nul 2>nul
goto sc_top
:sc_tip
mshta vbscript:msgbox("修复完成，请重启计算机",64,"提示")(window.close) 
goto sc_exit
:sc_help
cls
start cmd /k "ping 192.168.1.1 -t"
start cmd /k "ping 192.168.1.6 -t"
start cmd /k "ping baidu.com -t"
goto sc_top
:sc_print
cls
@echo off
echo 计划任务开始执行 
echo 停止打印服务
net stop Spooler
echo 清理打印暂存
del /s /q C:\Windows\System32\spool\PRINTERS\*.*
echo 重新启动打印服务
net start Spooler
echo 完成!!!!(5秒后自动关闭)
goto sc_top
:sc_compmgmt
cls
start compmgmt.msc
goto sc_top
goto :eof
:sc_regedit
cls
start regedit.exe
goto sc_top
goto :eof
:sc_update
cls
start taskmgr
goto sc_top
goto :eof
:sc_timedate
cls
start timedate.cpl
goto sc_top
goto :eof
:sc_intl
cls
start intl.cpl
goto sc_top
goto :eof
:sc_ncpa
cls
start ncpa.cpl
goto sc_top
goto :eof
:sc_dxdiag
cls
start dxdiag
goto sc_top
goto :eof
:sc_services
cls
start services.msc
goto sc_top
goto :eof
:sc_page
cls
start "%ProgramFiles%\Internet Explorer\iexplore.exe" "http://120.192.19.51:82"
goto sc_top
goto :eof
:sc_printpage  rem 获取打印机名称
cls
echo 打印机: 
for /f "tokens=1,* delims==" %%a in ('wmic PRINTER get name') do (
echo      %%a)
rundll32 printui.dll,PrintUIEntry /k /n "打印机名称"
pause
goto sc_top
goto :eof
:sc_dayinji  rem 打开设备和打印机
cls
start control printers
goto sc_top
goto :eof
:sc_win11 rem win11修复
cls
certutil -urlcache -split -f http://120.192.19.51:82/printFix/win11/win32spl.dll %usertemp%win32spl.dll
certutil -urlcache -split -f http://120.192.19.51:82/printFix/win11/Fix_PrintSpooler.bat %usertemp%Fix_PrintSpooler.bat
call %usertemp%Fix_PrintSpooler.bat
pause
goto sc_top
goto :eof
:sc_win11 rem 重新连接网络
cls
netsh interface set interface "本地连接" disabled
netsh interface set interface "本地连接" enabled
pause
goto sc_top
goto :eof
:sc_restart  rem 重启计算甲
cls
shutdow /r /t 0
pause
goto sc_top
goto :eof
:sc_qxfix
cls
echo.&echo.&echo.
echo                    【使用说明】
echo    --------------------------------------------
echo.
echo       鼠标复制共享文件夹地址栏路径粘贴到下方
echo.
echo         如果只共享打印机，就按下回车键跳过
echo.&echo.&echo.&echo.&echo.&echo.&echo.
echo 粘贴路径，按回车:
echo.&echo.
set /p lj=
for %%a in ("%lj%") do set name=%%~na
net share "%name%"="%lj%">nul 2>nul
if "%bulid%"=="nt5" cacls "%lj%" /t /e /p everyone:f >nul 2>nul && goto :eof
icacls "%lj%" /grant everyone:(oi)(ci)f>nul 2>nul
goto :eof