Label Label3 {
  X = 53;
  Y = 295;
  Width = 336;
  Height = 50;
  HorizontalAlign = $CENTER;
  Border = $TRUE;
  BorderStyle = $RISED;
  FgColor = $RED;
  Visible = $FALSE;
  Value = "前回システムが異常終了しました。\n異常終了した情報を";
  Value += "保存する場合は、\nここをクリックしてください。";
  
  Function OnClicked( e ) {
   try{
    /* 現在日付の取得 */
    var f_data = new Date();
    
    /* バックアップ後のファイル */
    var file_rename = str(f_data,"YYYYMMDDHH24MISS")+"_BizBrowser.core";
    
    var rename_path = CRS_010.bk_folder+ "/" +file_rename;
    
    /* バックアップ対象のファイルが存在する場合は、
                                 現在日付でバックアップ */
    if (!CRS_010.fsp.Rename(CRS_010.file_name, rename_path, 
                     FileSystem.NOCONFIRM + FileSystem.NOERRORUI)) {
      //.MessageBox("BizBrowser.coreのバックアップに失敗しました。");
      return;
    }        
    if(MessageBox("保存したファイル("+ file_rename +")を確認しますか？"
               ,"確認", $OKCANCEL+$IconQuestion) == OkSelected) {
      var rt = new Runtime(CRS_010.fsp);
      rt.ShellExplore("/backup");
    }
    
    /* マウント解除 */
    CRS_010.fsp.Unmount("/backup");
    
    Visible = $FALSE;
    
   }catch(e){
    //.MessageBox(e.Message);
   }
  }
}

if ( !$DESIGNTIME ) {
  try{
    var fs = new FileSystem();
    
    /* BizBrowser.coreの配置パス取得 */
    var path = fs.MapPath("/");
    
    /* BizBrowser.coreは、rootフォルダと同階層に配置されているため、
    　　rootフォルダのパスを取得し、取得したパスから「root」フォルダの
    　　パスを除外する。 */
    var f_backup = path.replace("root\\","");
  
    /* 仮想バックアップフフォルダ名 */
    String bk_folder = "/backup";
  
    /* バックアップファイル対象 */
    String file_name = bk_folder + "/BizBrowser.core";
    
    var fsp = new FileSystem(FileSystem.PRIVATE_ROOT);
    CRS_010.Append(fsp,"fsp");
    
    /* フォルダのマウント */
    fsp.Mount("データフォルダ", bk_folder, f_backup);
    if(fsp.Exists(file_name)){
      /* BizBrowser.coreが存在する場合は、メッセージ表示 */
      Label3.Visible = $TRUE;
    }
  }catch(e){
    //.MessageBox(e.Message);
  }
}