[TC] Re[2]: Запрос на создания скрипта для JAWS
Приветствую всех! Здравствуйте, Виктор Горелов .
Вот есть ещё один, универсальный, прописав горячие клавиши в файле
default.jkm, можно открыть ссылку в любом браузере.
Script OpenBrowserFromClipboard (string app)
; Запускает браузер с ссылкой из буфера обмена
; адрес браузера находится в файле Default.jkm, в строке с горячкой
; в папке пользовательских настроек jaws, тамже смотрим назначенную горячку
var
string MyCopyFromClipboard,
string browser
PlaySound (FindJAWSSoundFile ("Pop.wav"))
let MyCopyFromClipboard = GetClipboardText ()
let MyCopyFromClipboard = StringTrimLeadingBlanks (MyCopyFromClipboard) ;
убираем спереди пробелы если они есть
let MyCopyFromClipboard = StringTrimTrailingBlanks (MyCopyFromClipboard) ;
убираем все конечные пробелы
; блок проверки оформления URL. Если вы не хотите что бы проверка делалась,
то удалите этот блок из скрипта
If (StringSegment (MyCopyFromClipboard, "/", 1) != "http:") &&
(StringSegment (MyCopyFromClipboard, "/", 1) != "https:") && (StringSegment
(MyCopyFromClipboard, ".", 1) != "www") && (StringSegment
(MyCopyFromClipboard, "/", 1) != "ftp:") Then
PlaySound (GetSharedSettingsDirectory ()+"\\SOUNDS\\Blatt1.wav")
SayString ("буфер не содержит ссылку")
Return
EndIf
; конец блока проверки оформления URL.
SayString ("открывается ссылка")
SayString (MyCopyFromClipboard)
let browser = app
If FileExists (browser) != TRUE then
PlaySound (GetSharedSettingsDirectory ()+"\\SOUNDS\\Blatt1.wav")
SayString ("Выполняемый файл exe отсутствует")
return
EndIf
let browser = "\"" + browser + "\"" + " " + MyCopyFromClipboard
run (browser)
EndScript
Вот строки, которые прописаны у меня, в файле default.jkm, для
открытия ссылок в любом установленом в системе браузере:
Control+Shift+1=OpenBrowserFromClipboard("C:\Program Files\Mozilla
Firefox\Firefox.exe")
Control+Shift+2=OpenBrowserFromClipboard("C:\Program Files\Internet
Explorer\iexplore.exe")
Control+Shift+3=OpenBrowserFromClipboard("C:\Program
Files\Google\Chrome\Application\chrome.exe")
Control+Shift+4=OpenBrowserFromClipboard("C:\Program
Files\SeaMonkey\seamonkey.exe")
P. S. есть ещё аналогичный скрипт, на открытие в браузере просто
выделенной
ссылки.
среда 1 марта 2017 год!, 22:50 Вами было написано:
ВГ> что то типа такого:
Желаю удачи!
-Случайный афоризм-
Если вы хотите жениться на умной, красивой и богатой - вам придётся жениться
три раза.
