Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 15, средняя оценка - 4.80
Иваныч
#1

Как конвертировать *.mht в *.htm, *.html ? - VB

13.01.2009, 18:42. Просмотров 2333. Ответов 4
Метки нет (Все метки)

Ребята не знаю, что и делать - подскажите пожайлуста как побороть такую проблемку:
Есть папка в которой сохранены документы как WEB Archive, Single file (*.mht).
Вопрос - как програмно можно пересохранить их как Web Page, Complete (*.htm, *.html) (програмно потому-что документов около 1000)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.01.2009, 18:42
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Как конвертировать *.mht в *.htm, *.html ? (VB):

Как сохранить *.htm в *.mht из VB?
В процессе выполнения создается HTML с картинками - как программно сохранить его в виде *.MHT ?

Как работать с файлами *.mht с точки зрения VB6??
Как работать с файлами *.mht с точки зрения VB6?? Всем спасибо

Как можно из файла *.htm стереть часть информации?
Подскажите, пожалуйста, как можно из файла *.htm стереть часть информации (все кроме первых трех строк), чтобы при этом файл не удалялся...

Описание формата файлов .MHT
Может ли кто дать ссылки на описание формата файлов .MHT? Ответы типа: 'А что поисковики уже отменили?' не принимаются...

Как конвертировать изображение из RTF в jpg
Всем привет. Есть задача не мог решить. Есть изображение в формате RTF т.е. имеетс в RTF файле нужно получить простую картинку в любом...

Кто нибудь знает как конвертировать UTF-7 в Win и наоборот?
Есть ли у кого прога перекодировки из UTF-7 в Win и наоборот? У меня есть только описание самой кодировки UTF-7, но на английском. ...

4
palva
3094 / 2228 / 447
Регистрация: 08.06.2007
Сообщений: 8,126
Записей в блоге: 4
14.01.2009, 23:19 #2
Если вы обратились в этот форум, то вы должны знать бейсик. Тогда напишите программу, что-нибудь вроде:
Код
Set sh = CreateObject('WScript.Shell')
Set ie = CreateObject('InternetExplorer.Application')
ie.visible=True
Set fso = CreateObject('Scripting.FileSystemObject')
Set outf = fso.CreateTextFile('convert.log')
Set fld = fso.GetFolder('.')
For Each fi In fld.Files
  If UCase(Right(fi, 4)) = '.MHT' Then
    ie.navigate(fi)
    i1=InStrRev(fi, '.')
    i2=InStrRev(fi, ' ', i1)
    nfi = Mid(fi, i2+1, i1 - i2 - 1)
    Do While ie.busy
      WScript.Sleep 100
    Loop
    sh.SendKeys('{F10}{Down 5}{Enter}' & nfi & '{Enter}')
    Do While ie.busy
      WScript.Sleep 100
    Loop
    outf.WriteLine(fi & ' saved as ' & nfi & '.htm')
  End If
Next
Set fld = Nothing
outf.close
Set outf = Nothing
Set fso = Nothing
ie.quit
Set ie = Nothing
Set sh = Nothing
или приспособьте эту программу под ваши нужды. Когда работает эта программа, компьютер трогать нельзя, чтобы окно эксплорера всё время оставалось активным, поскольку посылки нажатий клавиш идут в активное окно.
0
palva
3094 / 2228 / 447
Регистрация: 08.06.2007
Сообщений: 8,126
Записей в блоге: 4
14.01.2009, 23:22 #3
Забыл написать, что программу нужно с расширением .vbs поместить в ту же директорию, где находятся mht-файлы и запустить двойным кликом мыши.
0
Иваныч
18.01.2009, 12:46 #4
Palva - большое спасибо за совет!

После небольших переделок почти все заработало (возникли небольшие проблемы при переносе в диалог имен файлов использующих в своем имени разную кодировку символов)

Тема не закрыта - если есть еще советы как решить проблему конвертации - пожайлуста помогите
Иваныч
18.01.2009, 12:47 #5
Palva - большое спасибо за совет!

После небольших переделок почти все заработало (возникли небольшие проблемы при переносе в диалог имен файлов использующих в своем имени разную кодировку символов)

Тема не закрыта - если есть еще советы как решить проблему конвертации - пожайлуста помогите
18.01.2009, 12:47
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.01.2009, 12:47
Привет! Вот еще темы с решениями:

CGI. Как получить данные из html формы и отослать данные клиенту в html формате?
Господа помогите с cgi. Никогда этого не делал под VB, а сейчас очень надо. Как получить данные из html формы и отослать данные клиенту в...

RTF to HTM(L) кто знает хороший фришный конвертор?
собственно сабж :) нужен конвертер, не создающий, как ворд, специальный директорий и прочей XML лабуды :), а имеено чистый перевод с...

Как запустить html или htm файл на КПК
Столкнулся с тем что запустить html файл на кпк не получается. КПК пишет "Не удаётся открыть файл index.html. Или он не подписан...

Как вставить htm в javascript в обычный htm чтобы сохранить русские буквы?
Подскажите кто-нибудь!!! Как вставить htm c javascript в обычный htm чтобы сохранить русские буквы? Создали htm в Photoshop - картинки...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru