Forum Discussion
windend
14 years agoOccasional Contributor
hi Helen, below is my code.thanks.
Sub NotepadTest
Dim strObjName, p, wndNotepad
strObjName = "Window(""Notepad"", ""* - Notepad"")"
' Store the parent object to a variable
Set p = Sys.Process("notepad")
' Obtain the object by its Name property
' p is the name of the variable that holds the parent object
Set wndNotepad = Eval("p." & strObjName)
If wndNotepad.Exsits then
Log.Message("Ok")
End If
Log.Picture wndNotepad, "Notepad window", wndNotepad.FullName
End Sub