Dim sUrlPart, oBrowserDesc, oLinks, oAllLinks Set oBrowserDesc = Description.Create Set oLinks = Description.Create oBrowserDesc("url").Value = ".*" & sUrlPart & ".*" 'для обьединения стрингов используйте оператор & 'если в sUrlPart есть символы RegExp вроде ? то перед ними надо ставить \, что бы они обрабатывались как обычные стринги oLinks ("micclass").Value = "Link" Set oAllLinks = Browser(oBrowserDesc).Page(oBrowserDesc).ChildObjects(Links)
Во втором случае, вы можете использовать BitmapCheckpoint. А для проверки пропертей обьекта можно просто использовать if.
Например, вы знаете заранее, что у картинок "html id" равен "image1", "image2", и тд. Вы хотите проверить что href картинок равен "http://test.url/1", "http://test.url/2"
Заносите это все в таблицу в столбики HTML_ID и HREF например. Потом:
Dim iRow, sSheetID, sImageHref, oImageDesc, oBrowserDesc 'используем локальный sheet в дата таблице 'такой код будет работать даже если action переименовать или поменять местами sSheetID = Environment("ActionName") 'создаем обьект описания для картинки и браузера Set oImageDesc = Description.Create Set oBrowserDesc = Description.Create oBrowserDesc("url").Value = "browser url" 'Проходим по каждой заполненой строке в таблице For iRow = 1 To DataTable.GetSheet(sSheetID).GetRowCount DataTable.SetCurrentRow(iRow) 'получаем из таблицы нужный html id картинки oImageDesc("html id").Value = DataTable.Value("HTML_ID", sSheetID) 'из нужной картинки на странице вытягиваем href sImageHref = Browser(oBrowserDesc).Page(oBrowserDesc).Image(oImageDesc).GetROProperty("href") 'если полученый href соответствует заданному в таблице If sImageHref = DataTable.Value("HREF", sSheetID) Then 'то выводим в репорт Pass Reporter.ReportEvent micPass, "Проверка href", "Image html id = " & DataTable.Value("HTML_ID", sSheetID) Else 'тут в выводе Fail в последний параметр можно добавить ожидаемый и полученный href Reporter.ReportEvent micFail, "Проверка href", "Image html id = " & DataTable.Value("HTML_ID", sSheetID) End If 'переходим на следущую строку в таблице Next