求一个批处理

香国妙手

求一个批处理，要求如下：
运行批处理就自动搜索卷标为“八段锦”的优盘盘符，如果优盘盘符为“H”，则自动运行H:\123\abc.exe，如果优盘盘符为“K”，则自动运行K:\123\abc.exe。谢谢！
补充说明：我们只知道优盘卷标为“八段锦”，我们要通过卷标找到优盘盘符（可能是“D-Z”中的某一个），并运行优盘的123\abc.exe

rbwrbw

不难,问下度娘

wszjf

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. 
   
4. set targetLabel=八段锦
   
5. set targetFile=123\abc.exe
   
6. 
   
7. for %%d in (A B C D E F G H I J K L M N O P Q R S T U V W X Y Z) do (
   
8.     if exist %%d:\ (
   
9.         for /f "tokens=1-2 delims=:" %%a in ('fsutil volume diskfree %%d:\') do (
   
10.             set "label="
    
11.             for /f "usebackq tokens=2 delims==" %%c in (`wmic logicaldisk where DeviceID^="%%d:" get VolumeName /value`) do (
    
12.                 set "label=%%c"
    
13.             )
    
14.             if "!label!"=="%targetLabel%" (
    
15.                 echo 找到目标盘符: %%d:，正在运行 %targetFile%...
    
16.                 pushd %%d:\
    
17.                 call %targetFile%
    
18.                 popd
    
19.             )
    
20.         )
    
21.     )
    
22. )
    
23. 
    
24. endlocal

复制代码

该脚本会遍历所有盘符，搜索卷标为"八段锦"的优盘盘符，并自动运行该盘符下的123\abc.exe。

注意：如果存在多个满足条件的盘符，脚本会逐个运行它们下面的123\abc.exe文件。如果只要找到一个满足条件的盘符并运行对应的文件，可以在找到目标盘符后添加一个exit语句来终止脚本的执行。

yyz2191958

wszjf 发表于 2023-10-22 20:04
该脚本会遍历所有盘符，搜索卷标为"八段锦"的优盘盘符，并自动运行该盘符下的123\abc.exe。注 ...

很给力!

wjgyz740526

如果除了优盘有目标文件，本地硬盘没有的话，其实可以忽略优盘盘符

kkkssc

@echo off
chcp 936
set pg=123\abc.exe
set pf=八段锦
for %%i in (c d e f g h i j k l m n o p q r s t u v w x y z) do (set p=%%i&&call :ch)
echo 没找到对应程序&exit
:ch
echo %p%:
if not exist %p%: goto :bk
for /f "tokens=4 delims= " %%a in ('vol %p%: ^|find /i "%pf%"') do (set pt=%%a)
if 1%pt%==1%pf% (call "%p%:\%pg%" &&exit)
:bk
exit /b

香国妙手

wszjf 发表于 2023-10-22 20:04
该脚本会遍历所有盘符，搜索卷标为"八段锦"的优盘盘符，并自动运行该盘符下的123\abc.exe。注 ...

感谢大侠热情相助！但是，我另存为ANSI编码的bat文件双击后，却没有显示“找到目标盘符”，也没有运行abc.exe就退出了。请求大侠再次协助，不胜感激！

香国妙手

kkkssc 发表于 2023-10-22 20:36
@echo off
chcp 936
set pg=123\abc.exe

感谢大侠热情相助！但是，我另存为ANSI编码的bat文件双击后，没有达到预期目的。请求大侠再次协助，不胜感激！

kkkssc

香国妙手 发表于 2023-10-22 20:44
感谢大侠热情相助！但是，我另存为ANSI编码的bat文件双击后，没有达到预期目的。请求大侠再次协助，不胜 ...

本机亲测可以运行，其他不知道了，你直接复制改变上面盘符和程序名就可以了

zjl3480

@echo off setlocal enabledelayedexpansion  set "volume_label=八段锦" set "executable=abc.exe"  for /f "usebackq tokens=1,2" %%a in (`wmic logicaldisk where "drivetype=2" get caption^, volumename ^| findstr /i "%volume_label%"`) do (     set "drive_letter=%%a"     set "volume_name=%%b"      rem Remove trailing spaces from volume name     for /l %%i in (1,1,30) do if "!volume_name:~-1!"==" " set "volume_name=!volume_name:~0,-1!" )  if defined drive_letter (     set "path=!drive_letter!\123\%executable%"     if exist "!path!" (         echo Running !path!         "!path!"     ) else (         echo File not found: !path!     ) ) else (     echo Specified volume label not found. )  endlocal

zjl3480

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. 
   
4. set "volume_label=八段锦"
   
5. set "executable=abc.exe"
   
6. 
   
7. for /f "usebackq tokens=1,2" %%a in (`wmic logicaldisk where "drivetype=2" get caption^, volumename ^| findstr /i "%volume_label%"`) do (
   
8.     set "drive_letter=%%a"
   
9.     set "volume_name=%%b"
   
10. 
    
11.     rem Remove trailing spaces from volume name
    
12.     for /l %%i in (1,1,30) do if "!volume_name:~-1!"==" " set "volume_name=!volume_name:~0,-1!"
    
13. )
    
14. 
    
15. if defined drive_letter (
    
16.     set "path=!drive_letter!\123\%executable%"
    
17.     if exist "!path!" (
    
18.         echo Running !path!
    
19.         "!path!"
    
20.     ) else (
    
21.         echo File not found: !path!
    
22.     )
    
23. ) else (
    
24.     echo Specified volume label not found.
    
25. )
    
26. 
    
27. endlocal

复制代码

香国妙手

zjl3480 发表于 2023-10-22 20:58

超级给力，万分感谢！

rbwrbw

good!!!

Joe_Ye

感谢分享

yc2428

感谢分享

tanglf

谢谢分享

51xp

学习

咕哩咕噜

经测试可用！

yc2428

学习了

2010linlance

牛逼，你们都手写啊？

我得靠GPT，然后改改。。。

rbwrbw

高手如云

keygen

bingchat生成