Серый форум — AHK: Получить текст из тегов «title» выбранного CHM-файла

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (DD) — Fri, 01 Nov 2013 20:33:24 +0000

Если кодировка файла из URL — w1251, как можно перекодировать кириллический вывод в стандартный вид?


URL := "C:\WINDOWS\Help\Tours\htmlTour\connected_multiple.htm" ; ссылка для XP

req := ComObjCreate("Msxml2.XMLHTTP.6.0")
req.open("GET", URL, 0)
req.send
ResponseText := req.responseText
req := ""

MsgBox, % RegExReplace(ResponseText, "s).*?(.*)?.*", "$1")

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (DD) — Sat, 11 May 2013 11:29:59 +0000

Пожелание по шестому посту наклюнулось: возможно ли обращаться к индексному HTML-файлу (основному), без явного указания его названия, как-то так:


URL := "mk:@MSITStore:" FilePath "::/*.*"

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (DD) — Fri, 23 Nov 2012 09:13:53 +0000

Добре. Ей-Богу, добре!

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (teadrinker) — Wed, 21 Nov 2012 23:05:52 +0000

На AHK:

URL := "mk:@MSITStore:" SubStr(A_AhkPath, 1, -3) "chm::/docs/AutoHotkey.htm"

req := ComObjCreate("Msxml2.XMLHTTP.6.0")
req.open("GET", URL, 0)
req.send
ResponseText := req.responseText
req := ""

MsgBox, % RegExReplace(ResponseText, "s).*?(.*)?.*", "$1")

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (DD) — Wed, 21 Nov 2012 17:21:09 +0000

Однако ж, кроме АвтоХоткея еще много чего имеется!
Спасибо, добре!

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (wisgest) — Mon, 19 Nov 2012 19:54:14 +0000

DD пишет:

Спасибо. А я было думал это через COM можно делать.

Если AHK позволяет работать с COM, то вероятно, можно. Но я могу лишь привести примеры на VBS/JS.

1 способ) Создать объект InternetExplorer.Application, загрузить в него страницу из CHM и прочесть свойство Document.title. Недостатком этого сплсоба является, что будет производится полный разбор кода требуемой страницы для его отображения в невидимом окне IE, в частности будут исполняться или запрашиваться на исполнение все скрипты и элементы ActiveX со страницы.

2 способ) Использовать объект XmlHttpRequest:

url="mk:@MSITStore:D:\script56.chm::/html/vtoriMicrosoftWindowsScriptTechnologies.htm"
Set req = CreateObject("Microsoft.XMLHTTP")
req.open "GET", url, False
req.send
WScript.Echo req.responseText

При этом, весьма вероятно, req.responseText будет в неправильной кодировке и понадобится его перекодировать, для чего, может быть, лучше использовать вместо него req.responseBody…

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (DD) — Tue, 13 Nov 2012 14:33:20 +0000

Спасибо. А я было думал это через COM можно делать.

Re: AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (Александр_) — Tue, 13 Nov 2012 14:09:44 +0000

Вот хорошее описание формата. За 10 минут парсер не напишешь, поэтому готового решения ждать не советую.

AHK: Получить текст из тегов «title» выбранного CHM-файла

null@example.com (DD) — Tue, 13 Nov 2012 13:49:27 +0000

Есть ли возможность извлечь такой текст без преобразования CHM-файла в HTML?