Нужно получить текст страницы, засунутой в MHT. Как это можно сделать?

это MIME

word openoffice

ВходящийФайл = Новый Файл(ИмяВходящегоФайла);
           HTML = Новый ComОбъект("HTMLFile");
           HTML.Open("text\html");
           HTML.Write(Текст.ПолучитьТекст());
           HTMLDocument = HTML.documentElement.document;


Надеюсь поможет.

ВходящийФайл = Новый Файл(ИмяВходящегоФайла);
           HTML = Новый ComОбъект("HTMLFile");
           HTML.Open("text\html");
           Текст = Новый ТекстовыйДокумент;
           Текст.Прочитать(КаталогВременныхФайлов()+"КонтрагентыФИО.htm");
           //Текст.Прочитать("C:\Temp\ka.htm");
           HTML.Write(Текст.ПолучитьТекст());
           HTMLDocument = HTML.documentElement.document;


вот так лучше, открываешь его как текстовый и оттуда по тегам вытащится нужный текст.

(4) C HTML/HTM проблем нет, нужно mht.

v8: Как распотрошить web-архив (*.mht)?    Я


Нужно получить текст страницы, засунутой в MHT. Как это можно сделать?
это MIME

Word открыл

(6) Да, Word, Excel их открывают, но получить из них изначальный HTML не получается.
Можно сохранить из Word как HTML, но в файл будет добавлено много специфических тегов...

а че что я показал, не открывает твой mht как html с тегами и тд и тп?

(8) Там закодировано всё...

так пробывал открыть или нет?

http://www.google.ru/#hl=ru&newwindow=1&sclient=psy-ab&q=Преобразование+калькуляций+AUDATEX+в+текстовый+формат+для+1С+EXE+TXT+....+их+в+PDF%2C+HTML%2C+HTM%2C+MHT%2C+RTF%2C+DOC%2C+DOCX%2C+ODT%2C+TXT%2C+GIF%2C+JPEG%2C+PNG%2C+TIFF+форматы&oq=Преобразование+калькуляций+AUDATEX+в+текстовый+формат+для+1С+EXE+TXT+....+их+в+PDF%2C+HTML%2C+HTM%2C+MHT%2C+RTF%2C+DOC%2C+DOCX%2C+ODT%2C+TXT%2C+GIF%2C+JPEG%2C+PNG%2C+TIFF+форматы&aq=f&aqi=&aql=&gs_nf=1&gs_l=hp.3...126057.126057.1.126585.1.0.0.0.0.0.0.0..0.0.5jrdMp0bLIo&pbx=1&bav=on.2,or.r_gc.r_pw.r_qf.,cf.osb&fp=aeff8a7df32d6e25

а вот тута программы преобразовать в HTML и все работай дальше

Сделал так:
Процедура КнопкаВыполнитьНажатие(Кнопка)

   savefile = "c:\\1.html";
   surl = "C:\Documents and Settings\le\Рабочий стол\Выписка_190412.mht";

   oie = Новый COMОбъект("InternetExplorer.Application");
   oie.navigate(surl);
   Пока oie.readystate <> 4 Цикл
   КонецЦикла;
   fso = Новый COMОбъект("scripting.filesystemobject");
   ofile = fso.createtextfile(savefile, True);
   ofile.Write(oie.Document.documentElement.outerHTML);
   ofile.Close();
   ofile = Неопределено;
   oie.Quit();
   oie = Неопределено;

КонецПроцедуры

это не то, что тебе надо?
http://msdn.microsoft.com/en-us/library/aa487382(v=exchg.65).aspx

(13) Да, CDO тоже можно использовать.