- 31 名前：名無しさん＠お腹いっぱい。 [2013/04/12(金) 00:23:30.42 ID:yRHct+Xw0]
- >>30
Line4でなんかエラーがでます・・
>>29
anago.2ch.net/test/read.cgi/software/1351342618/974
974 名前：名無しさん＠お腹いっぱい。[sage] 投稿日：2013/04/08(月) 19:44:30.41 ID:x9kuJ0Dl0
Script:JScript
shell = new ActiveXObject("WScript.Shell");
fs = new ActiveXObject("Scripting.FileSystemObject");
currentPath = WScript.Env('Current');
selAry = WScript.Col(WScript.Env('Selected'));
for (i = 0; i < selAry.Count; i++)
{
filePath = selAry.Item(i);
if (fs.GetExtensionName(filePath).match(/zip/i))
{
filenameStr = fs.GetBaseName(filePath);
shell.Run( 'winrar.exe x -ad -x*.db "' + filePath + '" "' + currentPath + '"' ,1,true );
fs.DeleteFile(filePath,true);
shell.Run( 'winrar.exe a -m0 -ep -dr "' + currentPath + '\\' + filenameStr + '.zip" "' + currentPath + '\\' + filenameStr + '"' ,1,true );
}
}
これですかね、、、？
これって再圧縮してます？(再圧縮はいらない)
実行してみたのですがいまいちわからんす・・
|
 |
