发表回复 
请教一个关于Internet Explorer_Server的问题
2012-12-13, 17 : 52
请教一个关于Internet Explorer_Server的问题
我在Supermemo中,把鼠标移到练习区域中,AU3_Spy.exe显示

>>>>>>>>>( Now Under Mouse Cursor )<<<<<<<<
ClassNN: Internet Explorer_Server1

现在我想知道Supermemo.exe打开了哪个xml文件,请问可以如何实现?

可能我阐述的不是很清楚,但我也不知道还有哪些东西好讲。。。

我的目的就是按下热键就能调用notepad2打开这个xml
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2012-12-13, 20 : 27
 
鼠标移至控件按F7
代码: (全选)
url = www.baidu.com

gui,add,activex,w320 h480 vwb,shell.explorer
gui,show
wb.navigate(url)
return

F7::
MouseGetPos,,,,vh,2
msgbox % GetDomURLFromHwnd(vh)
return

GetDomURLFromHwnd(hwnd)
{
        static IID_IHTMLDocument2 := "{332c4425-26cb-11d0-b483-00c04fd90119}"
                , uMsg := DllCall("RegisterWindowMessage","str","WM_HTML_GETOBJECT")
                , hm := DllCall("LoadLibrary","str","Oleacc.dll")
        WinGetClass,vc,ahk_id %hwnd%
        if (vc != "Internet Explorer_Server")
                return
        SendMessage,uMsg,,,,ahk_id %hwnd%
        lres := ErrorLevel
        DllCall("Oleacc\ObjectFromLresult","uint",lres,"ptr",GUID(uGuid,IID_IHTMLDocument2),"uint",0,"ptr*",spDoc)
        oDoc := ComObjEnwrap(spDoc)
        return oDoc.url
}

GUID(ByRef CLSID,iid) {
        VarSetCapacity(CLSID,16,0)
        DllCall("ole32\CLSIDFromString","str",iid,"ptr",&CLSID)
                return &CLSID
}
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2012-12-13, 22 : 37
 
谢谢。。。

不过,我弹出来都是about:blank。。。
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2012-12-14, 01 : 12
 
我沒試過 supermemo 但查了一下 它可以export xml 出來 如果這部份的手動操作有譜
那麼把複雜流程用ahk簡化為一鍵操作就有可能
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
发表回复 


论坛跳转:


联系我们 | Autohotkey 中文站 | 回到顶部 | 回到正文区 | 精简(归档)模式 | RSS 聚合