Hi Shef,
Assuming that you already have the reference to the page and using the code Tanya posted some time ago in another thread (untested VBScript pseudocode):
'-----------------------------------------------------------------------------
' Returns BrowserWindow object that corresponds to the given page object
' From: http://smartbear.com/forums/f75/t83264/how-to-match-a-page-object-to-its-browserwindow
Function BrowserWindowByPageGet(ByRef page)
Const cProcName = "BrowserWindowByPageGet"
Dim cProcNameMsgPrefix : cProcNameMsgPrefix = cUnitNameMsgPrefix & cProcName & "(): "
Dim title
Dim wnd
Set wnd = Utils.CreateStubObject
If (Not IsNull(page)) Then
If (0 = aqString.Compare(page.ObjectType, "Page", False)) Then
title = page.contentDocument.title
Set wnd = page.Parent.FindChild("WndCaption", title & "*")
If (Not wnd.Exists) Then
Set wnd = page.Parent.FindChild("WndCaption", Project.Variables.pvtBaseURL)
End If
End If
End If
Set BrowserWindowByPageGet = wnd
End Function
'-----------------------------------------------------------------------------
Call BrowserWindowByPageGet(page).Activate
Is this what you were looking for?