利用VBA实现139邮箱的自动登录代码怎么写-创新互联

这篇文章主要为大家分析了利用VBA实现139邮箱的自动登录代码怎么写的相关知识点,内容详细易懂,操作细节合理,具有一定参考价值。如果感兴趣的话,不妨跟着跟随小编一起来看看,下面跟着小编一起深入学习“利用VBA实现139邮箱的自动登录代码怎么写”的知识吧。

创新互联公司专注于网站建设,为客户提供成都网站设计、网站建设、网页设计开发服务,多年建网站服务经验,各类网站都可以开发,成都品牌网站建设,公司官网,公司展示网站,网站设计,建网站费用,建网站多少钱,价格优惠,收费合理。

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

<select id="hao_mail_options" onChange="MailLogin.change(this)">

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

<option>开心网</option><option>知乎帐号</option></select>

'@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

这篇文章主要为大家分析了利用VBA实现139邮箱的自动登录代码怎么写的相关知识点,内容详细易懂,操作细节合理,具有一定参考价值。如果感兴趣的话,不妨跟着跟随小编一起来看看,下面跟着小编一起深入学习“利用VBA实现139邮箱的自动登录代码怎么写”的知识吧。

另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。

分享文章:利用VBA实现139邮箱的自动登录代码怎么写-创新互联
分享地址:https://www.cdcxhl.com/article32/iojpc.html

成都网站建设公司_创新互联,为您提供域名注册标签优化网站维护网站收录网站改版ChatGPT

广告

声明:本网站发布的内容(图片、视频和文字)以用户投稿、用户转载内容为主,如果涉及侵权请尽快告知,我们将会在第一时间删除。文章观点不代表本网站立场,如需处理请联系客服。电话:028-86922220;邮箱:631063699@qq.com。内容未经允许不得转载,或转载时需注明来源: 创新互联

小程序开发