找回密码
 加入
搜索
查看: 3920|回复: 3

[AU3基础] 在一个GUI界面里面打开两个监控页面,可以自动登录,高手进入!

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

While 1
        Sleep(1000) ; Idle around
WEnd

Exit
发表于 2014-11-4 18:04:19 | 显示全部楼层
学习。。。。。。。。。。。。。。
发表于 2014-11-4 18:40:44 | 显示全部楼层
刚开始学GUI,,好多都看不懂,,帮顶了,等大神来解决~~
 楼主| 发表于 2014-11-6 21:24:48 | 显示全部楼层
等好几天都没人回答,还是自己贴上答案吧
#include <IE.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
$mainwindow = GUICreate("时代天元监控服务器", @DesktopWidth, @DesktopHeight)
GUISetState(@SW_SHOW);窗口可见

$oIE = _IECreateEmbedded()
$GUIX = GUICtrlCreateObj($oIE, 0, 0, @DesktopWidth, 400)
$uu = _IENavigate($oIE, "http://wridc123.com")
$oForm = _IEFormGetObjByName($oIE, "login")
$oQuery1 = _IEFormElementGetObjByName($oForm, "login_username")
_IEFormElementSetValue($oQuery1, "admin")
$oQuery2 = _IEFormElementGetObjByName($oForm, "login_password")
_IEFormElementSetValue($oQuery2, "123456")
_IEFormSubmit($oForm, 1)



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






While 1
        Sleep(1000) ; Idle around
WEnd

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

本版积分规则

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

GMT+8, 2024-11-17 12:44 , Processed in 0.096083 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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