Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
29 мар 2024, 08:23

Гиперссылка на сайт в справочнике "сайты"

Автор Sanz, 27 авг 2014, 13:28

0 Пользователей и 1 гость просматривают эту тему.

Sanz

Добрый день! Помогите советом, пожалуйста:
1С УТ 8
есть справочник "сайты", в котором создан реквизит "адрес страницы" - как сделать чтобы при нажатии на него открывалась данная страница, к примеру "www.ya.ru". Для каждого сайта создается много страниц - прописывать их через конфигуратор - не вариант.

freez1301

ЗапуститьПриложение("C:\Program Files (x86)\Internet Explorer\iexplore.exe " + РеквизитСАдресом);

Sanz

Большое спасибо!
И снова вопрос: а можно ли сделать чтоб ссылка открывалась из формы списка (чтоб не открывать форму элемента)?

cska-fanat-kz

freez1301, а если я такую личную неприязнь испытываю к Эксплореру аж кушать не могу? ;)

Кстати, попробуйте просто адрес сайта загнать как параметр процедуры ЗапуститьПриложение()
Должен по идее открыться браузер по умолчанию...
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Sanz

Цитата: cska-fanat-kz от 03 окт 2014, 12:52
freez1301, а если я такую личную неприязнь испытываю к Эксплореру аж кушать не могу? ;)

Кстати, попробуйте просто адрес сайта загнать как параметр процедуры ЗапуститьПриложение()
Должен по идее открыться браузер по умолчанию...
О! Классно, попробую. А как открыть со списка, не заходя на форму подскажете?

TreeDogNight

Цитата: Sanz от 03 окт 2014, 13:55О! Классно, попробую. А как открыть со списка, не заходя на форму подскажете?

Используйте событие списка Выбор. Через Элементы.ТекущиеДанные получите вашу ссылку, и уже используя вышеприведённые методы открывайте её.
Cегодня не все могут провести завтрашним числом. Вернее, не только лишь все - мало кто может это сделать.

Sanz

К своему стыду признаю что туплю на ровном месте :( Надо чтобы только при щелчке на ячейку в колонке "АдресСтраницы" открывалась ссылка. На данный момент страница открывается при активизации всей строки, а не ячейки:

&НаКлиенте
Процедура СписокПриАктивизацииЯчейки(Элемент)
   ТекущиеДанные = Элементы.Список.ТекущиеДанные.АдресСтраницы;
СтандартнаяОбработка = ложь;
   ЗапуститьПриложение(ТекущиеДанные);
КонецПроцедуры




cska-fanat-kz

Событие нужно использовать - Выбор()!
Правда будет обрабатываться двойной клик не только по колонке с адресом, но и по всем остальным.
Получил помощь - скажи СПАСИБО.
Разобрался сам - расскажи другим.

Sanz

Цитата: cska-fanat-kz от 03 окт 2014, 15:52
Событие нужно использовать - Выбор()!
Правда будет обрабатываться двойной клик не только по колонке с адресом, но и по всем остальным.

Т.е. каждый раз при открытии элемента будет открываться сайт? :xfbnsdfb:
Добавлено: 03 окт 2014, 16:21


Просто через ПриАктивизацииЯчейки почему хотелось сделать - т.к. в нем процедура срабатывает при активизации строки. Если б еще срабатывало именно при нажатии на ячейку - было бы самое оно ((
Добавлено: 03 окт 2014, 18:18


ПОЛУЧИЛОСЬ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Пришлось, правда перейти на обычную форму, не управляемую, но заработало! Теперь если клацнуть на ячейку списка с адресом сайта он откроется в браузере, на любую другую если нажать ничего не произойдет, при двойном щелчке по строке откроется форма элемента :zebzdr:
В таблице создаем событие "при активизации ячейки":

Процедура ДокументСписокПриАктивизацииЯчейки(Элемент)
        Если ЭлементыФормы.ДокументСписок.ТекущаяКолонка.Имя = "АдресСтраницы" Тогда
       ТекущиеДанные = ЭлементыФормы.ДокументСписок.ТекущиеДанные.АдресСтраницы;
СтандартнаяОбработка = ложь;
    ЗапуститьПриложение(ТекущиеДанные);
      КонецЕсли;
      
КонецПроцедуры


Добавлено: 03 окт 2014, 19:13


Дорисовала для управляемых форм:

&НаКлиенте
Процедура СписокПриАктивизацииЯчейки(Элемент)
   Если Элементы.Список.ТекущийЭлемент.Имя = "АдресСтраницы" Тогда
ТекущиеДанные = Элементы.Список.ТекущиеДанные.АдресСтраницы;
СтандартнаяОбработка = ложь;
    ЗапуститьПриложение(ТекущиеДанные);
      КонецЕсли;
КонецПроцедуры

Evgeny21

Доброго дня!
Прошло 7 лет, а тема всё так же актуальна.
Объясните, пжлста, чуть подробней для новоиспеченных начинающих программистов.

Нужно сделать справочник с активными гипер-ссылками в таблице.

Я создал справочник Ссылки, создал в нем так же форму. В модуль справочника (и в модуль формы) добавил код:

&НаКлиенте
Процедура СписокПриАктивизацииЯчейки(Элемент)
   Если Элементы.Список.ТекущийЭлемент.Имя = "АдресСтраницы" Тогда
ТекущиеДанные = Элементы.Список.ТекущиеДанные.АдресСтраницы;
СтандартнаяОбработка = ложь;
    ЗапуститьПриложение(ТекущиеДанные);
      КонецЕсли;
КонецПроцедуры

Но при этом, когда в качестве пользователя нажимаю на элемент таблицы где записана ссылка - ничего не происходит.
Что надо поправить? Как правильно сделать?

Похожие темы (5)

Рейтинг@Mail.ru

Поиск