Yahoo! 奇摩會員登入Sample

// VB.Net 寫法 

    ' 宣告並建立IE 執行個體物件

    Dim ie As Object = CreateObject("InternetExplorer.Application")

    ' Yahoo!奇摩會員登入網址

    Dim strURL As String = "http://tw.login.yahoo.com/cgi-bin/login.cgi?srv=www&from=http://tw.yahoo.com"

    With ie

        .Visible = True ' 顯示IE

        .Navigate(strURL) ' 瀏覽網址

        ' 等待網頁載入完成

        Do While .Busy

            Application.DoEvents()

        Loop

        .Document.All("login").Value = "這裡打帳號" ' 帳號

        .Document.All("passwd").Value = "這裡打密碼" ' 密碼

        .Document.All("submit").Click() ' 登入

    End With

    ie = Nothing ' 釋放IE 物件