What will this Batch File do?

WYSIWUG

In Runtime
Messages
381
Location
New Zelaland
@ECHO OFF
IF EXIST Files.txt DEL Files.txt
IF EXIST OutFile.txt DEL OutFile.txt
FOR /F %%F IN ('"DIR /B *.txt | FIND /V /C "::""') DO SET /A Number=(%Random% %%%%F)
SET DONE==N
IF %Number%==0 GOTO No_Skip
FOR /F "SKIP=%Number%" %%D IN ('"DIR /B *.txt | FIND /V "::""') DO ECHO %%D >>Files.txt
FOR /F "TOKENS=*" %%L IN (Files.txt) DO CALL :1 %%L
GOTO Next
:1
IF %DONE%==Y GOTO :eof
ECHO %*>OutFile.txt
SET DONE=Y
GOTO :eof

:No_Skip
FOR /F %%D IN ('"DIR /B *.txt | FIND /V "::""') DO ECHO %%D>>Files.txt
FOR /F "TOKENS=*" %%L IN (Files.txt) DO CALL :2 %%L
GOTO Next
:2
IF %DONE%==Y GOTO :eof
ECHO %*>OutFile.txt
SET DONE=Y
GOTO :eof
:Next
FOR /F %%Z IN (OutFile.txt) DO SET File=%%Z
ECHO TYPE C:\Thoughts\%File%
IF EXIST OutFile.txt DEL OutFile.txtIF EXIST Files.txt DEL Files.txt
 
Back
Top Bottom