Проверить, что уже открыт браузер и URL-адрес

Question

Есть ли способ проверить уже открытые окна браузера с определенным URL-адресом в VB.NET, чтобы Process.Start не открывал новые окна браузера? Например, если у меня уже открыт Pinterest, я хочу отправить мой новый поиск в уже открытое окно из моего TextBox.

Мой код, который открывает новое окно, каждый раз, когда:

System.Diagnostics.Process.Start("iexplore.exe", "https://www.pinterest.com/search/pins/?q=" & Net.WebUtility.UrlEncode(TextBox1.Text)) 

Answer 1

Этот фрагмент кода должен сделать это для вас.

Он будет просматривать окна проводника Windows для экземпляров Internet Explorer, содержащих ваш поисковый запрос (Squery), и просит пользователя ввести поисковый запрос.

Используемый ссылка находится на (% WINDIR% \ system32 \ shdocvw.dll)

Sub Main() 
     Dim shellWins As SHDocVw.ShellWindows 
     Dim explorer As SHDocVw.InternetExplorer 

     shellWins = New SHDocVw.ShellWindows 
     Dim SQuery As String = "https://www.pinterest.com/search/pins/?q=" 
     For Each explorer In shellWins 
      If explorer.Application.Name = "Internet Explorer" And explorer.LocationURL.Contains(SQuery) Then 
       explorer.Navigate(SQuery & InputBox("Pinterest", "", Nothing, Nothing)) 
      End If 
     Next 

     shellWins = Nothing 
     explorer = Nothing 
    End Sub