Результат ручного тестирования и автоматизации отличается - PullRequest
0 голосов
/ 15 ноября 2018

Я должен найти неработающие ссылки на веб-странице.Ниже мой код.С помощью приведенного ниже кода я получаю код состояния 403 для нескольких ссылок, но если я вручную нажимаю на ту же ссылку, ссылка открывается.Пожалуйста, помогите мне решить эту проблему. Сценарий написан на vbscript в инструменте testcomplete.

Спасибо, Четана

Sub Test()
   URL = "https://www.webpage.com"
   Browsers.Item(btIExplorer).Run(URL)
   Set page = Sys.Browser("*").Page("*") 

   Set links = page.contentDocument.links
   linksCount = links.length 

   For i = 0 To linksCount - 1
        Set link = links.item(i)
        URL = link.href
        Set httpObj = aqHttp.CreateGetRequest(URL)
        Set httpObjResult = httpObj.Send
        msgbox httpObjResult.StatusCode    
    Next 
End Sub
...