ie with out ie coms

document := UrlToDom("websitehere")
;title := document.getElementsByClassName("vim x-item-title")[0].innerText
price := document.getElementById("prcIsum").innerText
StringReplace, price, price, /ea, , All
StringReplace, price, price, us, , All
StringReplace, price, price, $, , All
ship := document.getElementById("fshippingCost").innerText
StringReplace, ship, ship, us, , All
StringReplace, ship, ship, $, , All
total := price + ship
MsgBox % 0x40, eBay item, % "Price: $" price "`n`n" "Shipping: $" ship "`n`n" "Total: $" total

UrlToDom(Url)
{
	static whr := ComObjCreate("WinHttp.WinHttpRequest.5.1")

	whr.Open("GET", Url, false)
	whr.Send()
	dom := ComObjCreate("HTMLFile")
	dom.Write("<meta http-equiv='X-UA-Compatible' content='IE=Edge'>")
	dom.Write(whr.ResponseText)
	return dom
}