Создание мини сайтов и электронных книг. Публикация мини сайтов в интернет. Автоматическая генерация Веб страниц.

Хотите научу как сделать e-book из блога на blogspot.com в 10 действий?

1.Качаем и устанавливаем Программу для создания мини сайтов и электронных книг в CHM формате - Web Site Pad.

2. Качаем и устанавливаем HTML Help Workshop and Documentation.

3. Запускаем "Web Site Pad". Создаем новый проект: Имя проекта: "Davydov", Выбор шаблона проекта:"CHM Book". Жмем кнопку "Создать"

4. Выполняем пункт меню "Файл/Автоматизация..."

5. В редактор скрипта копируем вот этот код:

var sFeedName = 'davydov';
var sFeedUrl = 'http://' + sFeedName + '.blogspot.com/feeds/posts/default?max-results=1000';

var xml = new ActiveXObject("Microsoft.XMLDOM");
Editor.Clear();
var sXML = getUrl(sFeedUrl).replace('UTF-8', 'Windows-1251');
if (xml.loadXML(sXML))
{
  oFeed = xml.documentElement;
  sFeedType = oFeed.tagName;
  if (sFeedType == 'rss')
    oFeed = oFeed.selectSingleNode('channel');
  iTotal = xmlText(oFeed, 'openSearch:totalResults');
  sTitle = xmlText(oFeed, 'title').replace(/"/g, '"');
  if (sFeedType == 'rss')
  {
    oItems = oFeed.selectNodes('item');
    sUrl = xmlText(oFeed, 'link');
  }
  else
  {
    oItems = oFeed.selectNodes('entry');
    sUrl = xmlChildAttr(oFeed, 'link', 'href');
  }
  Editor.AddDefine('title', sTitle);
  Editor.AddDefine('filename', sFeedName);
  Editor.AddDefine('charset', 'windows-1251');
  Editor.AddDefine('language', '0x419 Russian');
  Editor.AddDefine('topic', '$$.files {&name}\\\\n\\n$$.topics <li><object type="text/sitemap"><param name="Name" value="{&title}"><param name="Local" value="{&name}"><param name="ImageNumber" value="{&icon}"></object>');
  for (i = oItems.length - 1; i >= 0 ; i--)
  {
    oPost = oItems.item(i);
    
    sTitle = xmlText(oPost, 'title', 'Без названия').replace(/"/g, '&quot;');
    if (sFeedType == 'rss')
    {
      sDate = new Date(xmlText(oPost, 'pubDate')).toLocaleDateString();
      sContent = xmlText(oPost, 'description');
      sLink = xmlText(oPost, 'link', sUrl);
    }
    else
    {
      sDate = xmlText(oPost, 'published');
      sDate = sDate.substr(8, 2)+ '.' + sDate.substr(5, 2) + '.' + sDate.substr(0, 4);
      sContent = xmlText(oPost, 'content');
      if (!sContent)
        sContent = xmlText(oPost, 'summary');
      sLink = xmlChildAttr(oPost, 'link', 'href', sUrl)
    }

    Editor.AddSection(iTotal - i + '.html');
    Editor.AddDefine('title', sTitle);
    Editor.AddDefine('date', sDate);
    Editor.Writeln('{topic}');
    Editor.AddH1('{title}');
    Editor.AddP('<p><small>Дата публикации: {date}</small></p>');
    Editor.AddP(sContent);
    Editor.AddP('Ссылка на статью: *[' + sLink + ' target=_new]');
  }
  Editor.Writeln('[{filename}.hhc]');
  Editor.Writeln('<html><body><ul>{topics}</ul></body></html>');
  Editor.Writeln('[{filename}.hhp]');
  Editor.Writeln('\\[OPTIONS]');
  Editor.Writeln('Compiled file={filename}.chm');
  Editor.Writeln('Contents file={filename}.hhc');
  Editor.Writeln('Default topic={&index}');
  Editor.Writeln('Full-text search=Yes');
  Editor.Writeln('Language={language}');
  Editor.Writeln('Title={title}');
  Editor.Writeln('\\[ALIAS]');
  Editor.Writeln('{aliases}');
  Editor.Writeln('\\[MAP]');
  Editor.Writeln('{maps}');
  Editor.Writeln('\\[FILES]');
  Editor.Writeln('{files}');  
}

function getUrl(sUrl)
{
  xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
  xmlhttp.open("get", sUrl, false);
  xmlhttp.send();
  return xmlhttp.responseText;
}

function xmlAttr(oElement, sName, sDefault)
{
  if (attr = oElement.attributes.getNamedItem(sName))
    return attr.text;
  else
    return sDefault;
}

function xmlChildAttr(oElement, sChild, sName, sDefault)
{
  if (node = oElement.selectSingleNode(sChild))
    return xmlAttr(node, sName, sDefault);
  else
    return sDefault;
}

function xmlText(oElement, sName, sDefault)
{
  if (node = oElement.selectSingleNode(sName))
    return node.text;
else
    return sDefault;
}

6. Подключаемся к Интернету (если вы не всегда в онлайне). Жмем кнопку "Выполнить" и ждем когда скрипт выполнится. И закрываем окно "Автоматизация".

7. Жмем на тулбаре кнопку "Файлы..."

8. В открывшемся окне проводника находим файл "davydov.hhp" и открываем его.

9. В окне "HTML Help Workshop" выполняем команду "File/Compile..." и в открывшемся диалоге жмем "Compile" и ждем пока выполнится компиляция.

10. Закрываем "HTML Help Workshop", в окне проводника находим файл "davydov.chm" - запускаем его и наслаждаемся...