找回密码
 加入
搜索
查看: 2580|回复: 5

[IE类操作] [已解决]请问如何将这段ie操作代码转换成内嵌浏览器模式?

  [复制链接]
发表于 2017-2-11 22:33:34 | 显示全部楼层 |阅读模式
本帖最后由 hlzxcjx 于 2017-2-18 21:37 编辑
#include <IE.au3>
 
; 创建IE对象并转到百度主页
Local $oIE = _IECreate("http://www.baidu.com")
; 通过Id获取关键词文本域对象
Local $oGuanJianCi = _IEGetObjById($oIE, "kw")
If IsObj($oGuanJianCi) Then
    ; 在关键词文本域中输入内容
    $oGuanJianCi.value = "在Sublime Text 3中搭建AutoIt3环境"
Else
    MsgBox(0, "蟒加加", "获取关键词文本域对象失败!")
EndIf
; 通过Id获取确定按钮对象
Local $oBaiDuYiXia = _IEGetObjById($oIE, "su")
If IsObj($oBaiDuYiXia) Then
    ; 单击“百度一下”按钮
    $oBaiDuYiXia.click()
Else
    MsgBox(0, "蟒加加", "获取确定按钮对象失败!")
EndIf
MsgBox(0, "蟒加加", "脚本执行完毕!")
如何将以上代码加入到以下是最简内嵌浏览器中呢?
#include <IE.au3>
$Form1 = GUICreate("最简内嵌浏览器", 1024, 600)
$oIE = ObjCreate("Shell.Explorer.2")
GUICtrlCreateObj($oIE, 0, 0, 1024, 600)
$oIE.navigate("http://www.baidu.com")
GUISetState(@SW_SHOWNORMAL)

While 1
        Sleep(1)    
        If GUIGetMsg() = -3 Then Exit
WEnd
发表于 2017-2-12 11:53:43 | 显示全部楼层
回复 1# hlzxcjx


   

#include <IE.au3>
$Form1 = GUICreate("最简内嵌浏览器", 1024, 600)
$oIE = ObjCreate("Shell.Explorer.2")
GUICtrlCreateObj($oIE, 0, 0, 1024, 600)
_IENavigate($oIE, "http://www.baidu.com")
_IELoadWait($oIE)
GUISetState(@SW_SHOWNORMAL)

; 通过Id获取关键词文本域对象
Local $oGuanJianCi = _IEGetObjById($oIE, "kw")
If IsObj($oGuanJianCi) Then
    ; 在关键词文本域中输入内容
    $oGuanJianCi.value = "在Sublime Text 3中搭建AutoIt3环境"
Else
    MsgBox(0, "蟒加加", "获取关键词文本域对象失败!")
EndIf
; 通过Id获取确定按钮对象
Local $oBaiDuYiXia = _IEGetObjById($oIE, "su")
If IsObj($oBaiDuYiXia) Then
    ; 单击“百度一下”按钮
    $oBaiDuYiXia.click()
Else
    MsgBox(0, "蟒加加", "获取确定按钮对象失败!")
EndIf
MsgBox(0, "蟒加加", "脚本执行完毕!")
While 1
        Sleep(1)    
        If GUIGetMsg() = -3 Then Exit
WEnd
 楼主| 发表于 2017-2-12 12:53:31 | 显示全部楼层
回复  hlzxcjx
chamlien 发表于 2017-2-12 11:53



    谢谢!还是不太懂这些函数的用法,怎样才能在内置中打开,怎样才不弹出ie。再如:
点击"新闻"的链接还是在外置ie打开。
#include <IE.au3>
$Form1 = GUICreate("最简内嵌浏览器", 1024, 600)
$oIE = ObjCreate("Shell.Explorer.2")
GUICtrlCreateObj($oIE, 0, 0, 1024, 600)
_IENavigate($oIE, "http://www.baidu.com")
_IELoadWait($oIE)
GUISetState(@SW_SHOWNORMAL)
 
_IELinkClickByText ($oIE, "新闻")

While 1
        Sleep(1)    
        If GUIGetMsg() = -3 Then Exit
WEnd
发表于 2017-2-12 14:05:45 | 显示全部楼层
回复 3# hlzxcjx


    弹窗请参考
http://www.autoitx.com/forum.php ... %C7%B6IE&page=1
发表于 2017-2-12 17:25:43 | 显示全部楼层
貌似没有完美的内嵌窗口本地打开,比较完善的就是疯子的方法
貌似我研究了很久也没找到完美的方法
 楼主| 发表于 2017-2-12 19:15:39 | 显示全部楼层
回复  hlzxcjx


    弹窗请参考
chamlien 发表于 2017-2-12 14:05



    还是不行!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-12-25 01:36 , Processed in 0.083773 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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