批處理文件替換某些字符

Question

我只是要完成我的腳本，爲文本文件中的每一行復制文件夾結構。我們希望爲每個客戶提供一個帶有子文件夾的文件夾。客戶「測試」文件夾應放置在\ path \ e $ \ Relaties \ T \ Test中。因此，對於每個開頭字母的特定文件夾，其餘的像數字或字符一樣是「_Overig」（其他）文件夾。

這一切工作正常，但我有％*/\''等特殊字符的問題等 在下面的示例中，我想刪除文件夾名中的所有's，因爲Windows不支持我用set var =！var2： =！這樣做，但它不起作用。另外，當文本文件中的一行包含！時，該腳本也會崩潰，我可以通過將^！instedad of！in該批處理文件，但因爲它是由我們的內部網絡產生我想下面只是該批處理文件來處理！的並自行逃脫它。

請幫助我。

setlocal EnableDelayedExpansion 
set file=E:\list.txt 

FOR /F "delims=~" %%i IN (!file!) DO (

echo %%i 

set var2=%%i 
set var=!var2:*=! 

set str=!var:~0,1! 
IF /i !str!==A (set letter=1&&set str=A) 
IF /i !str!==B (set letter=1&&set str=B) 
IF /i !str!==C (set letter=1&&set str=C) 
IF /i !str!==D (set letter=1&&set str=D) 
IF /i !str!==E (set letter=1&&set str=E) 
IF /i !str!==F (set letter=1&&set str=F) 
IF /i !str!==G (set letter=1&&set str=G) 
IF /i !str!==H (set letter=1&&set str=H) 
IF /i !str!==I (set letter=1&&set str=I) 
IF /i !str!==J (set letter=1&&set str=J) 
IF /i !str!==K (set letter=1&&set str=K) 
IF /i !str!==L (set letter=1&&set str=L) 
IF /i !str!==M (set letter=1&&set str=M) 
IF /i !str!==N (set letter=1&&set str=N) 
IF /i !str!==O (set letter=1&&set str=O) 
IF /i !str!==P (set letter=1&&set str=P) 
IF /i !str!==Q (set letter=1&&set str=Q) 
IF /i !str!==R (set letter=1&&set str=R) 
IF /i !str!==S (set letter=1&&set str=S) 
IF /i !str!==T (set letter=1&&set str=T) 
IF /i !str!==U (set letter=1&&set str=U) 
IF /i !str!==V (set letter=1&&set str=V) 
IF /i !str!==W (set letter=1&&set str=W) 
IF /i !str!==X (set letter=1&&set str=X) 
IF /i !str!==Y (set letter=1&&set str=Y) 
IF /i !str!==Z (set letter=1&&set str=Z) 

IF !letter!==1 (set pad=\\fs1\e$\Data\Relaties\!str!\!var!) ELSE (set pad=\\fs1\e$\Data\Relaties\_Overig\!var!) 
set oudpad=\\fs1\e$\Data\Klanten\!var! 
xcopy "\\fs1\e$\Data\Relaties\_template\_template" "!pad!" /T /E /O /I 

robocopy "!oudpad!\adviesrapporten" "!pad!\Documentatie\Adviesrapporten" /ZB /COPY:DAT /R:3 /W:1 

set letter=0 

) 

編輯：

通過使用 固定星號的事var =！var：** =！

但仍然如果我想要一個文件夾名稱！在其中，腳本忽略它。

Answer 1

確定 - 試試這個：

@ECHO OFF 
SETLOCAL 
FOR /f "delims=" %%i IN (E:\list.txt) DO (
ECHO "%%i"|FINDSTR /i /b /r .[a-z] >nul 
IF ERRORLEVEL 1 (set letter=_Overig) ELSE (SET letter=%%i&CALL SET letter=%%letter:~0,1%%) 
SET var=%%~i 
CALL :transmute 
) 
GOTO :eof 

:transmute 
SETLOCAL enabledelayedexpansion 
SET var=!var:^|=! 
SET var=!var:^>=! 
SET var=!var:^<=! 
SET var=!var:%%=! 
SET var=!var:^&=! 
endlocal&SET var=%var% 
SET var=%var:?=% 
SET var=%var::=% 
SET var=%var:[=% 
SET var=%var:]=% 
SET var=%var:`=% 
SET var=%var:'=% 
SET var=%var:{=% 
SET var=%var:}=% 
SET var=%var:/=% 
SET var=%var:\=% 
SET nvar=%var:"=% 
SET "var=" 
:tmlp 
IF NOT "%nvar:~0,1%"=="*" IF NOT "%nvar:~0,1%"=="=" SET var=%var%%nvar:~0,1% 
SET nvar=%nvar:~1% 
IF DEFINED nvar GOTO tmlp 
SET pad=\\fs1\e$\Data\Relaties\%letter%\%var% 
set oudpad=\\fs1\e$\Data\Klanten\%var% 
ECHO XCOPY "\\fs1\e$\Data\Relaties\_template\_template" "%pad%" /T /E /O /I 
ECHO robocopy "%oudpad%\adviesrapporten" "%pad%\Documentatie\Adviesrapporten" /ZB /COPY:DAT /R:3 /W:1 

GOTO :eof 

其中至少不會崩潰數據文件

name 1 
allo! allo! 
"good grief!" 
@last! 
%percents-problem or not?% 
how about ^carets? 
NOT carrots 
(what does this do?) 
)and what about this? 
;semi to start? 
-dash 
^caret? 
^^double-caret? 
&ampersand schmooze 
!now this is a test!! 
=can be skipped 
:colon, of course 
    and ever-loving spaces 
*s fell on stockton 
9" nails 
|pipe? 
?question mark?? 
>greater? 
<less?? 
.dot 
,comma 
12345 
`that's all 
o'connor 
]close-square 
[open-square 
{and brace-open 
}or close 
/slash 
\slosh 

從本質上講，檢查該行以字母開頭後，每個名字被按摩到刪除尷尬的字符，最終顯示名稱和目錄。

XCOPY和ROBOCOPY都未激活;你需要在檢查後刪除前面的ECHO ...