Hi -
I need to copy all contents from a webpage and paste in another application. The issue that I am facing is that, the page that I am working with, is triggered from a link in the main web app page and does not have any browser menu items.

This page is activated only by clicking an element within. I have tried clicking on a WebTable, WebElement etc. but that does not seem to activate the page. Hence, SendKeys do not work. Any ideas?
Here is the code that I have developed so far (Sorry, cannot get the indentation to work)-


Extern.Declare micVoid, "SetForegroundWindow", "user32.dll", "SetForegroundWindow", micHwnd

Set oDesc = Description.Create()
oDesc("micclass").Value = "Browser"
If Not IsEmpty(Desktop.ChildObjects(oDesc)) Then
Set browsers = Desktop.ChildObjects(oDesc)
cnt = Desktop.ChildObjects(oDesc).Count
End if
If cnt > 1 Then
For i = 0 to cnt - 1
Set objBrowser = browsers(i)
If instr(1, objBrowser.GetROProperty("name"),"Largest",1) > 0 then
iWndHndl = clng(objBrowser.GetROProperty("hwnd"))
Exit For
End If
Extern.SetForegroundWindow iWndHndl
End If
wait 2
Set oDesc = nothing
Set oDesc = Description.Create()
oDesc("micclass").Value = "WebElement"
oDesc("html tag").Value = "DIV"

Set children = Browser("hwnd:=" & iWndHndl).Page("title:=Largest.*").ChildObjects(oD esc)

If children.count > 0 Then
children(0).Object.FireEvent "onclick"
End if

set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^(ac)"

[/ QUOTE ]