$oIE2 = _IEFrameGetObjByName($oIE,"container") _IELoadWait($oIE2) $oLinks = _IELinkGetCollection ($oIE2) $iNumLinks = @extended MsgBox(0, "Link Info", $iNumLinks & " links found") For $oLink In $oLinks MsgBox(0, "Link Info",$oLink.href) Next
您需要 登录 才可以下载或查看,没有账号?加入
举报
;读取源代码 $sSource = _IEDocReadHTML($oIE2) ;替换文本链接,加上一个名字;用循环是为了个不同的链接加上不同的名字便于区别 $sTMPLink = 1 Do $sTMP = "<A name=textlink" & $sTMPLink & " o" $sSource = StringReplace($sSource,"<A o",$sTMP,1) $sTMPLink +=1 until not @extended ;写回去 _IEBodyWriteHTML($oIE2,$sSource) ;点击链接 $oWinopen = _IEGetObjByName($oIE2,"textlink5") $oWinopen.click
本版积分规则 发表回复 回帖后跳转到最后一页
|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度
GMT+8, 2025-1-12 13:43 , Processed in 0.076269 second(s), 24 queries .
Powered by Discuz! X3.5 Licensed
© 2001-2024 Discuz! Team.