Используя коллекцию браузеров, мы можем добиться этого. Надеюсь, это поможет.
Set objLastBrowser = GetLastBrowserInstance()
Public Function GetLastBrowserInstance()
Dim objBrowserDesc
Dim objBrowserCollection
Dim objLastOpenedBrowser : objLastOpenedBrowser = Null
Dim intCount
Dim lngHandle
Set objBrowserDesc = Description.Create
objBrowserDesc("micClass").Value = "Browser"
Set objBrowserCollection = Desktop.ChildObjects(objBrowserDesc)
intCount = objBrowserCollection.Count
If intCount > 0 Then
Set objLastOpenedBrowser = Browser("CreationTime:=" & intCount - 1)
objLastOpenedBrowser.Sync
lngHandle = objLastOpenedBrowser.GetROProperty("hwnd")
Window("hwnd:=" & lngHandle).Activate
End If
Set GetLastBrowserInstance = objLastOpenedBrowser
End Function
Если оба браузера находятся в хранилище объектов, нужно просто прекратить ссылки 'Browser ("Browser1")' 'и использовать браузер ("Browser2")'? Можете ли вы привести пример, где это не работает для вас? – Dave
Спасибо Дэйв. У нас есть приложение, которое мы автоматизировали. Теперь есть отдельное приложение, в котором присутствует ссылка для 1-го приложения. Нажатие на эту ссылку из второго приложения вызывает 1-е приложение, и элемент управления должен быть передан в браузер 1-го приложения, где должна быть вызвана остальная часть функции. – neeraj
Можете ли вы показать мне код, с которым у вас возникли проблемы? Как я сказал выше, вы должны просто изменить браузер, на который вы ссылаетесь, и UFT будет переключаться между ними счастливо. – Dave