@echo off
md e:\搜索輸出檔案
for /f "delims=" %%a in (搜索串列.txt) do (
for /f "delims=" %%b in ('dir /a-d /b /s e:\圖紙') do (
set "str=%%~nb"
setlocal enabledelayedexpansion
if not "!str:%%a=!"=="!str!" (endlocal &move "%%b" e:\搜索輸出檔案)
endlocal
)
)
pause
各位好，上面的程式為我在別的大俠的基礎上（見：http://www.bathome.net/thread-39929-1-1.html）拼湊的，能實作“根據檔案名關鍵詞串列批量搜索、移動檔案”但不能實作如下的功能：
1、復制對應的檔案夾，即避免所有的檔案平鋪在“ e:\搜索輸出檔案”下；
2、檔案有重復時有提醒.
哪位大俠能幫下實作上述兩個功能？非常感謝。
uj5u.com熱心網友回復：
上面的第2條如果能比較“日期”、“大小”并顯示更好uj5u.com熱心網友回復：
你是要用vb來處理嗎？uj5u.com熱心網友回復：
建議將bat語法改為vbs語法。uj5u.com熱心網友回復：
@echo off
SETLOCAL EnableDelayedExpansion
SET "v_CD=%CD%"
PUSHD
CD e:\圖紙\
for /f "delims=" %%a in (%v_CD%\搜索串列.txt) do (
for /f "delims=" %%b in ('dir /a-d /b /s %%a') do (
set "str=%%b"
move "%%b" "!str:e:\圖紙\=e:\搜索輸出檔案\!"
)
)
POPD
set v_CD=
set str=
ENDLOCAL
把 %%a 直接作為查找的引數（檔案名）。
因為遞回搜索引數不能同時指定檔案名和起始目錄，所以要把起始目錄設為當前目錄。
用變數的字串替換來保留目標中的子目錄資訊。
功能1已經實作。
有子目錄后功能2不需要。
uj5u.com熱心網友回復：
謝謝，不知道怎么不能實作啊？uj5u.com熱心網友回復：
用什么都可以，只要能實作功能
uj5u.com熱心網友回復：
謝謝您的指點，測驗怎么不能實作呢？
uj5u.com熱心網友回復：
把盤符 e: 換成大寫試試，字串替換的內容要和你 Dir 結果的路徑匹配。uj5u.com熱心網友回復：
謝謝，改成了大寫也是實作不了啊
uj5u.com熱心網友回復：
你把 move 這一句改成ECHO move "!str!" "!str:E:\圖紙\=E:\搜索輸出檔案\!"
把輸出內容復制到一個 bat 檔案中，執行，看哪一句錯誤。
uj5u.com熱心網友回復：
您好，見附件。
uj5u.com熱心網友回復：
執行整個bat！單獨一句有鳥用啊！uj5u.com熱心網友回復：
C:\>set /?顯示、設定或洗掉 cmd.exe 環境變數。
SET [variable=[string]]
variable 指定環境變數名。
string 指定要指派給變數的一系列字串。
要顯示當前環境變數，鍵入不帶引數的 SET。
如果命令擴展被啟用，SET 會如下改變:
可僅用一個變數激活 SET 命令，等號或值不顯示所有前綴匹配
SET 命令已使用的名稱的所有變數的值。例如:
SET P
會顯示所有以字母 P 打頭的變數
如果在當前環境中找不到該變數名稱，SET 命令將把 ERRORLEVEL
設定成 1。
SET 命令不允許變數名含有等號。
在 SET 命令中添加了兩個新命令列開關:
SET /A expression
SET /P variable=[promptString]
/A 命令列開關指定等號右邊的字串為被評估的數字運算式。該運算式
評估器很簡單并以遞減的優先權順序支持下列操作:
() - 分組
! ~ - - 一元運算子
* / % - 算數運算子
+ - - 算數運算子
<< >> - 邏輯移位
& - 按位“與”
^ - 按位“異”
| - 按位“或”
= *= /= %= += -= - 賦值
&= ^= |= <<= >>=
, - 運算式分隔符
如果您使用任何邏輯或取余運算子， 您需要將運算式字串用
引號擴起來。在運算式中的任何非數字字串鍵作為環境變數
名稱，這些環境變數名稱的值已在使用前轉換成數字。如果指定
了一個環境變數名稱，但未在當前環境中定義，那么值將被定為
零。這使您可以使用環境變數值做計算而不用鍵入那些 % 符號
來得到它們的值。如果 SET /A 在命令腳本外的命令列執行的，
那么它顯示該運算式的最后值。該分配的運算子在分配的運算子
左邊需要一個環境變數名稱。除十六進制有 0x 前綴，八進制
有 0 前綴的，數字值為十進位數字。因此，0x12 與 18 和 022
相同。請注意八進制公式可能很容易搞混: 08 和 09 是無效的數字，
因為 8 和 9 不是有效的八進制位數。
/P 命令列開關允許將變數數值設成用戶輸入的一行輸入。讀取輸入
行之前，顯示指定的 promptString。promptString 可以是空的。
環境變數替換已如下增強:
%PATH:str1=str2%
會擴展 PATH 環境變數，用 "str2" 代替擴展結果中的每個 "str1"。
要有效地從擴展結果中洗掉所有的 "str1"，"str2" 可以是空的。
"str1" 可以以星號打頭；在這種情況下，"str1" 會從擴展結果的
開始到 str1 剩余部分第一次出現的地方，都一直保持相配。
也可以為擴展名指定子字串。
%PATH:~10,5%
會擴展 PATH 環境變數，然后只使用在擴展結果中從第 11 個(偏
移量 10)字符開始的五個字符。如果沒有指定長度，則采用默認
值，即變數數值的余數。如果兩個數字(偏移量和長度)都是負數，
使用的數字則是環境變數數值長度加上指定的偏移量或長度。
%PATH:~-10%
會提取 PATH 變數的最后十個字符。
%PATH:~0,-2%
會提取 PATH 變數的所有字符，除了最后兩個。
終于添加了延遲環境變數擴充的支持。該支持總是按默認值被
停用，但也可以通過 CMD.EXE 的 /V 命令列開關而被啟用/停用。
請參閱 CMD /?
考慮到讀取一行文本時所遇到的目前擴充的限制時，延遲環境
變數擴充是很有用的，而不是執行的時候。以下例子說明直接
變數擴充的問題:
set VAR=before
if "%VAR%" == "before" (
set VAR=after
if "%VAR%" == "after" @echo If you see this, it worked
)
不會顯示訊息，因為在讀到第一個 IF 陳述句時，BOTH IF 陳述句中
的 %VAR% 會被代替；原因是: 它包含 IF 的文體，IF 是一個
復合陳述句。所以，復合陳述句中的 IF 實際上是在比較 "before" 和
"after"，這兩者永遠不會相等。同樣，以下這個例子也不會達到
預期效果:
set LIST=
for %i in (*) do set LIST=%LIST% %i
echo %LIST%
原因是，它不會在目前的目錄中建立一個檔案串列，而只是將
LIST 變數設成找到的最后一個檔案。這也是因為 %LIST% 在
FOR 陳述句被讀取時，只被擴充了一次；而且，那時的 LIST 變數
是空的。因此，我們真正執行的 FOR 回圈是:
for %i in (*) do set LIST= %i
這個回圈繼續將 LIST 設成找到的最后一個檔案。
延遲環境變數擴充允許您使用一個不同的字符(驚嘆號)在執行
時間擴充環境變數。如果延遲的變數擴充被啟用，可以將上面
例子寫成以下所示，以達到預期效果:
set VAR=before
if "%VAR%" == "before" (
set VAR=after
if "!VAR!" == "after" @echo If you see this, it worked
)
set LIST=
for %i in (*) do set LIST=!LIST! %i
echo %LIST%
如果命令擴展被啟用，有幾個動態環境變數可以被擴展，但
不會出現在 SET 顯示的變數串列中。每次變數數值被擴展時，
這些變數數值都會被動態計算。如果用戶用這些名稱中任何
一個定義變數，那個定義會替代下面描述的動態定義:
%CD% - 擴展到當前目錄字串。
%DATE% - 用跟 DATE 命令同樣的格式擴展到當前日期。
%TIME% - 用跟 TIME 命令同樣的格式擴展到當前時間。
%RANDOM% - 擴展到 0 和 32767 之間的任意十進制數字。
%ERRORLEVEL% - 擴展到當前 ERRORLEVEL 數值。
%CMDEXTVERSION% - 擴展到當前命令處理器擴展版本號。
%CMDCMDLINE% - 擴展到呼叫命令處理器的原始命令列。
C:\>
uj5u.com熱心網友回復：
改成如下：
@echo off
SETLOCAL EnableDelayedExpansion
SET "v_CD=%CD%"
PUSHD
CD E:\圖紙\
for /f "delims=" %%a in (%v_CD%\list.txt) do (
for /f "delims=" %%b in ('dir /a-d /b /s %%a') do (
set "str=%%b"
ECHO move "!str!" "!str:E:\圖紙\=E:\搜索輸出檔案\!"
)
)
POPD
set v_CD=
set str=
ENDLOCAL
)
)
pause
uj5u.com熱心網友回復：
沒有匹配的檔案，不是很正常。uj5u.com熱心網友回復：
試了一下，不行啊，哪位高人改下？謝謝。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/37015.html
標籤：VB基礎類
下一篇：關于圓外點做切線的問題