public object ВернутьТекстПисьмаВФорматеHTML(/*ТекстПисьма*/)
{
//Текст = ТекстПисьма;
//ТекстПоиска = Текст;
//СмещениеВТексте = 0;
//ПодстрокиПоиска = Новый СписокЗначений;
//ПодстрокиПоиска.Добавить("http://");
//ПодстрокиПоиска.Добавить("www.");
//ПодстрокиПоиска.Добавить("mailto:");
//ПозицияПризнакаСсылки = ПоискПервойПодстроки(ТекстПоиска,ПодстрокиПоиска,СтрокаПоиска);
/*// пробежимся по всем найденным ссылкам
*/
while(true/*ПозицияПризнакаСсылки>0*/)
{
//НачалоСсылки = ПозицияПризнакаСсылки;
/*// найдем последний символ ссылки
*/
//КонецСсылки = НачалоСсылки+СтрДлина(СтрокаПоиска)-1;
if(true/*КонецСсылки > НачалоСсылки+СтрДлина(СтрокаПоиска)-1*/)
{
//ТекстСсылки = Сред(ТекстПоиска,НачалоСсылки,КонецСсылки-НачалоСсылки+1);
//ТекстСсылкиHTML = "<a href="""+?(СтрокаПоиска="www.","http://","")+ТекстСсылки+""">"+ТекстСсылки+"</a>";
//ТекстДоСсылки = Лев(Текст,НачалоСсылки+СмещениеВТексте-1);
//ТекстПослеСсылки = Прав(Текст,СтрДлина(Текст)-(КонецСсылки+СмещениеВТексте));
//Текст = ТекстДоСсылки + ТекстСсылкиHTML + ТекстПослеСсылки;
//СмещениеВТексте = СмещениеВТексте + КонецСсылки + (СтрДлина(ТекстСсылкиHTML)-СтрДлина(ТекстСсылки));
}
//ТекстПоиска = Прав(ТекстПоиска,СтрДлина(ТекстПоиска)-КонецСсылки);
//ПозицияПризнакаСсылки = ПоискПервойПодстроки(ТекстПоиска,ПодстрокиПоиска,СтрокаПоиска);
}
/*;
Текст = СтрЗаменить(Текст, Символы.ПС, "<BR>");*/
/*ТекстВформатеHTML = "<HTML><HEAD>
|<META http-equiv=Content-Type content=" + """" + "text/html; charset=utf-8" + """" + ">
|<META content=" + """" + "MSHTML 6.00.2800.1400" + """" + " name=GENERATOR></HEAD>
|<BODY scroll=""auto""><FONT face=""MS Sans Serif"" size=1>" + Текст + "</FONT></BODY></HTML>";*/
return null;
}
