常用脚本(Batchfile & VBScript)

1. 一键启动.bat

@echo off
mode con lines=30 cols=100
title= 一键启动
:main
cls
color 2e
echo %time%
echo.Martin's Blog https://javakam.github.io
color 1f
echo.-----------------------------------------------------------
echo Starting QQ...
start "" "C:\Program Files (x86)\Tencent\QQ\Bin\QQScLauncher.exe"
echo Starting WeChat...
start "" "C:\Program Files\Tencent\WeChat\WeChat.exe"
:end
echo 执行完成

2. Win11改用传统右键菜单.bat

@echo off
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' NEQ '0' (
goto UACPrompt
) else ( goto gotAdmin )
:UACPrompt
echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
exit /B
:gotAdmin
if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" )
@echo off
echo. 
echo ============================================= 
echo 右键菜单类型
echo 1 (Win10旧版右键菜单)
echo 2 (Win11新版右键菜单)
echo ============================================= 
:select
set /p opt=请选择操作:
if %opt%==1 (
 echo 正在开启Win10旧版右键菜单》》》》》》》》》
	reg add "HKCU\Software\Classes\CLSID\{86ca1aa0-34aa-4e8b-a509-50c905bae2a2}\InprocServer32" /f /ve
)
if %opt%==2 (
 echo 正在恢复Win11新版右键菜单》》》》》》》》》
	reg delete "HKCU\Software\Classes\CLSID\{86ca1aa0-34aa-4e8b-a509-50c905bae2a2}" /f
)
@echo off
echo *************************************
echo * *
echo * 重启任务管理器... *
echo * *
echo *************************************
taskkill /f /im explorer.exe & start explorer.exe
pause

3. Java多版本切换

@echo off
%1 mshta vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c %~s0 ::","","runas",1)(window.close)&&exit
cd /d "%~dp0"
@echo off
rem --- Base Config 配置JDK的安装目录 ---
:init 
set JAVA_HOME8=C:\fastwork\Java\jdk1.8
set JAVA_HOME17=C:\fastwork\Java\jdk17
:start 
echo 当前使用的JDK 版本: 
java -version 
echo. 
echo ============================================= 
echo jdk版本列表 
echo 1 (1.8)
echo 2 (17)
echo ============================================= 
:select
set /p opt=请选择jdk版本: 
if %opt%==1 (
 set TARGET_JAVA_HOME=%JAVA_HOME8%
)
if %opt%==2 (
 set TARGET_JAVA_HOME=%JAVA_HOME17%
)
echo 当前选择的Java路径:%TARGET_JAVA_HOME%
wmic ENVIRONMENT where "name='JAVA_HOME'" delete
wmic ENVIRONMENT create name="JAVA_HOME",username="<system>",VariableValue="%TARGET_JAVA_HOME%"
rem -- refresh env ---
call RefreshEnv
echo 请按任意键退出!
pause>nul

4. Windows设置/取消定时关机

Shutdown -s -t 10800

Shutdown -a

5. 控制某个服务的开启/关闭

@echo off
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' NEQ '0' (
goto UACPrompt
) else ( goto gotAdmin )
:UACPrompt
echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
"%temp%\getadmin.vbs"
exit /B
:gotAdmin
if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" )
@echo off
echo. 
echo ============================================= 
echo 操作类型
echo 1 (开启服务)
echo 2 (关闭服务)
echo ============================================= 
:select
set /p opt=请选择操作:
if %opt%==1 (
 echo 开启服务
	net start "TosHddscSvc"
)
if %opt%==2 (
 echo 关闭服务
	net stop "TosHddscSvc"
)
::pause
setlocal enabledelayedexpansion
echo 执行结束,脚本5秒后自动退出...
set /a count=5
:loop
echo 剩余时间:%count% 秒
timeout /t 1 >nul
set /a count-=1
if %count% gtr 0 (
 goto loop
) else (
 echo 脚本退出
)
endlocal
exit

设置开机启动脚本

set ws=wscript.createobject("wscript.shell")
ws.run "xxxxxx.bat /start",0

附1 jupyter开机启动vbs

Dim wsh
Set wsh = createobject("wscript.Shell")
'1. 使用配置文件启动 jupyter_notebook_config.py
'wsh.run "cmd /c jupyter notebook --no-browser", 0, true
'2. 直接进入路径启动[推荐]
wsh.run "cmd /c jupyter notebook --notebook-dir='C:\fastwork\Python\JupyterNotebook' --no-browser", 0, true
Set wsh = Nothing

附2 redis开机启动vbs

set ws=wscript.createobject("wscript.shell")
ws.run "service_start.bat /start",0

::启动redis的命令
@echo off
::这是简单的输出,相当于java中的system.out.println()
echo redis-server start......
::设置启动窗口的标题
title redis-server
::定义一个变量ENV_HOME
set ENV_HOME="C:\fastwork\Redis"
C:
::设置启动窗口的颜色
color 0a
cd %ENV_HOME%
redis-server.exe redis.windows.conf
exit

常用jar包

下载地址