RTF/DOC in embedded IE

[Pottery]

I have this in my script:

$zObject = ObjCreate("Shell.Explorer.2")
$zObject_Ctrl = GUICtrlCreateObj($zobject, 0, 120, 993, 577)

And when I go to a page with .rtf or .doc it prompts me to open or save, how can I bypass this?

[PsaltyDS]

You can't "bypass" it, but you can handle it. The popup might be an ordinary window you can automate with standard AutoIt functions like ControlClick(). If it's another embedded IE form, then use _IEAttach() and the other _IE* functions on it.

[Pottery]

I already tried controlclick, it didn't work :/

[PsaltyDS]

Examine the popup with the AutoIt Window Info tool (AU3Info.exe). That will tell you what you're dealing with.

[Pottery]

GAH. This still isn't working..

If WinActive('File Download') Then MsgBox(0, '', 'l')

Why doesn't it register that the window exists :|

[PsaltyDS]

Why doesn't it register that the window exists :|

Did you examine the popup with AU3Info.exe? What's on the summary tab?

[Pottery]

expandcollapse popup

>>>> Window <<<<
Title:  File Download
Class:  #32770
Position:   498, 370
Size:   404, 282
Style:  0x94C80AC4
ExStyle:    0x00010101
Handle: 0x004E0668

>>>> Control <<<<
Class:  Button
Instance:   2
ClassnameNN:    Button2
Name:   
Advanced (Class):   [CLASS:Button; INSTANCE:2]
ID: 4427
Text:   &Save
Position:   216, 121
Size:   78, 23
ControlClick Coords:    55, 12
Style:  0x50010000
ExStyle:    0x00000004
Handle: 0x0025058E

>>>> Mouse <<<<
Position:   772, 525
Cursor ID:  0
Color:  0xD4D0C8

>>>> StatusBar <<<<

>>>> ToolsBar <<<<

>>>> Visible Text <<<<
Do you want to open or save this file?
Name:
file.rtf
Type:
Microsoft Word Document, 1.90KB
From:
********* <- website url
&Open
&Save
Cancel
Al&ways ask before opening this type of file
While files from the Internet can be useful, some files can potentially harm your computer. If you do not trust the source, do not open or save this file. <A>What’s the risk?</A>


>>>> Hidden Text <<<<
Publisher:

[DaleHohm]

I'm guess that line of code never gets executed...

Dale

[PsaltyDS]

Try this:

$hPopup = WinGetHandle("[CLASS:#32770; TITLE:File Download]", "")
If $hPopup Then
    $hButton = ControlGetHandle($hPopup, "", "[CLASS:Button; INSTANCE:2]")
    If $hButton Then
        ControlClick($hPopup, "", $hButton)
        Sleep(1000)
        MsgBox(64, "Click", "Clicked button...", 3)
    Else
        MsgBox(16, "Error", "Failed to get button handle.")
    EndIf
Else
    MsgBox(16, "Error", "Failed to get popup window handle.")
EndIf

[Pottery]

Try this:

$hPopup = WinGetHandle("[CLASS:#32770; TITLE:File Download]", "")
If $hPopup Then
    $hButton = ControlGetHandle($hPopup, "", "[CLASS:Button; INSTANCE:2]")
    If $hButton Then
        ControlClick($hPopup, "", $hButton)
        Sleep(1000)
        MsgBox(64, "Click", "Clicked button...", 3)
    Else
        MsgBox(16, "Error", "Failed to get button handle.")
    EndIf
Else
    MsgBox(16, "Error", "Failed to get popup window handle.")
EndIf

Eactly what I needed, thanks.

[Pottery]

BAH. It registers the window now but for some reason the ControlClick isn't working.

[Pottery]

Problem solved. I used the MacroGenerator and got this:

#region --- AutoIt Macro Generator V 0.21 beta ---
WinWait("File Download","Do you want to open or save th")
ControlClick("File Download","Do you want to open or save th","Button2")
WinWait("Save As","Save &in:")
ControlClick("Save As","Save &in:","Button2")
WinWait("Save As","C:\Documents and Settings\Admi")
ControlClick("Save As","C:\Documents and Settings\Admi","Button1")
WinWait("Download complete","Download Complete")
ControlClick("Download complete","Download Complete","Button2")
#endregion --- End ---

[Pottery]

Thanks for the help salty

[PsaltyDS]

You might get the control coordinates and try ControlClick() with the coordinates, and without the control ID. Or maybe ControlFocus() and then ControlSend() "{ENTER}".

[Pottery]

You might get the control coordinates and try ControlClick() with the coordinates, and without the control ID. Or maybe ControlFocus() and then ControlSend() "{ENTER}".

I'll try that, the MacroGen code bugs out :\

[Pottery]

Is there a special function for getting a control's coords?

[Pottery]

Ok, I'm starting to doubt if it's the code that's wrong...

The ControlClick highlights the button... then I did a Send('{ENTER}') and nothing.. so I make a new au3 file and did:

WinActivate('File Download') ; <- worked
ControlClick('File Download', '', 'Button2') ; <- button higlights
Send('{ENTER}') ; <- button pushes down but nothing happens

Then the script ends and I pressed enter myself, what do you know; it works :|

So I'm confused :\

[Pottery]

I did:

WinWait('File Download')
WinActivate('File Download') ; just to make sure
$Pos = ControlGetPos('File Download', '', 'Button2')
MouseMove($Pos[0], $Pos[1], 0)

And it's moving my mouse to the completely wrong spot..

It moving it near the top of the edit control on my child GUI in the program :\

[JohnOne]

Try adding this to the top of your code

Opt("MouseCoordMode", 2)

[Pottery]

Ok now it moves to the right spot. The MouseClick won't push the button thought.. I don't get it :\ The button pushes down but nothing happens, then when I do it myself it works..