使用ObjEvent会出错?什么情况?-『提问交流』-AUTOIT CN

风行者 发表于 2010-6-25 19:13:35

触发了什么事件?

republican 发表于 2010-6-25 20:13:55

回复 14# itljl

错误是可以拦截的，参考Obj管理一章

只是版主这个，不清楚究竟这样触发ObjEvent，有例子就好办了。

guland 发表于 2010-6-25 20:45:34

我想拦截NewWindow事件,我现在能做到的就是获取NewWindow事件的信息,但是拦截不住

republican 发表于 2010-6-25 21:27:05

回复 1# guland

请使用该段代码！！

#include <GUIConstants.au3>

#include <WindowsConstants.au3>
$oIE = ObjCreate("Shell.Explorer.2"); open the com openject
$oEvt = ObjEvent($oIE,"IEEvent_","DWebBrowserEvents"); attach the DWebBrowserEvents where 'BeforeNavigate' is part of
GUICreate(@ScriptName, 800, 600, -1, -1, BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))
GUICtrlCreateObj($oIE, 0, 0, 800, 600); make the com object visible
GUISetState()

With $oIE; make a object pool
.RegisterAsBrowser = True
.RegisterAsDropTarget = True
.TheaterMode = True
.Resizable = False
.navigate("http://www.baidu.com")
EndWith

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
Exits()

Func IEEvent_BeforeNavigate($url,$Flags,$TargetFrameName,$PostData,$Headers,$Cancel)
_say('before Navigate Event notified')
_say($url)
_say($Flags)
_say($TargetFrameName)
_say($PostData)
_say($Headers)
_say($Cancel)
EndFunc

Func IEEvent_NewWindow($url,$Flags,$TargetFrameName,$PostData,$Headers,$Cancel)
MsgBox(0,"----------guland--------------","点击确定谢谢我吧~~~")
_say('Newwindows')
_say($url)
_say($Flags)
_say($TargetFrameName)
_say($PostData)
_say($Headers)
_say($Cancel)

EndFunc

Func Exits()
GUIDelete()
$oEvt = 0
$oIE = 0
Exit
EndFunc

Func _Say($tx)
ConsoleWrite($tx & @CR)
EndFunc

guland 发表于 2010-6-25 21:44:11

回复 19# republican

非常感谢,不过我需要的是拦截NewWindow事件,让鼠标点击链接之后不执行接下来的动作,也就是NewWindow,我的代码的目前为止的功能跟你的是一样的,支持代码没有你的那么复杂,
根据我掌握的资料只能试试DWebBrowserEvents2才行,但是DWebBrowserEvents2在AU3里面貌似支持不好
不过还是非常非常的感谢republican

guland 发表于 2010-6-25 23:21:26

不要沉,相信一定会有解决办法的

republican 发表于 2010-6-25 23:37:44

回复 21# guland

估计是不行的了:

DaleHohm
Think of IE as an API...
Group: AutoIt MVPs(MVP)
Posts: 5,101
Joined: 14-March 05
Location:Colorado

Posted 14 May 2008 - 07:42 PM
You're right. The NewWindow2 and NewWindow3 events are either not firing or are not being trapped. I cannot explain it.

地址:
http://www.autoitscript.com/forum/index.php?showtopic=71155&st=0&p=521477&hl=NewWindow2&fromsearch=1&#entry521477

guland 发表于 2010-6-26 08:00:40

回复 22# republican

老外解决不了的事情不代表我们解决不了{:face (317):}

republican 发表于 2010-6-26 08:59:56

回复 23# guland

那我就等待你的喜讯啦~~

{:face (356):}

guland 发表于 2010-6-26 09:13:24

回复 24# republican

是在不行我用E语言编个DLL给AU3调用哈哈

republican 发表于 2010-6-26 09:16:46

回复 25# guland

顺带做个多线程的吧~~~

guland 发表于 2010-6-26 09:23:51

回复 26# republican

............................{:1_489:}

风行者 发表于 2010-6-26 20:42:26

能做到,au3有改源码的IE函数

C.L 发表于 2010-6-27 01:17:39

我也试了好几种方法，的确是挡截不到

republican 发表于 2010-6-29 09:09:25

回复 28# 风行者
能否提供一下呢？

页: 1 [2]

AUTOIT CN's Archiver