how to maximize a browser in QTP

[reejais]

Hi All,

I have written a code like the below

Code:

Dim objIE
Set objIE= CreateObject("InternetExplorer.Application")
objIE.visible = True
objIE.navigate "........."
objIE.statusbar=1
wait(3)

now when I run it the browser does not open in maximized mode.

Could anybody tell me what can I add in this code to open it in maximized mode?
I dont want it to be in Full Screen but maximized mode.

Thanks in advance.

Regards,
Reema.

[supputuri]

Hi Reema,

Include the below line of code after "objIE.visible = True".

Code:

Window("hwnd:=" & objIE.HWND).Maximize

It will solve your requirement.

Let me know if you need any more information or have any questions on this.

[reejais]

Thanks.. It worked.

Regards,
Reema.

[cdesserich]

You can also launch the browser with SystemUtil or a WScript.Shell and specify the window state when opened (along with the startup URL). 3 = maximized.

SystemUtil.Run "iexplore.exe", "www.google.com", , , 3
Browser("micclass:=Browser").Sync

Dim wsh
Set wsh = CreateObject("WScript.Shell")
wsh.Run "iexplore.exe about:blank", 3, False
Browser("micclass:=Browser").Sync
Set wsh = Nothing