自动登陆程序问题 ⌒_⌒ 没睡的TX近来看看
shano 2007-04-14 11:32:22 本人(菜鸟+初学)想写一个邮箱登陆工具,自动找出特定主题的邮件,并显示.
目前完成登陆部分,问题是怎么进收件箱或者垃圾箱.....
附源码
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.WebBrowser1.Navigate("http://mail.yahoo.com")
End Sub
Private Sub wBrowser_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
Me.WebBrowser1.Document.All("login").SetAttribute("value", "vbnettest8888")
Me.WebBrowser1.Document.All("passwd").SetAttribute("value", "11111111")
Me.WebBrowser1.Document.Forms(0).InvokeMember("submit")
End Sub
End Class