Открыть заданную ссылку браузером по умолчанию

@Freon97 · Регистрация: 14.05.2014

Author24 — интернет-сервис помощи студентам

Здравствуйте посетители форума и программисты, мне нужна маленькая программа
Суть программы заключается в том что, нажимаешь на кнопку и открывается страница в браузере, который стоит по умолчанию, например http//yandex.ru/
Я знаю что это можно реализовать с помощью ShellExecute, но я не понимаю как пользоваться
Пожалуйста напишите полный код программы для Visual Basic
Буду очень благодарен

P.S не надо отправлять меня гуглить, я искал и не нашел

@Pro_grammer · 14.05.2014, 21:54

Visual Basic

Private 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
Const SW_SHOWNORMAL = 1
 
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "http:\\yandex.ru", vbNullString, "C:\", SW_SHOWNORMAL
End Sub

~~dev.Free~~ · 15.05.2014, 12:33

Freon97, Плохо искал!

@Freon97 · 15.05.2014, 17:19 **[ТС]**

Visual Basic

Private 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
Const SW_SHOWNORMAL = 1
 
Private Sub Command1_Click()
ShellExecute Me.hwnd, "open", "http:\\yandex.ru", vbNullString, "C:\", SW_SHOWNORMAL
End Sub

код не работает

@Freon97 · 15.05.2014, 18:03 **[ТС]**

Ошибка в коде найдена и исправлена, спасибо что привели пример кода

VB.NET

Public Class Forma1
 
    Private 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
    Const SW_SHOWNORMAL = 1
    Dim hwnd As Long
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
 
        ShellExecute(Me.hwnd, "open", "http:\\yandex.ru\", vbNullString, "C:\", SW_SHOWNORMAL)
    End Sub
End Class

@Kogb · 15.05.2014, 18:36

Ты не туда забрел. Здесь VB6, а не VB.Net.
Код будет намного проще для него:

VB.NET

1	System.Diagnostics.Process.Start("http://yandex.ru")

@Freon97 0 / 0 / 0 Регистрация: 14.05.2014 Сообщений: 3
		1
	Открыть заданную ссылку браузером по умолчанию 14.05.2014, 20:31. Показов 3299. Ответов 5 Метки нет (Все метки) Здравствуйте посетители форума и программисты, мне нужна маленькая программа Суть программы заключается в том что, нажимаешь на кнопку и открывается страница в браузере, который стоит по умолчанию, например http//yandex.ru/ Я знаю что это можно реализовать с помощью ShellExecute, но я не понимаю как пользоваться Пожалуйста напишите полный код программы для Visual Basic Буду очень благодарен P.S не надо отправлять меня гуглить, я искал и не нашел 0

~~dev.Free~~ Заблокирован
	15.05.2014, 12:33	3
	Freon97, Плохо искал! 0

	15.05.2014, 18:36

Опции темы

Открыть заданную ссылку браузером по умолчанию

Решение