I am trying to capture the data from a form displayed in IE. I was hoping someone would have an example of this or of table data in IE. I have read the examples showing how to paste into a form, (execellent example) and how to get all the links but if someone had one on table data it would really help me out.
Also, I have an example using class and instance that may help some others out. The script below will allow a user to specify a window and class and it will generate a report containing what is in each instance. It is set to check the first 25 instances (easy to change) and will put the text file with the results in the root directory of C:
Let>APP_TITLE=Test Control Capture
Dialog>Dialog1
Caption=Test Class and Instance Utility
Width=370
Height=263
Top=CENTER
Left=CENTER
Label=Test Capture Class and Instance Utility,94,22,true
Label=Enter Window Name,135,46,true
Label=Enter the Class Name,131,94,true
Label=(Leave Blank if using Drop Down),105,110,true
Edit=Windowname,112,62,145,
Button=Exit,177,182,65,25,2
ComboBox=msComboBox1,112,150,145,Edit%CRLF%Tedit%CRLF%ComboBox%CRLF%Static%CRLF%RichEdit20WPT
Edit=WindowClass,112,126,145,
Button=Continue,113,182,65,25,1
EndDialog>Dialog1
Label>mainscreen
Show>Dialog1,r
If>r=2,EXIT
If>r=3,openhelp
If>r=1,RMacro
Goto>mainscreen
Label>RMacro
Let>Windowname=%Dialog1.Windowname%
Let>WindowClass=%Dialog1.WindowClass%
Len>%WindowClass%,wcp
If>%wcp%>1,classentered
Let>WindowClass=%Dialog1.msComboBox1%
Label>classentered
Len>Windowname,wnl
If>wnl>1,gotwindowname
MDL>No Window Name was Entered%CRLF% the utility will now exit
Goto>EXIT
Label>gotwindowname
Let>basewindowname=%Windowname%
Concat>%Windowname%,*
IfWindowOpen>%Windowname%,windowexixts,Notwindowexixts
Label>Notwindowexixts
MDL>Window %Windowname% Does not exist%CRLF%The Utility Will now Exit
Goto>EXIT
Label>windowexixts
WriteLN>c:\testwincapture.txt,The Window Name tested is %basewindowname%
WriteLN>c:\testwincapture.txt,The Class tested is %WindowClass%
Let>x=0
Label>Start
Let>x=x+1
If>x=25,EOF
Let>Contents=0
SetFocus>%Windowname%
Wait> .5
GetControlText>%Windowname%,%WindowClass%,%x%,Contents
If>%Contents%=##NOSUCHOBJECT##,tryanotherClass
Len>%Contents%,filled
If>filled>1,writeit
Goto>Start
Label>writeit
MDL>The instance is %x% %CRLF%and the contents are %Contents%
WriteLN>c:\testwincapture.txt,,The instance is %x% and the contents are %Contents%
Goto>Start
Label>EOF
ExecuteFile>c:\testwincapture.txt
Label>EXIT
SRT>tryanotherClass
MDL>The handle %WindowClass% instance %x% does not exist in %Windowname%
Goto>EXIT
END>tryanotherClass
