mazhar555
15 years agoContributor
Working with Internet Explorer 8
Hi, how can i make following function compatible for all version of Internet Explorer, this function works fine with IE6 but when i run my script with IE8 it does not work, the problem is when i launch IE 6 there is only one process of IE that is "iexplore" but when i launch IE 8 TC shows me two processes "iexplore" and "iexplore, 2".
Function LaunchURL(webUrl)
'Closing All opened Browsers
'CloseAllBrowser
'Initiating Internet Explorer
Set IEObj = CreateObject("InternetExplorer.Application")
' Making IE visible
IEObj.Visible = True
' Navigating to the page
Call IEObj.Navigate(webUrl)
'Setting Process and Page
Set Process = Sys.Process("iexplore")
Set Page = Process.Page("*")
'Maximizing the Page
Process.IEFrame(0).Maximize
End Function
Function LaunchURL(webUrl)
'Closing All opened Browsers
'CloseAllBrowser
'Initiating Internet Explorer
Set IEObj = CreateObject("InternetExplorer.Application")
' Making IE visible
IEObj.Visible = True
' Navigating to the page
Call IEObj.Navigate(webUrl)
'Setting Process and Page
Set Process = Sys.Process("iexplore")
Set Page = Process.Page("*")
'Maximizing the Page
Process.IEFrame(0).Maximize
End Function