home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 2002 July
/
VPR0207A.ISO
/
OLS
/
IRVINE0_4_1A
/
irvine0_4_1a.lzh
/
scripts
/
listreplacefilename.dms
< prev
next >
Wrap
Text File
|
2002-03-10
|
1KB
|
57 lines
/*スクリプト初期化イベント
guid={92f02e38-a11a-466f-b8c6-af8d86eeea74}
caption=保存ファイル名の置換
version=2
hint=選択アイテムの保存ファイル名を置換します
event=OnListMenuClick
match=
author=名無しさん@お腹いっぱい
*/
function OnListMenuClick(irvine,action){
item = new IrvineItem;
reg = new RegExp;
reg.source = prompt('置換前(正規表現で指定できます)', '');
if(!reg.source)
return;
after = prompt('置換後', '');
if(after == null)
return;
irvine.BeginProgressBar(irvine.SelectedItemCount);
try{
for(i = 0; i < irvine.ItemCount; i++){
if (irvine.GetItemSelected(i)){
item.data = irvine.GetItemData(i);
if(item.filename != '')
tmp = item.filename;
else {
delimindex = item.url.lastIndexOf('/');
tmp = item.url.slice(delimindex + 1,item.url.length - 1);
}
tmp2 = reg.replace(tmp, after);
if(tmp == tmp2)
tmp2 = item.filename;
item.filename = tmp2;
irvine.SetItemData(i, item.data);
irvine.ProgressBarStepBy(1);
}
}
}
finally{
irvine.EndProgressBar();
irvine.Invalidate();
}
}
function OnMenuUpdate(irvine,action){
action.enabled = (irvine.SelectedItemCount > 0);
}