hao268网站，风格清新，无任何广告，实在是良心之作。其首页中的邮箱账户，可以方便的直达各个常用邮箱。本程序利用VBA，实现139邮箱的自动登录。

@163.com@qq.com@126.com@yeah.net@sina.com@sohu.com @21cn.com @188.com @aliyun.com @189.cn @139.com @gmail.com @hotmail.com --其它帐号-- 百度帐号 新浪微博 QQ空间 支付宝人人网

开心网知乎帐号

'@139.com是第11个元素

Sub 邮箱登录()

On Error Resume Next

Set ie = CreateObject("internetexplorer.application")

ie.Visible = True

ie.Navigate "https://www.hao268.com"

Do Until ie.ReadyState = 4

    DoEvents

Loop

With ie.Document    

  .getelementbyid("hao_mail_username").Value = "yourname"

  .getelementbyid("hao_mail_options")(11).Selected = True'选中@139.com

  .getelementbyid("hao_mail_passwd").Value = "yourpassword"

  .getElementById("emailsubmit").Click

End With

End Sub