[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[技术讨论] 求爱奇艺自动登录VBS代码

本帖最后由 pcl_test 于 2015-12-30 23:43 编辑

望大侠帮我做个自动登录爱奇艺的VBS脚本。谢谢了。
比如:
账号:55555  密码:55555

本帖最后由 pcl_test 于 2015-12-30 23:50 编辑
  1. Set ie=WScript.CreateObject("InternetExplorer.Application")
  2. ie.visible=true
  3. ie.navigate "http://i.iqiyi.com"
  4. Do
  5. Wscript.Sleep 200
  6. Loop Until ie.ReadyState=4
  7. Set divTag = ie.document.getElementsByTagName("div")
  8. For Each d In divTag
  9.     If d.className = "acountBorder" Then
  10.         Set inputTag = d.getElementsByTagName("input")
  11.         For Each i In inputTag
  12.             If i.type = "text" Then
  13.                 i.value = "账号"
  14.             ElseIf i.type = "password" Then
  15.                 i.value = "密码"
  16.             End If
  17.        Next
  18.    ElseIf d.className = "login_submitV3" Then
  19.        d.getElementsByTagName("a")(0).Click
  20.        Exit For
  21.    End If
  22. Next
复制代码

TOP

这时候我应该跳出来愤怒声讨:
楼主!这帐号根本不能用!

TOP

回复 3# CrLf


    哈哈哈
这么好的论坛!!!!

TOP

返回列表