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

[问题求助] [已解決]VBS如何获取无id、无name型的网页控件?

[复制链接]
发表于 2015-7-8 18:04:32 | 显示全部楼层
  1. <div class="leaguer_sign">
  2.                         <p>积分:<a href="/palace/integrallist.html" class="integralBalance">175</a></p>
  3.                         <p class="signNum" id="signNum">本月累计签到 8 天</p>
  4.                         <a class="sign" href="javascript:;">签到赚积分</a>
  5.                     </div>
复制代码
回复 15# CrLf


    还有一个问题,怎么获得上面175这个值,它是个变数
发表于 2015-7-8 18:24:27 | 显示全部楼层
回复 17# ohar


    昂,ie.document.getElementById("signNum").parentNode.getElementsByTagName("a")(0).innerText
发表于 2015-7-8 19:15:38 | 显示全部楼层
回复 18# CrLf

登录第二个账号时就出错,是怎么回事
  1. 'On Error Resume Next
  2. Dim ie,nam,pass
  3. Set ie=WScript.CreateObject("InternetExplorer.Application")
  4. j = 0
  5. nam = "15672465439"
  6. pass = "123456"
  7. Call aoie(nam,pass)

  8. nam = "15672465439"
  9. pass = "123456"
  10. Call aoie(nam,pass)

  11. nam = "15672465439"
  12. pass = "123456"
  13. Call aoie(nam,pass)

  14. WScript.Echo(j)

  15. Sub aoie(nam,pass)

  16. ie.navigate "https://www.cgtz.com/login.html"

  17. While ie.busy Or ie.readystate <> 4
  18. Wend

  19. ie.Document.getElementById("LoginForm_username").value=nam
  20. ie.Document.getElementById("LoginForm_password").value=pass
  21. ie.Document.getElementById("submit").click

  22. While ie.busy Or ie.readystate <> 4
  23. Wend

  24. ie.navigate "https://www.cgtz.com/palace/index.html"

  25. While ie.busy Or ie.readystate <> 4
  26. Wend

  27. ie.Document.getElementById("signNum").parentNode.getElementsByTagName("a")(1).click
  28. j = j + 1
  29. End Sub
复制代码
发表于 2015-7-8 19:41:24 | 显示全部楼层
回复 19# ohar


    你退出第一个号了吗
发表于 2015-7-8 19:51:40 | 显示全部楼层
回复 20# CrLf

不会点退出,又没ID,又不一样
  1. <li class="jsWeixin">
  2.                 <i class="weixin"></i>微信<span>|</span>
  3.                 <div class="weixinImg"></div>
  4.             </li>
  5.             <li class="financialNew"><a href="/tech/27.html" target="_blank">理财资讯</a><span>|</span>
  6.                 <ul class="dropDown">
  7.                                                                 <li> <a href="/tech/27.html" target="_blank">p2p理财新闻</a></li>
  8.                                             <li> <a href="/tech/28.html" target="_blank">理财小知识</a></li>
  9.                                             <li> <a href="/tech/29.html" target="_blank">草根理财故事</a></li>
  10.                                             <li> <a href="/tech/30.html" target="_blank">个人理财入门</a></li>
  11.                                             <li> <a href="/tech/31.html" target="_blank">草根理财FAQ</a></li>
  12.                                     </ul>
  13.             </li>
  14.             <li><a href="/faq.html" target="_blank">帮助中心</a><span>|</span></li>
  15.                             <li>欢迎 <a href="/accouts.html" class="aGreen" rel="nofollow">
  16.                         186****6940</a> 来到草根投资!
  17.                     <a href="/logout.html" rel="nofollow">[退出]</a>
  18.                     <span>|</span></li>
  19.                     </ul>
复制代码
发表于 2015-7-9 16:33:24 | 显示全部楼层
回复 20# CrLf


    查了昨晚下的资料,但无果,请大仙指教
发表于 2015-7-9 16:47:15 | 显示全部楼层
本帖最后由 CrLf 于 2015-7-9 17:23 编辑

回复 22# ohar


    加一句退出账户:
  1. ie.Navigate "https://www.cgtz.com/logout.html"
  2. While ie.busy Or ie.readystate <> 4
  3. Wend
复制代码
发表于 2015-7-9 17:10:52 | 显示全部楼层
本帖最后由 ohar 于 2015-7-9 17:13 编辑

回复 23# CrLf


    https://www.cgtz.com/logoout.html 点这个没用的,我试过,不能退出

我是加在 end sub 之前
发表于 2015-7-9 17:22:29 | 显示全部楼层
本帖最后由 CrLf 于 2015-7-9 17:23 编辑

回复 24# ohar


    哦,多打一个o
发表于 2015-7-9 17:46:57 | 显示全部楼层
回复 25# CrLf


    没懂
发表于 2015-7-9 18:43:13 | 显示全部楼层
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 11:55 , Processed in 0.014058 second(s), 7 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表