20200706 1305
source = "https://www.autohotkey.com/boards/viewtopic.php?t=26200"
코드
pwb := WBGet()
pwb.Navigate("https://brightree.net/frmLogin.aspx?") ;Navigate to URL
while pwb.busy or pwb.ReadyState != 4 ;Wait for page to load
Sleep, 100
msgbox, the page has now loaded.
;************Pointer to Open IE Window******************
WBGet(WinTitle="ahk_class IEFrame", Svr#=1) { ;// based on ComObjQuery docs
static msg := DllCall("RegisterWindowMessage", "str", "WM_HTML_GETOBJECT")
, IID := "{0002DF05-0000-0000-C000-000000000046}" ;// IID_IWebBrowserApp
;// , IID := "{332C4427-26CB-11D0-B483-00C04FD90119}" ;// IID_IHTMLWindow2
SendMessage msg, 0, 0, Internet Explorer_Server%Svr#%, %WinTitle%
if (ErrorLevel != "FAIL") {
lResult:=ErrorLevel, VarSetCapacity(GUID,16,0)
if DllCall("ole32\CLSIDFromString", "wstr","{332C4425-26CB-11D0-B483-00C04FD90119}", "ptr",&GUID) >= 0 {
DllCall("oleacc\ObjectFromLresult", "ptr",lResult, "ptr",&GUID, "ptr",0, "ptr*",pdoc)
return ComObj(9,ComObjQuery(pdoc,IID,IID),1), ObjRelease(pdoc)
}
}
'[PA] 업무자동화 > [AH]Autohotkey' 카테고리의 다른 글
AH GUI 예제 (0) | 2020.07.15 |
---|---|
AH Msgbox 두 가지 문법 (0) | 2020.07.06 |
AH 엑셀 QR코드 생성 (0) | 2020.07.04 |
AH QR code 생성 (0) | 2020.07.03 |
AH #persistent의 이해 (0) | 2020.07.03 |