home *** CD-ROM | disk | FTP | other *** search
/ DOS/V Power Report 2002 July / VPR0207A.ISO / OLS / IRVINE0_4_1A / irvine0_4_1a.lzh / scripts / treenavigate.dms < prev    next >
Text File  |  2002-03-06  |  951b  |  45 lines
  1. /*
  2. スクリプト初期化データ
  3. guid={AF367A13-3BE2-43B3-B5B5-50EB3CFE41E7}
  4. caption=フォルダのURLをブラウザで開く
  5. version=0
  6. hint=フォルダに関連付けたURLをウェブブラウザで開きます
  7. event=OnTreeMenuClick
  8. match=
  9. author=Wolfy
  10. */
  11.  
  12. SECTION = 'wolfy';
  13. IDENT_NAVIGATE = 'navigateurl';
  14.  
  15. function OnTreeMenuClick(irvine,action){
  16. //キューフォルダメニューのクリックイベント
  17.   //読み込み
  18.   url = irvine.FolderData[SECTION,IDENT_NAVIGATE];
  19.   //設定をおこなう
  20.   key = new Keyboard;
  21.   if(key.shift){
  22.     //URL
  23.     ret = prompt('ブラウザで開くURLを設定してください',url);
  24.     if(!(ret == null)){
  25.       url = ret;
  26.       //書き込み
  27.       irvine.FolderData[SECTION,IDENT_NAVIGATE] = url;
  28.     }
  29.   }
  30.   
  31.   //ブラウザで開く
  32.   if(url != ''){
  33.     win = new Win32;
  34.     win.shellExecute('',url);
  35.   }
  36.   else{
  37.     alert('Shiftを押しながら実行してURLを設定してください');
  38.   }
  39. }
  40.  
  41. function OnMenuUpdate(irvine,action){
  42. //メニューの更新イベント
  43.  
  44. }
  45.