Форум программистов, компьютерный форум, киберфорум
Наши страницы

Visual Basic

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 15, средняя оценка - 4.80
Иваныч
#1

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

13.01.2009, 18:42. Просмотров 2075. Ответов 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? - Visual Basic
В процессе выполнения создается HTML с картинками - как программно сохранить его в виде *.MHT ?

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

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

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

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

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

4
palva
2648 / 1875 / 274
Регистрация: 08.06.2007
Сообщений: 7,193
Записей в блоге: 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
2648 / 1875 / 274
Регистрация: 08.06.2007
Сообщений: 7,193
Записей в блоге: 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 формате? - Visual Basic
Господа помогите с cgi. Никогда этого не делал под VB, а сейчас очень надо. Как получить данные из html формы и отослать данные клиенту в...

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

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

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


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

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

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