Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Программно узнать все открытые вкладки в браузере / 13 сообщений из 13, страница 1 из 1
22.05.2015, 19:48
    #38966804
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
здравствуйте, кто знает как? спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.05.2015, 20:24
    #38966817
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
только в ie
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.05.2015, 20:30
    #38966820
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
Antonariy, уже хоть что-то, подскажите как обсчитать Ишачка
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.05.2015, 20:46
    #38966827
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
4951060
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.05.2015, 20:47
    #38966829
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
только вместо shdocvw.dll теперь ieframe.dll
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.05.2015, 10:06
    #38966951
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
Antonariy,
щас перенесу оттуда и вспомню как это делается
Подключаешь 2 библиотеки mshtml.tlb и ieframe.dll и пишешь код

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Option Explicit

Dim ShellWindows As New ShellWindows
Dim WithEvents WebBrowser As WebBrowser
Dim WithEvents Document As HTMLDocument
Private Sub Form_Load()

Dim ShellWindow As Object

    For Each ShellWindow In ShellWindows
        If TypeOf ShellWindow.Document Is HTMLDocument Then
            Set Document = ShellWindow.Document
            MsgBox Document.url
        End If
    Next
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.05.2015, 17:17
    #38967066
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
часть нашёл

Для подключения браузера необходимо открыть меню Project / Components и выбрать компонент 'Microsoft Internet Controls' соответствующий файлу shdocvw.dll. В VBA проектах он называется 'Oбoзpeвaтeль вeб-cтpaниц (Microsoft)'.

Если вы намерены использовать в программе возможности динамического html - необходимо подключить библиотеку MSHTML. Меню Project / References и выбрать компонент 'Microsoft HTML Object Library' соответствующий файлу MSHTML.TLB.

Оба файла входят в состав всех версий Windows и существенных проблем с переносимостью кода быть не должно.

ieframe.dll качнул в систем32

В ВБА это будет работать? пока выделяет ShellWindows As New ShellWindows
ересь...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2015, 15:29
    #38967270
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
делов то
'нужны ссылки на Microsoft Internet Controls
щас для проверки проблема из разряда КАРАУ
я не знаю, как в ишачке открыть несколько вкладок......
приехали....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2015, 15:56
    #38967277
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
я к тому, что то что пишут
Чтобы открыть новую вкладку, также можно нажать клавиши CTRL+T.
в топку
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2015, 16:20
    #38967282
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
ещё один совет в топку
Чтобы ссылка открывалась в новой вкладке, необходимо сделать следующее:

В Internet Explorer в строке меню жмем “Сервис” – “Свойства обозревателя” – “Общие”. Здесь внизу напротив слова “Вкладки” жмем кнопку “Параметры”.

нету слова “Вкладки”............
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.05.2015, 16:33
    #38967285
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
и ещё одна шляпа

Чтобы открыть новую вкладку в Internet Explorer – щёлкните правой клавише по вкладке с активным окном браузера. А если вкладок на «Панели вкладок» несколько, то по любой другой вкладке. Откроется такое контекстное меню - нету его
И щёлкните по строке «Создать вкладку».
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.05.2015, 17:14
    #38968069
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
здравствуйте, чуть сдвинулось
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Option Explicit

Dim ShellWindows As New ShellWindows
Dim WithEvents WebBrowser As WebBrowser
Dim WithEvents Document As HTMLDocument
Private Sub Form_Load()

    Dim ShellWindow As Object

    For Each ShellWindow In ShellWindows
        If TypeOf ShellWindow.Document Is HTMLDocument Then
            Set Document = ShellWindow.Document
            'MsgBox Document.URL
            Debug.Print Document.URL
            If Document.URL = "http://web.airdroid.com/" Then
'подскажите как открыть вкладку Позвонить????
            End If
        End If
    Next
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
25.05.2015, 17:20
    #38968075
катастрофа
катастрофа
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Программно узнать все открытые вкладки в браузере
сорри запостил Выше не в ту тему, а эта исчерпана, не знаю, что за хреновый Ишачок у меня дома стоит, на работе пришёл все нормально вкладки открываются в нём, спасибо Антонарий!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Программно узнать все открытые вкладки в браузере / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 139ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2155930]:
 0ms
get settings:
 9ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 43ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 44ms
get tp. blocked users:
 2ms
others: 11ms
total:  139ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]