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

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

本帖最后由 pcl_test 于 2017-5-25 14:37 编辑

如何获取无id、无name型的网页控件
下面这个网站是一个例子
  1. Set ie=WScript.CreateObject("InternetExplorer.Application")
  2. ie.visible=true
  3. ie.navigate "https://www.cgtz.com/login.html"
  4. Do
  5. Wscript.Sleep 200
  6. Loop Until ie.ReadyState=4
  7. ie.document.getElementById("LoginForm_username").value="15672465439"
  8. ie.document.getElementById("LoginForm_password").value="123456"
  9. ie.document.getElementById("submit").click
  10. Do
  11. Wscript.Sleep 200
  12. Loop Until ie.ReadyState=4
  13. ie.navigate "https://www.cgtz.com/palace/index.html"
  14. Do
  15. Wscript.Sleep 200
  16. Loop Until ie.ReadyState=4
  17. '("签到赚积分")如何操作?
复制代码
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2

TOP

回复 25# CrLf


    没懂

TOP

本帖最后由 CrLf 于 2015-7-9 17:23 编辑

回复 24# ohar


    哦,多打一个o

TOP

本帖最后由 ohar 于 2015-7-9 17:13 编辑

回复 23# CrLf


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

我是加在 end sub 之前

TOP

本帖最后由 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
复制代码

TOP

回复 20# CrLf


    查了昨晚下的资料,但无果,请大仙指教

TOP

回复 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>
复制代码

TOP

回复 19# ohar


    你退出第一个号了吗

TOP

回复 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
复制代码

TOP

回复 17# ohar


    昂,ie.document.getElementById("signNum").parentNode.getElementsByTagName("a")(0).innerText

TOP

  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这个值,它是个变数

TOP

本帖最后由 ohar 于 2015-7-8 17:53 编辑

好了好了,欧耶
谢谢 CrLf

TOP

回复 14# ohar


试试,应该是这两个中的一个
document.getElementById('signNum').parentNode.getElementsByTagName('a')[0]
document.getElementById('signNum').parentNode.getElementsByTagName('a')[1]
1

评分人数

TOP

回复 13# CrLf

TOP

返回列表