Displaying: ' Make sure to include 'Eyes.qfl' via File -> Settings… -> Resources ' This is your api key, make sure you use it in all your tests. eyes.ApiKey = "YOUR_API_KEY" ' Test setup – You should have 'Notepad' window object in your objects repository Set testApp = Window("Notepad") eyes.SetBaselineInfoFromWindow(testApp) ' Start visual UI testing – Open eyes test eyes.Open "Hello World", "QTP Hello World Test" ' Visual checkpoint #1 eyes.CheckObject testApp, "Hello!" ' Write something testApp.WinEditor("Edit").Type("Applitools UFT Demo") ' Visual checkpoint #2 eyes.CheckObject testApp, "Write!" ' End visual UI testing. Validate visual correctness. eyes.Close() ' Report If Not eyesReport.IsPassed Then If eyesReport.IsNew Then Reporter.ReportEvent micFail, eyesReport.TestName, "New test inserted, See " & eyesReport.Url & " for details." else Reporter.ReportEvent micFail, eyesReport.TestName, "See " & eyesReport.Url & " for details." End If End If