如何透過 Webbrowser 取得並設定 iframe+Ajax 更新的內容
這樣子說吧 , 在 : http://www.facebook.com/Taipei.Info
你必須先登入 facebook 會員
左邊有一個"推薦給朋友" , 按下後會出現一個框框, 如何透過 webbrowser
去 click 每個朋友, 並可以點 "Next" 到下一頁, 最後按下 "發送邀請函"
程式之前寫好了原本可以! 但最近 facebook 最近又改了想不到破解的方式
看了一下大約是用 Iframe+Ajax 方式更新,附上舊有原始碼 :
Dim a2 As System.Windows.Forms.HtmlElementCollection
Dim c2 As System.Windows.Forms.HtmlElement
Dim tmpstr As String = ""
Dim a As String = ""
a2 = wb1.Document.GetElementsByTagName("a")
For Each c2 In a2
tmpstr = c2.InnerHtml
If tmpstr <> Nothing Then
tmpstr = tmpstr.ToLower
If InStr(tmpstr, "<span class=square") = 1 Then
c2.InvokeMember("click")
End If
End If
Next --------------------编程问答-------------------- 帮顶一下。。 --------------------编程问答-------------------- 帮顶...
going to sleep --------------------编程问答-------------------- 无法打开facebook.
补充:.NET技术 , VB.NET