タブファイラー・X-Finder [ x ] Part31
レス数が950を超えています。1000を超えると書き込みができなくなります。
0961名無しさん@お腹いっぱい。
2013/04/06(土) 08:33:58.64ID:RIlDqVxI02chで拾ったエロzipを解凍して、中身のフォルダやThums.db取り除いて
再び無圧縮zipに固め直すスクリプトになってますw
解凍が完全に終わってから、元ファイル削除、再圧縮するためにどうしても
解凍終了を監視する必要があったのでshell.Run()にこだわってました
Script:JScript
shell = new ActiveXObject( "WScript.Shell" );
fs = new ActiveXObject("Scripting.FileSystemObject");
filePath = WScript.Env('Focused');
currentPath = WScript.Env('Current');
filenameStr = WScript.Env('FocusedName');
if (fs.GetExtensionName(filePath).match(/zip/i))
{
shell.Run( 'winrar.exe x -ad -x*.db "' + filePath + '" "' + currentPath + '"' ,1,true );
fs.DeleteFile(filePath);
shell.Run( 'winrar.exe a -m0 -ep -dr "' + filePath + '" "' + currentPath + '\\' + filenameStr + '"' ,1,true );
}
レス数が950を超えています。1000を超えると書き込みができなくなります。