就在今天！一位Bat小白写出了一个系统助手！
今天有事请假，趁现在没事干，就随手写了一个系统助手
一样的，先上代码：
@echo off
color 2f
@ECHO OFF & CD /D %~DP0
>NUL 2>&1 reg.exe query "HKU\S-1-5-19" || (
ECHO SET UAC = CreateObject^("Shell.Application"^) > "%TEMP%\Getadmin.vbs"
ECHO UAC.ShellExecute "%~f0", "%1", "", "runas", 1 >> "%TEMP%\Getadmin.vbs"
"%TEMP%\Getadmin.vbs"
DEL /f /q "%TEMP%\Getadmin.vbs" 2>NUL
Exit /b
)
:menu
cls
title 阿九系统小助手 V1.0
echo 阿九系统小助手 V1.0 功能表
echo.
echo 1.系统垃圾清理
echo 2.用户账号管理
echo 3.开机自启管理
SET /p a=请输入目标功能的号码：
if %a%==1 goto clean
if %a%==2 goto user
if %a%==3 goto sysboot
rem 如果输入功能以外的文本的话......
cls
color 4f
echo 错误：你没有输入指定的文本
echo.
pause
color 2f
goto menu
:clean
cls
title 阿九系统小助手 V1.0__系统垃圾清理
color 3f
mshta vbscript:msgbox("正在为您扫描系统，请耐心等待",6+18,"提示")(window.close)
dir/s
cls
SET /p b=检测到系统垃圾，是否要为您清除? [Y / N]
if %b%==Y (goto cleanreally) ELSE (
color 2f
goto menu
)
:cleanreally
cls
mshta vbscript:msgbox("正在为您清除系统垃圾，请耐心等待",6+18,"提示")(window.close)
del /f /s /q %systemdrive%\*.tmp
del /f /s /q %systemdrive%\*._mp
del /f /s /q %systemdrive%\*.log
del /f /s /q %systemdrive%\*.gid
del /f /s /q %systemdrive%\*.chk
del /f /s /q %systemdrive%\*.old
del /f /s /q %systemdrive%\recycled\*.*
del /f /s /q %windir%\*.bak
del /f /s /q %windir%\prefetch\*.*
rd /s /q %windir%\temp & md %windir%\temp
del /f /q %userprofile%\cookies\*.*
del /f /q %userprofile%\recent\*.*
del /f /s /q "%userprofile%\Local Settings\Temporary Internet Files\*.*"
del /f /s /q "%userprofile%\Local Settings\Temp\*.*"
del /f /s /q "%userprofile%\recent\*.*"
cls
echo 已成功为您清除系统垃圾！
echo.
pause
color 2f
goto menu
:user
color 3f
cls
title 阿九系统小助手 V1.0__用户账号管理
echo 功能表
echo.
echo 1.修改账号密码
echo 2.修改账号名称
echo 3.查看所有账号
SET /p c=请输入目标功能的号码：
if %c%==1 goto userpassword
if %c%==2 goto username
if %c%==3 goto alluser
rem 如果输入功能以外的文本的话......
cls
color 4f
echo 错误：你没有输入指定的文本
echo.
pause
color 2f
goto user
:userpassword
cls
SET /p pass=请输入账号原密码：
SET /p pass2=请输入你已经拟定的密码：
net user %username% %pass2% >nul
echo 正在修改密码......
if %errorlevel%==0 (
cls
echo 密码修改完毕！
echo.
pause
color 2f
goto menu
) else (
cls
color 4f
echo 错误：由于某些原因，密码修改失败！
echo.
echo ERROR CODES:%errorlevel%*%random%
echo.
pause
color 2f
goto menu
)
:username
cls
SET /P newuser=请输入你已经拟定的账号名称：
wmic useraccount where name='%USERNAME%' call Rename %newuser% >nul
echo 正在修改用户名......
if %errorlevel%==0 (
cls
echo 用户名修改完毕！
echo.
pause
color 2f
goto menu
) else (
cls
color 4f
echo 错误：由于某些原因，用户名修改失败！
echo.
echo ERROR CODES:%errorlevel%*%random%
echo.
pause
color 2f
goto menu
)
:alluser
cls
echo 您目前电脑上的所有账号如下：
echo.
net user
echo.
pause
color 2f
goto menu
:sysboot
color 5f
cls
title 阿九系统小助手 V1.0__开机自启管理
echo 功能表
echo.
echo 1.开机自启扫描
echo 2.添加开机自启
echo 3.取消开机自启
SET /p m=请输入目标功能的号码：
if %m%==1 goto dirboot
if %m%==2 goto addboot
if %m%==3 goto delboot
rem 如果输入功能以外的文本的话......
cls
color 4f
echo 错误：你没有输入指定的文本
echo.
pause
color 2f
goto sysboot
:dirboot
cls
mshta vbscript:msgbox("正在为您扫描开机自启项，请耐心等待",6+18,"提示")(window.close)
set Path=D:\SystemBootOutput.txt
cd "C:\Users\%Username%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup"
@dir "C:\Users\%Username%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup" > D:\SystemBootOutput.txt
cls
echo 扫描完毕！已将结果存放到%Path%
echo.
pause
start D:\SystemBootOutput.txt
color 2f
goto menu
:addboot
cls
SET /p r=请输入你要添加至开机自启项的文件名 [必须带后缀，且不能是快捷方式]
SET /p q=请输入该文件的所在路径 [必须带文件名]
echo 正在添加文件......
copy %q% "C:\Users\%Username%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup" >nul
if %errorlevel%==0 (
cls
echo 文件添加完毕！
echo.
pause
color 2f
goto menu
) else (
cls
color 4f
echo 错误：由于某些原因，文件添加失败！
echo.
echo ERROR CODES:%errorlevel%*%random%
echo.
pause
color 2f
goto menu
)
:delboot
cls
SET /p g=请输入该文件的所在路径 [必须带文件名]
echo 正在移除文件......
cd "C:\Users\%Username%\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup"
del %g%
if %errorlevel%==0 (
cls
echo 文件移除完毕！
echo.
pause
color 2f
goto menu
) else (
cls
color 4f
echo 错误：由于某些原因，文件移除失败！
echo.
echo ERROR CODES:%errorlevel%*%random%
echo.
pause
color 2f
goto menu
)
然后就是程序运行效果了，如下：
附录：程序的运行效果
并且如果程序操作失败，还会有错误提示
好了，这就是有关这个程序的介绍了！希望大家喜欢这个程序，再见！
