AkelPad

Code: Select all

<?xml version="1.0" encoding="utf-8"?>
\t<корень>
\t\t<tag>
 ...
\t\t</tag>
\t</корень>

Code: Select all

// Version: 0.2.7 - 2015-01-10
// [built from https://github.com/beautify-web/js-beautify/tree/master 2015-05-28 01:02:09 UTC]

Code: Select all

//  ============================================================================
//  Version: 2014-06-25
//  Author: Kley
//
//  *** Создание резервной копии текущего файла. ***
//
//  Usage:
//  Call("Scripts::Main", 1, "BackUpCurrentFile.js")
//
//  Note:
//  'Имя файла.ext' --> 'Имя файла_backup(1,2...n).ext'
//  Бэкап-файл создается в папке редактируемого файла.
//  ============================================================================
var pEditFile = AkelPad.GetEditFile(0);
var pNewFile;
var nResult;

if (pEditFile)
{
  var FSO = new ActiveXObject("Scripting.FileSystemObject");

  pNewFile = NextName(pEditFile);

  FSO.CopyFile(pEditFile, pNewFile, false);

  nResult = AkelPad.MessageBox(AkelPad.GetMainWnd(),
            GetLangString(0) + "\n\n" + GetLangString(1) + " ''" +
            AkelPad.GetFilePath(pNewFile, 2 /*CPF_FILENAME*/) + "'' ?",
            "BackUp File", 324 /*MB_YESNO|MB_ICONINFORMATION|MB_DEFBUTTON2*/);

  if (nResult == 6 /*IDYES*/)
    AkelPad.OpenFile(pNewFile);
}

function NextName(sPath)
{
  var sDir  = FSO.GetParentFolderName(sPath) + "\";
  var sName = FSO.GetBaseName(sPath);
  var sExt  = FSO.GetExtensionName(sPath);
  var i     = 0;

  while (FSO.FileExists(sPath))
    sPath = sDir + sName + "_backup" + ++i + "." + sExt;

  return sPath;
}

function GetLangString(nStringID)
{
  var nLangID = AkelPad.GetLangId(1 /*LANGID_PRIMARY*/);

  if (nLangID == 0x19) //LANG_RUSSIAN
  {
    if (nStringID == 0) return "Резервная копия текущего файла создана.";
    if (nStringID == 1) return "Открыть файл";
  }
  else
  {
    if (nStringID == 0) return "A backup copy of the current file is created.";
    if (nStringID == 1) return "Open file";
  }
}