Графика |
Привет, Гость! Войдите или зарегистрируйтесь.
Вы здесь » Графика » Остальные программы » Скрипты и регеспы
Похоже, что дело в "апострофе" - грязь при печати:
- так эта... вроде как раз тот случай, что нынешний скрипт и не словит!
Похоже на случай от 8-го 8-го - ваше же сообщение, о "неловленном" месте.
Т.е. "грязь" не причём! - просто не за что "цепляться!"
Так что не расстраивайтесь!
Надеюсь новый скрипт словит!
Надеюсь новый скрипт словит!
Ждём-с. 
Добрый вечер!
Значится, так! В первой, так скать, редакции - скрипт заработал. Кстати, при сохранении в тхт-файле, галочку с
"Сохранять колонтитулы" - нужно УБРАТЬ! Это была ошибка. И тут же обнаружилось, что сохраняя результаты в варианте "Форматированный текст" - можно добиться ГОРАЗДО лучших результатов работы - сейчас достаточно много "ложных срабатываний". Посему, под этот вариант сохранения файла - скрипт надо переработать.
И как это я "проморгал"?! 
Стало быть - нуна ждать! - "Шо?! Опять?!" (с)
- Дя...
Отдаю отчет, что "обещаниями" притомил. Поэтому, на ваше усмотрение, по желанию могу выложить текущий вариант скрипта. Полностью рабочий. Посмотреть что да как. Пользоваться не рекомендуется, т.к. ожидаю от
более нового варианта улучшения качества обнаружения, возможно, немалого. По-видимому, внесение изменений займёт еще неделю...
Я внятен?! 
Отдаю отчет, что "обещаниями" притомил.
Вообще нет. Понимаю, что процесс это не простой, так что никаких претензий. 
Сама пару дней отсутствовала. 
Так что не спешите, делайте хорошо. 
Как будет готово, с удовольствием воспользуюсь и с другими поделюсь. 
Моё почтение!
Смастерил. Здеся: http://rusfolder.com/32370189
Просьба сперва ознакомится с read.me в архиве. На всякий пожарный!
Надеюяь, я там внятен.
Возможно стоит "стандартный" разрыв абзаца страницей не протоколировать? Только "хитрые" места?
Тренировка на "кошках" (с), в т.ч. Карин Альвтеген "Утрата" - показала высокую эффективность.
Возможно, хоть что-то, да понравиться.
Удачи и спасибо за терпеливое ожидание!
Отредактировано Alex2L (2012-08-29 21:00:28)
О, спасибо. 
Вопросов будет куча, уже чувствую. В read.me понятно далеко не всё.
Но сначала попробую на актуальной книге, чтобы вопросы были предметными.
Кстати, текстовый файл сохранился как неизвестного формата (за счёт точки перед me), пришлось переименовывать. Это на тот случай, если Вы дальше будете давать ссылку кому-нибудь. 
Всё, застряла уже с самого начала.
Что это значит?
Visual Basic скрипт (текстовый). Просто запускается в системе по "открыть".
Вот есть у меня файл, сохранённый со всеми указанными параметрами. Как мне его "отдать" скрипту?
Кстати, колонтитулы в fb2 практически никогда не надо сохранять.
Отредактировано golma1 (2012-08-29 22:36:28)
Ну как запускать vbs-скрипт? - сохранить где-нить в папку - да и в проводнике дважды тюкнуть мышкой - винда спросит - "Так шо, запускать?!" - надо сказать - "Таки, да!".
Т.е. вижуалбейсиковые скрипты - "родные" для винды и она их просто запускает. Ну или в каком-нить ФАЙЛОВОМ менеджере (Far или Total Commander) - просто стоя на нём "хряснуть" Enter.
Отредактировано Alex2L (2012-08-29 23:15:51)
Когда скрипт запуститься - появиться стандартное окно выбора файла.
Насчет read.me - мона открыть с помощью Notepad-а или чего-нить аналогичного. Т.е. буквально - открыть с помощью ... чего-то там.
Это стандартное имя для таких "дел" - буквальном смысле "читай.меня".
А ссылку пока никому раздавать не планирую - чувствую, что прийдётся править. Уже обнаружил незначительную ошибочку - если в первой строке (забираемой по нажатию >>> в буфер обмена) присутстуют кавычки, то HTA-файл ругается на сценарий. Можно просто игнорировать.
Поправимо с нюансами.
Ну как запускать - сохранить где-нить в папку - да и в проводнике дважды тюкнуть мышкой - винда спросить - "Так шо, запускать?!" - надо сказать - "Таки, да!".
И тогда наступает
внешне никаких сообщений стандартно не выдаёт.
да?
Потому что я пробовала - ничего не происходит.
А откуда он знает, какой файл я ему предлагаю на проверку?
Когда скрипт запуститься - появиться стандартное окно выбора файла.
Аааа... во-о-о-от... а у меня ничего подобного не происходит. 
Насчет read.me - мона открыть с помощью Notepad-а или чего-нить аналогичного. Т.е. буквально - открыть с помощью ... чего-то там.
Это стандартное имя для таких "дел" - буквальном смысле "читай.меня".
Это я всё в курсе. Только точка после "читай" превращает "меня" в тип файла. 
Как открывать я тоже в курсе. Вот же ж открыла, читаю.
Т.е. у вас при запуске скрипта окно выбора файлов не появляется?! 
Странно! Специально в т.ч. тестировал на 64-х битной 7-ой Винде.
Посмотрела в TaskManager'e - там все скрипты, которые я запустила, есть (аж 6 раз). 
Но окна, в котором можно было бы выбрать файл, нет. 
А что происходит?! Как вы видите, что скрипт запустился на исполнение?!
В какую директорию какого диска вы его сохранили?!
Можете дописать, скажем 18-ой строчкой: MsgBox "Поехали !!!"
т.е.:
' Создаём объект ассоциативный массив
Set objDictionary = CreateObject("Scripting.Dictionary")
MsgBox "Поехали !!!"
Set OPTSHOLDLib = New clsOPTSHOLDLib
Set HtmlDlgHelper = OPTSHOLDLib.HtmlDlgHelper
...
Вот, что появляется, когда я принудительно закрываю скрипт:
В принципе винда должна спросить - ЧТО ДЕЛАТЬ С ФАЙЛОМ - ОТКРЫТЬ?!
Из TaskManager'а - они "поднимаются" ?!
Как вы видите, что скрипт запустился на исполнение?!
В TaskManager:
Но раньше было "выполняется". Это может быть из-за принудительного закрытия. Надо перезагрузить комп.
В какую директорию какого диска вы его сохранили?!
Это имеет значение?
У меня на десктопе есть папка специальная для таких случаев. Там сохранила.
О, запустился.
Но окна для выбора нет.
Если щёлкнуть ПКМ по приложению, можно выбрать "перейти к..." или "вынести на передний план".
Ни то, ни другое результатов не даёт.
Закрыла и открыла снова.
Теперь в таск-менеджере "Нет ответа", но внизу в ... не знаю, как по-русски называется, есть окно, которое не даёт себя открыть. При наведении курсора вот что:
А... М-да - ошибка диалогового окна.
Печалька...
КАК временное решение:
' cFile = HtmlDlgHelper.openfiledlg() <--- "заремить" т.е. закавычкать 21-я строка скрипта
' cFile = Left(cFile, InStr(1, cFile, Chr(0))) <--- тоже самое, 22-я
cFile = "D:\XML\TXT\210812\Утрата.txt " <--- добавить путь к вашему файлу
If InStr(1, cFile, ".txt") = 0 Then <--- это типа "якорная" строка. Не трогать!
При попытке закрыть зависший процесс появляется сообщение:
Процесс Microsoft (R)-HTML-Anwendungshost не реагирует (Anwendung - это приложение)
После нового запуска процесса в таск-менеджере приложение показано как работающее, окно внизу экрана (см. пред. постинг) исчезло.
Отака фигня, малятки.
Завтра продолжим?
КАК временное решение:
Ок, сейчас попробую.
Продолжим.
Попробуйте то, что написал в предыдущем письме.
С этим Диалоговым окном - и так проблема была - нет стандартных средств - вот кое-что откопал и ...
Подумаю, что можно сделать...
Отредактировано Alex2L (2012-08-29 23:42:30)
Пишет Error reading file!!!
Я проверила, правильно ли написала путь к файлу, перенесла его в другую папку (с более коротким путем) - то же самое.
Алекс, Вы меня извините, мне надо заканчивать.
Если что-то придумается, напишите, я завтра с утра попробую.
Спасибо Вам за Ваши труды.
Это 26-я строка: WScript.Echo "Error reading File !!!"
Ок. Заремьте / убейте этот блок:
If InStr(1, cFile, ".txt") = 0 Then
WScript.Echo "Error reading File !!!"
WScript.Quit
End If
Ok!
Вы здесь » Графика » Остальные программы » Скрипты и регеспы