请问这个该如何在WebBrowser中调用?

lengx7 2012-12-10 05:04:10
<script type="text/javascript" src="http://my.xoyo.com/application/my/view/regstyle/js/reg_n.js"></script>
$(function(){
$('.more-form').toggle(function(){
$('.hidden').removeClass('hidden');
},function(){
$('.visible').addClass('hidden');
});
});

http://my.xoyo.com/register/normal/
就是这个页面上的"填写更多账号安全信息»"按钮,请问该如何在WebBrowser中调用呢?
...全文
179 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
lengx7 2012-12-10
  • 打赏
  • 举报
回复
LS厉害啊! 但是我还有点疑问就是:item(5)这个位置是如何取得的呢? 之前用这个代码找过上面的按钮 Doc := Form1.WebBrowser1.Document as IHtmlDocument2; Data := Doc.body.innerHTML; for i := 0 to Doc.all.length - 1 do begin Item := Doc.all.item(i, 0); if SUCCEEDED(Item.QueryInterface(IHTMLInputElement, Input)) then begin Memo1.Lines.Add(Input.name+'='+Input.value); end; end; 结果是: account= type=normal password= password_2= id_name= id_number_radio=0 id_number_overseas= id_number= email= password2= password2_2= mobile= agreement=on scode= 没看出哪个是那个按钮的 据说下面这个代码可以遍历出页面所有的东西,但是代码在我这都编译不过... ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements; for i := 0 to (ovElements.Length - 1) do begin Memo1.Lines.Append(ovElements.item(i).Name+'='+ovElements.item(i).Value); end;
devhp 2012-12-10
  • 打赏
  • 举报
回复
直接點擊那個連結便成; 由於頁面一定,此連結為第五個。:wb.oleobject.document.links.item(5).click; 如果未顯示。再給它加一個虛擬單擊事件便可;

1,593

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧