Отправляет email-рассылки с помощью сервиса Sendsay

[TC] Загрузка ссылки, из буфера обмена

Здравствуйте Дискуссионный Лист!

Дата письма: 9 мая 2013 г. четверг. (11:54)

Интересует скрипт для программы Jaws:
Чтоб можно было загрузить ссылку из буфера обмена.
Например:
Как умеет делать это, SkypeTalking.
Спасибо!

Ответить   Thu, 9 May 2013 12:03:30 +0300 (#2741117)

 

Ответы:

Здравствуйте, Кар-Ал.

Не знаю, как работает SkypeTalking, но в самом примитивном виде ваша задача
для JAWS реализуется следующим образом:
Script RunURL ()
Run (GetClipboardText ())
EndScript
По-хорошему перед вызовом надо делать проверку того, является ли строка из
буфера реально ссылкой. Реализовывать это надо через условные операторы и
совокупность функций, начинающихся со String, которые и специализируются на
обработки строк.
А вот придумать действенный алгоритм проверки - это хорошее занятие для ума.
:-)
Успехов. Никита.

Ответить   Thu, 9 May 2013 14:44:41 +0400 (#2741153)

 

Приветствую Вас, Nikita, адрес: nikita-mailin***@r*****.ru

Цитата из вашего письма от 9 мая 2013 г. четверг. (13:44):

Ответ:
Знаний в этой облости не хватает.
Но хочу сообщить:
Скрипт работает, понравилось.
Спасибо!
Всего Вам доброго и наилучшего.

Ответить   Thu, 9 May 2013 14:27:33 +0300 (#2741175)

 

Здравствуйте, Кар-Ал.

Ну знания - это дело наживное. Здесь больше вопрос технической фантазии,
чтобы сформулировать идею алгоритма проверки.
Например, если исходить из предположения, что ссылка - это любая строка
текста, начинающаяся на "http", то это будет так:
Script RunURL ()
var
string TextFromClipboard
let TextFromClipboard = GetClipboardText ()
If StringLeft (TextFromClipboard, 4) == "http" Then
Run (TextFromClipboard)
Else
Beep ()
EndIf
EndScript
В принципе в строке ссылки ещё должны присутствовать знаки двойного слеша,
двоеточия, минимум одной точки. Соответственно функцией StringContains можно
проверить вхождение этих подстрок в основную строку.
Правда это всё в большей степени тренировка ума, так как если скрипт будет
отрабатывать и на строке, не являющейся ссылкой, то в принципе ничего
страшного происходить не будет.
Успехов. Никита.

Ответить   Thu, 9 May 2013 16:23:47 +0400 (#2741192)

 

Приветствую Вас, Nikita, адрес: nikita-mailin***@r*****.ru

Цитата из вашего письма от 9 мая 2013 г. четверг. (15:23):

Ответ:
Полностью с Вами согласен, но пока ничего не получаится.
Если в буфере вот такая ссылка:
http://teramult.org.ua/mult/1969_su_cheburashka/
Скрипт отрабатывает без проблем.
А если вот такая строчка в буфере:
Чебурашка http://teramult.org.ua/mult/1969_su_cheburashka/
Скрипт не хочет отрабатывать такую строчку.
Просьба:
Помогите добить скрипт, чтоб отрабатывались такие строчки.
Спасибо!
Всего Вам доброго и наилучшего.

Ответить   Thu, 9 May 2013 23:13:40 +0300 (#2741337)

 

Здравствуйте, Кар-Ал.

Скрипт проверяет, есть ли в строке символы "http". Если есть, то он
разбивает эту строку на куски, разделённые пробелами, а затем принимает за
ссылку первый из тех кусков, в котором есть "http".
Script RunURL ()
var
int IndexOfSegment,
string TextFromClipboard
let TextFromClipboard = GetClipboardText ()
If StringContains (TextFromClipboard, "http") Then
let IndexOfSegment = StringSegmentIndex (TextFromClipboard, " ", "http", 0)
Run (StringSegment (TextFromClipboard, " ", IndexOfSegment))
Else
Beep ()
EndIf
EndScript
Успехов. Никита.

Ответить   Fri, 10 May 2013 19:48:29 +0400 (#2741621)

 

Приветствую Вас, Nikita, адрес: nikita-mailin***@r*****.ru

Цитата из вашего письма от 10 мая 2013 г. пятница. (18:48):

Ответ:
Потестировал, всё работает, вопросов нету.
Получился очень удобный скрипт, всё отлично!
Большое Вам Спасибо!
Всего Вам доброго и наилучшего.

Ответить   Fri, 10 May 2013 21:18:23 +0300 (#2741666)

 

Здравствуйте, Кар-Ал <toha198***@r*****.ru>.

-----------------------*- Original Message -*К> N> Скрипт проверяет, есть ли в строке символы "http". Если есть, то он
...

...

[+] -- Избыточное цитирование. Премодерация.

Ответить   Sat, 11 May 2013 09:41:34 +0400 (#2741787)

 

Приветствую Вас, Nikita, адрес: nikita-mailin***@r*****.ru

Цитата из вашего письма от 9 мая 2013 г. четверг. (15:23):

Ответ:
Вот нафантазировал, добавил эти строчки:
CopyToClipboard (GetLine ())
SayLine ()
Всё работает, ещё раз Вам Спасибо!
Всего доброго и наилучшего.

Ответить   Fri, 10 May 2013 22:17:47 +0300 (#2741679)

 

Привет рассылка!
Стоял 13 джос и в настройках голоса был вариант выбора диктора при
непрерывном чтении, поставил 14 и что то не могу этот пункт найти уже
так давненько.
Может в центре настроек что то надо изменить чтобы этот пункт
отобразился?
Спасибо!
*
- Слыш, Вано - пачиму Грэцию так назвали? - Патаму что я туда грэться езжу...
С приветом из Ижевска ;) !
С уважением Дима!
Dmitriyd***@m*****.ru
skype: dmitriydru1

Ответить   Mon, 13 May 2013 20:27:54 +0400 (#2743003)