home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 2002 July / VPR0207A.ISO / OLS / IRVINE0_4_1A / irvine0_4_1a.lzh / scripts / treereplacefolder.dms < prev    next >
Text File  |  2002-03-09  |  956b  |  39 lines
  1. /*
  2. スクリプト初期化データ
  3. guid={982A9E91-955D-4E2F-88BF-6F7B4B57A6AB}
  4. caption=カレントフォルダ以下の保存フォルダの置換
  5. version=1
  6. hint=カレントフォルダ以下の保存フォルダを置換する
  7. event=OnTreeMenuClick
  8. match=
  9. author=謎
  10. */
  11.  
  12.  
  13. function replaceFolder(folder,reg,after){ 
  14. //保存フォルダを置換する
  15.   folder.Data['queue','folder'] = reg.replace(folder.Data['queue','folder'],after); 
  16.   for(i = 0; i < folder.FolderCount;i++)
  17.    replaceFolder(folder.Folders[i],reg,after); 
  18. }
  19.  
  20. function OnTreeMenuClick(irvine,action){
  21. //メインメニューのクリックイベント
  22.   reg = new RegExp;
  23.   reg.ignoreCase = true;
  24.   reg.source = prompt('保存フォルダの置換前の部分(正規表現で指定できます)', '');
  25.   if(reg.source == null) 
  26.     return;
  27.   
  28.   after = prompt('保存フォルダの置換後の部分', '');  
  29.   if(after == null) 
  30.     return;   
  31.     
  32.   replaceFolder(irvine.Current,reg,after);
  33. }
  34.  
  35. function OnMenuUpdate(irvine,action){
  36. //メニューの更新イベント
  37.  
  38. }
  39.