Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As _
     System.EventArgs) Handles Button2.Click
        Dim wrq As WebRequest = WebRequest.Create( _
        "https://myURL?origin=home.jsp&event=link(bookmark)&bookmark_id=992999")
        wrq.Credentials = New NetworkCredential("USER", "Passwort")
        Dim wrp As WebResponse = wrq.GetResponse()
        Dim sr As New StreamReader(wrp.GetResponseStream())
        Debug.WriteLine(sr.ReadToEnd())
        sr.Close()
        wrp.Close()
 
    End Sub

= [ Accu ] =