Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 

        Dim data() As Byte 
        Dim pass As String 
        Dim byt As Byte() = System.Text.Encoding.UTF8.GetBytes("YourModemLoginPassword") 
        pass = Convert.ToBase64String(byt) 

        data = ASCIIEncoding.ASCII.GetBytes("Username=admin&Password=" & pass) 
        WebBrowser1.Navigate("http://192.168.1.1/index/login.cgi", "_self", data, Nothing) 

    End Sub 

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted 

        Dim data() As Byte 
        data = ASCIIEncoding.ASCII.GetBytes("RequestFile=/html/management/reset.asp") 
        WebBrowser2.Navigate("http://192.168.1.1/html/management/reboot.cgi", "_self", data, "Referer:http://192.168.1.1/html/management/reset.asp" & vbCrLf) 

    End Sub