Try
TheDIZs!
Extracts DIZ- and NFO-files from RAR-files.
Place UnRar.exe from
www.winrar.com in the same folder as TheDIZs.
You can run it to have it ask for a root folder, or add a folder to the command line.
Skrommel
;TheDIZs.ahk
; Extracts DIZ- and NFO-files from RAR-files.
; Place UnRar.exe from www.winrar.com in the same folder as TheDIZs
;Skrommel @ 2008
#SingleInstance,Ignore
#NoEnv
SetBatchLines,-1
If 0=0
{
FileSelectFolder,start,,3,Select a folder to search for RAR files
If start=
{
MsgBox,0,TheDIZs,You didn't select a folder.
ExitApp
}
}
Else
start=%1%
crlf:=Chr(13) . Chr(10)
folder:=A_Now
FileDelete,TheDIZs.txt
FileAppend,Scan started %A_Now%%crlf%,TheDIZs.txt
Loop,%start%\*.rar,0,1
{
FileCreateDir,%A_Temp%\%folder%\
archive:=A_LoopFileLongPath
TrayTip,TheDIZs,Scanning %archive%
RunWait,unrar e -n*.diz -p- %archive% %A_Temp%\%folder%\,,Hide
RunWait,unrar e -n*.nfo -p- %archive% %A_Temp%\%folder%\,,Hide
Loop,%A_Temp%\%folder%\*.*
{
diz:=A_LoopFileLongPath
FileRead,content,%diz%
FileAppend,-----------%crlf%%archive%%crlf%-----------%crlf%%content%%crlf%%crlf%%crlf%,TheDIZs.txt
FileDelete,%diz%
}
}
FileRemoveDir,%A_Temp%\%folder%\
FileAppend,Scan stopped %A_Now%%crlf%,TheDIZs.txt
Run,TheDIZs.txt