找回密码  加入

AUTOIT CN

搜索
查看: 3850|回复: 7

[交流] GUI界面里面打开两个不同网页

[复制链接]
发表于 2014-11-5 21:52:47 | 显示全部楼层 |阅读模式
10金钱
本人想通过在一个GUI界面里面打开两个监控页面,可以自动登录,但是自己尝试半天只能打开一个,同时打开两个总会覆盖掉第一个,请高手支招!
账号密码是错的,请忽略,提供思路即可
第一个监控:http://wridc123.com
第二个监控:http://www.xjcdata.com
  1. #include <IE.au3>
  2. #include <GUIConstantsEx.au3>
  3. #include <WindowsConstants.au3>
  4. Opt("GUIOnEventMode", 1)
  5. $mainwindow = GUICreate("监控服务器", @DesktopWidth, @DesktopHeight)
  6. GUISetState(@SW_SHOW);窗口可见
  7. $oIE = _IECreateEmbedded()
  8. $GUIX=GUICtrlCreateObj($oIE, 0, -200, @DesktopWidth,600)
  9. $uu=_IENavigate($oIE, "http://wridc123.com")
  10. $oForm = _IEFormGetObjByName($oIE, "login")
  11. $oQuery1 = _IEFormElementGetObjByName($oForm, "login_username")
  12. _IEFormElementSetValue($oQuery1, "admin")
  13. $oQuery2 = _IEFormElementGetObjByName($oForm, "login_password")
  14. _IEFormElementSetValue($oQuery2, "123456")
  15. _IEFormSubmit($oForm, 1)

  16. While 1
  17.         Sleep(1000) ; Idle around
  18. WEnd

  19. Exit
复制代码

 楼主| 发表于 2014-11-6 21:20:06 | 显示全部楼层
等了两天没有人解答,还是自己研究出来了
  1. #include <IE.au3>
  2. #include <GUIConstantsEx.au3>
  3. #include <WindowsConstants.au3>
  4. Opt("GUIOnEventMode", 1)
  5. $mainwindow = GUICreate("时代天元监控服务器", @DesktopWidth, @DesktopHeight)
  6. GUISetState(@SW_SHOW);窗口可见

  7. $oIE = _IECreateEmbedded()
  8. $GUIX = GUICtrlCreateObj($oIE, 0, 0, @DesktopWidth, 400)
  9. $uu = _IENavigate($oIE, "http://wridc123.com")
  10. $oForm = _IEFormGetObjByName($oIE, "login")
  11. $oQuery1 = _IEFormElementGetObjByName($oForm, "login_username")
  12. _IEFormElementSetValue($oQuery1, "admin")
  13. $oQuery2 = _IEFormElementGetObjByName($oForm, "login_password")
  14. _IEFormElementSetValue($oQuery2, "123456")
  15. _IEFormSubmit($oForm, 1)



  16. $cactiez = _IECreateEmbedded()
  17. $cactiezobj = GUICtrlCreateObj($cactiez, 0, 500, @DesktopWidth, 100)
  18. _IENavigate($cactiez, "http://www.xjcdata.com", 1)
  19. $cactiezform = _IEFormGetObjByName($cactiez, "login")
  20. $form1 = _IEFormElementGetObjByName($cactiezform, "login_username")
  21. _IEFormElementSetValue($form1, "admin")
  22. $form2 = _IEFormElementGetObjByName($cactiezform, "login_password")
  23. _IEFormElementSetValue($form2, "12345678")
  24. _IEFormSubmit($cactiezform, 1)






  25. While 1
  26.         Sleep(1000) ; Idle around
  27. WEnd

  28. Exit
复制代码
回复

使用道具 举报

发表于 2015-4-12 23:29:53 | 显示全部楼层
学习,谢谢楼主!
回复

使用道具 举报

发表于 2015-4-21 23:45:15 | 显示全部楼层
学习了,正在找这个资料。
回复

使用道具 举报

发表于 2015-5-19 17:49:05 | 显示全部楼层
thanks 4 sharing!
回复

使用道具 举报

发表于 2016-11-16 19:43:57 | 显示全部楼层
这个好  以后用得上
回复

使用道具 举报

发表于 2017-2-13 14:18:57 | 显示全部楼层
收藏学习下
回复

使用道具 举报

发表于 2018-3-26 11:22:13 | 显示全部楼层
@DesktopWidth, 100)
修改为
@DesktopWidth, @Desktopheight/2)
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|小黑屋|手机版|AUTOIT CN ( 鲁ICP备15028933号-3 )谷歌 百度

GMT+8, 2018-10-16 19:09 , Processed in 0.086667 second(s), 11 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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