http - (HP QuickTest) QuickTest を使用して HTTP ステータスを取得するにはどうすればよいですか?

Question

ページのすべての URL を取得し、コードが 200 の http 要求のステータスを確認する QuickTest スクリプトを作成しています。

Answer 1

これが私の解決策でした：

Set Http = CreateObject("Microsoft.XMLHttp")
Set oDesc = Description.Create()
    oDesc("micclass").Value = "Link"
Set EditCollection = Browser("Browser").Page("Page").ChildObjects(oDesc)

URL_TEMP = EditCollection(i).GetROProperty("href")
Http.Open "GET" , URL_TEMP , false
Http.Send
msgbox Http.Status