[已解決]學·知討論多關鍵詞插件路徑文件夾查找以正確判斷多版本Photoshop路徑最后由 34205 于 -2-24 11:45[已解決]如題，會遇到這樣的情況：1、需要查找軟件如Photoshop插件目錄Plug-ins，2、但是我的電腦中有多個PS版本多個Plug-ins目錄，3、需要在結果上添加更多判斷，以便找到正確的目錄4、我也是新手，不是秀東西，因為還有個改進的還沒有解決，所以想求助。5、增加關鍵詞是之前沒有帖子討論的，以下代碼取自論壇前輩，關于查找文件查找目錄的帖子論壇已經發很多6、需要指點：目前查到程序位置，但是如何將Plug-ins絕對路徑 存到一個變量，（也就是如何直接查找目錄，而不是文件）7、其他：也希望大家指出可以改進的地方【以下代碼已經更正，已解決】
- @echo off
- Mode con: cols=86 lines=36
- :StartSet
- rem 指定待搜索的關鍵詞條件1
- Set Sting1_FileName=Photoshop.exe
- rem 指定路徑中作為參照的關鍵詞條件2
- Set Sting2_PathName=CS6
- :GO
- Set This_Path=%cd%
- MD TempPSCs6
- cd TempPSCs6
- Set TempPath=%cd%
- Set DirFind_Filesname=查找到的路徑.txt
- Set DirDo_Filesname=滿足關鍵字查找到的路徑.txt
- Set DirDo_Ineed=目標Plug-ins目錄絕對路徑.txt
- Echo.>%TempPath%%DirFind_Filesname%
- Cls
- echo =============================說明區==============================
- Echo.
- Echo [Photoshop插件輔助]
- Echo 學習-BAT-BAT代碼-批處理實現-條件查找Photoshop插件目錄
- Echo.
- Echo 本插件Bat實現以下功能:
- Echo 條件查找Photoshop.exe 以正確判斷PhotoshopPlug-ins插件目錄
- Echo.
- echo =========================================================S34205==
- Echo.
- Ping -n 5 127.1>nul
- :FindDir
- rem 指定待搜索的文件
- Echo.
- Echo 查找目標：%Sting1_FileName%
- Set String1=%Sting1_FileName%
- Echo 關鍵詞1 ：%String1%
- Set string2=%Sting2_PathName%
- Echo 關鍵詞2 ：%String2%
- Echo 批處理目錄：%This_Path%
- Echo 臨時的目錄：%TempPath%
- Set ext=*.8bf
- Echo.
- echo 正在搜索%Sting1_FileName%，請稍候...
- Echo.
- Echo.
- for %%a 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 (
- if exist %%a:nul (
- pushd %%a:
- echo 正在查找文件 %Sting1_FileName%，到達盤符: %%a
- for /r %%b in (*%Sting1_FileName%) do (
- echo 正在查找文件 %Sting1_FileName%，到達路徑: %%b
- if /i %%~nxb equ %Sting1_FileName% (
- set Findpath=%%b &Echo 找到路徑: %%b &Echo. &Echo %%b >>%TempPath%%DirFind_Filesname%
- )
- )
- popd
- )
- )
- Rem 判斷關鍵詞
- findstr %string1% %DirFind_Filesname% | findstr %string2% >%DirDo_Filesname%
- Echo.
- Echo.
- Echo 當前保存的路徑文本內容為：
- Type %DirDo_Filesname%
- echo.
- set /p Sting1_DirDo_Filesname=<%DirDo_Filesname%
- for %%i in (%Sting1_DirDo_Filesname%) do (
- set str_Ineed=%%~dpiPlug-ins
- Rem 轉變文件名路徑為文件夾路徑
- )
- Echo %str_Ineed% >%TempPath%%DirDo_Ineed%
- Echo 當前保存的目標Plug-ins目錄絕對路徑內容為：
- echo,%Str_Ineed%
- cd %This_Path%
- Echo %cd%
- Echo.
- for /f delims= %%i in ('dir /b/s/a-d %ext%') do (Echo 當前目錄找到插件文件：%%i&Set Files8bf=%%i © %%i %Str_Ineed% >nul 2>nul )
- Echo.
- if %Files8bf% neq (Echo OK,%Files8bf% &Echo OK,插件文件已經復制到指定目錄 &Echo OK,為你打開Plug-ins插件目錄....... &Ping -n 2 127.1>nul &Start %Str_Ineed% &Goto Tips) else (Echo. &Echo No,當前目錄下沒有插件文件，為你打開Plug-ins插件目錄....... &Ping -n 2 127.1>nul &Start %Str_Ineed% &Goto out)
- :Tips
- echo Ok,去打開Photoshop查看插件結果吧.........
- Echo.
- Set TxtDiy=071122936kfcwggmlxjjdlspp
- mshta vbscript:clipboarddata.setdata(text,%TxtDiy%)(close)
- Echo Ok,可能需要用到的注冊碼（已經復制到剪貼板）：%TxtDiy%
- Echo.
- :Out
- Echo.
- Echo.
- Echo OK,30秒后，退出BAT...................................................................
- Ping -n 30 127.1>nul
- Del /a /f /s /q %TempPath%*.*
- rd /s /q TempPSCs6
- exit /b
nclick="copycode($('code0'));">復制代碼
