いつもお世話になります。 WebBrowserコントロールを使ってGmailの未読メールの部分を自動クリックして既読状態にしたいのですが、方法がわかりません。 チェックボックスなどの(チェックボックス チェック)はできましたが、未読メールを既読にする方法だけがどうしてもわかりません。 下記に途中のコードを掲載しましたが、どのような方法でも構いませんので、自動でクリックする方法を教えてください。 Public Class Form1 Private Sub f1() Handles MyBase.Shown WebBrowser1.Navigate("https://mail.google.com/mail/?tab=mm#inbox") End Sub 'VB gmail未読メール 既読 Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted For Each htm As HtmlElement In WebBrowser1.Document.All If htm.GetAttribute("className") = "zA zE" Then For Each inhtm In WebBrowser1.Document.All '======================================== 'ここの部分がわかりません '======================================== inhtm.InvokeMember("Click") Next End If Next End Sub End Class よろしくお願いします。
↧