Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles Button5.Click
 
        Dim processes As Process() = System.Diagnostics.Process.GetProcesses()
        Dim ProzessName As String
 
 
        For Each myProcess As Process In processes
 
            If myProcess.ProcessName.ToLower = "iexplore" Then
                ProzessName = myProcess.MainWindowTitle
                If ProzessName = "http://www.MeineSeite.de/document.php3 -" & _
                  "Windows Internet Explorer" Then
                    SetForegroundWindow(myProcess.MainWindowHandle.ToInt32)
                    SendKeys.SendWait("%d")
                    SendKeys.SendWait("u")
                    SendKeys.SendWait("%n")
                    SendKeys.SendWait("C:\Test\TestSeite.html")
                    SendKeys.SendWait("{Enter}")
                    SendKeys.SendWait("%{F4}")
                End If
            End If
        Next
    End Sub