[ Обновленные темы · Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Модератор форума: Andrey_A, simup, ХарВик, chip642  
getSpellCheckList.vbs - Проверка орфографии файлов MS Word
Andrey_AДата: Среда, 05.07.2017, 14:12 | Сообщение № 1
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7191
Награды: 143
Репутация: 125
Аверин Андрей
Проверка орфографии слов в заданных файлах с помощью Microsoft Word
Используется скрипт Functions.vbs - Скрипт с различными Функциями, которые можно использовать в других скриптах

Доступно только для пользователей


 
Andrey_AДата: Пятница, 07.07.2017, 13:10 | Сообщение № 2
Генералиссимус

На сайте с: 26.01.2012
Город: Сочи, Хоста
Сообщений: 7191
Награды: 143
Репутация: 125
Аверин Андрей
В версии 1.2 добавлено:
1. Получение файлов из списка файлов/папок
Пример списка:
Код
%COMMANDER_PATH%\TCIMG.lng
%COMMANDER_PATH%\TCIMG.ini
%COMMANDER_PATH%\Bar\


2. Если необходимо для папки указать определённые типы файлов, то
Код
%COMMANDER_PATH%\TCIMG.lng
%COMMANDER_PATH%\TCIMG.ini
%COMMANDER_PATH%\Bar\|>bar;ini


3. Если необходимо для папки указать игнорируемые типы файлов, то
Код
%COMMANDER_PATH%\TCIMG.lng
%COMMANDER_PATH%\TCIMG.ini
%COMMANDER_PATH%\Bar\|<ion;br2


Кнопки:
Код
-"Проверить орфографию русских слов из списка, извлечь ошибочные слова в другую вкладку" Call("Scripts::Main", 1, "getSpellCheckList.vbs", `1 0 "3|ListSpell.txt"`)
-"Проверить орфографию русских слов из списка, записать ошибочные слова в файл C:\Result.txt" Call("Scripts::Main", 1, "getSpellCheckList.vbs", `1 ">C:\Result.txt" "3|ListSpell.txt"`)
-"Проверить орфографию русских слов из списка, записать ошибочные слова в файл C:\Result.txt и открыть" Call("Scripts::Main", 1, "getSpellCheckList.vbs", `1 "<C:\Result.txt" "3|ListSpell.txt"`)


Если список в виде ini файла, то после файла прописывается секция

Код
-"Проверить орфографию русских слов из списка из секции, извлечь ошибочные слова в другую вкладку" Call("Scripts::Main", 1, "getSpellCheckList.vbs", `1 0 "3|ListSpell.ini|MyFiles"`)
-"Проверить орфографию русских слов из списка из секции, записать ошибочные слова в файл C:\Result.txt" Call("Scripts::Main", 1, "getSpellCheckList.vbs", `1 ">C:\Result.txt" "3|ListSpell.ini|MyFiles"`)
-"Проверить орфографию русских слов из списка из секции, записать ошибочные слова в файл C:\Result.txt и открыть" Call("Scripts::Main", 1, "getSpellCheckList.vbs", `1 "<C:\Result.txt" "3|ListSpell.ini|MyFiles"`)


Список тогда будет вида:

Код
[TCIMG]
%COMMANDER_PATH%\TCIMG.lng
%COMMANDER_PATH%\TCIMG.ini
%COMMANDER_PATH%\INC.tci
%COMMANDER_PATH%\TCIMGHELP\TCIMG.hhc
%COMMANDER_PATH%\TCIMGHELP\TCIMG_ONLINE.hhc
%COMMANDER_PATH%\TCIMGHELP\TCIMG.tch
%COMMANDER_PATH%\TCIMGHELP\TCIMG.txt
%COMMANDER_PATH%\TCIMGHELP\html\html\add\|>htm
%COMMANDER_PATH%\TCIMGHELP\html\html\cmm\|>htm
%COMMANDER_PATH%\TCIMGHELP\html\html\fun\|>htm
%COMMANDER_PATH%\TCIMGHELP\html\html\int\|>htm
%COMMANDER_PATH%\TCIMGHELP\html\html\par\|>htm
%COMMANDER_PATH%\TCIMGHELP\html\html\util\|>htm
%COMMANDER_PATH%\Files\Bar\|>bar
%COMMANDER_PATH%\Files\Scripts\
%COMMANDER_PATH%\Files\Ini\
%COMMANDER_PATH%\Files\Htm\
%COMMANDER_PATH%\Files\Library\
%COMMANDER_PATH%\Files\PlayList\
%COMMANDER_PATH%\Files\Tcg\
[Akel]
...
[MyFiles]
...


_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
В версии 1.3 добавлено подключение своего словаря, бывают слова (сокращения), которые не подходят под стандарт, но их хочется исключить:

Цитата
' Можно подключить свои слова, которые будут считаться правильными
' В папке со скриптом в файле getSpellCheck.dic каждое слово прописывается с новой строки


Пример списка getSpellCheck.dic

Код
яёЁ
фывапр
а-я
А-яЁё
А-Яа
рег
выр
яЁё


.


 
  • Страница 1 из 1
  • 1
Поиск:

Интеллектуальные права и отказ от ответственности