|
Открыть страницу сайта
|
|||
---|---|---|---|
#18+
С наступающим, уважаемые! В форме нужно сделать так, чтобы по нажатию кнопки выбранным браузером открывалась страница сайта, что-то по типу "Открыть с помощью.." В модуль добавил: Public Declare Function ShellExecute Lib "Shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _ ByVal lpParameters As String, _ ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long -------------------------------- В форму на нажатие кнопки: Dim RetVal As Long RetVal = ShellExecute(0, "open", " https://mySite", "", "", 1) ------------------------------- А как сделать, чтобы в поле со списком можно было выбрать один из браузеров и он открыл страницу, а если такого браузера нет,то появилось бы соответствующее сообщение? ... |
|||
:
Нравится:
Не нравится:
|
|||
29.12.2017, 08:29 |
|
Открыть страницу сайта
|
|||
---|---|---|---|
#18+
Список установленных браузеров можно взять, например, из HKLM\SOFTWARE\Clients\StartMenuInternet (правда, там не найдёшь Edge...). В shell - получить строку запуска. Добавить полное имя файла/ссылки, и выполнить. А open без вопросов откроет ссыль в браузере по умолчанию. Там не выберешь... ... |
|||
:
Нравится:
Не нравится:
|
|||
29.12.2017, 08:44 |
|
Открыть страницу сайта
|
|||
---|---|---|---|
#18+
Если анализировать слишком сложно, то как открыть, например, принудительно эту страницу експлорером, если по умолчанию установлен другой браузер? ... |
|||
:
Нравится:
Не нравится:
|
|||
29.12.2017, 09:12 |
|
Открыть страницу сайта
|
|||
---|---|---|---|
#18+
владимирАлекскак открыть, например, принудительно эту страницу експлорером Код: vbnet 1.
Само собой, iexplore должен находиться через %PATH%, иначе необходимо указать полный путь к нему (можно взять из HKLM\SOFTWARE\Microsoft\Internet Explorer\Main\x86AppPath), не забыв обрамить кавычками. ... |
|||
:
Нравится:
Не нравится:
|
|||
29.12.2017, 09:49 |
|
Открыть страницу сайта
|
|||
---|---|---|---|
#18+
AkinaСамо собой, iexplore должен находиться через %PATH% Это как? ... |
|||
:
Нравится:
Не нравится:
|
|||
29.12.2017, 09:55 |
|
|
start [/forum/topic.php?fid=45&msg=39577718&tid=1611835]: |
0ms |
get settings: |
10ms |
get forum list: |
18ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
51ms |
get topic data: |
13ms |
get forum data: |
3ms |
get page messages: |
51ms |
get tp. blocked users: |
1ms |
others: | 279ms |
total: | 434ms |
0 / 0 |