Set XmlDocument = Server.CreateObject(\"Msxml2.DOMDocument.3.0\")
XmlDocument.SetProperty \"ServerHTTPRequest\", True
XmlDocument.
SelectSingleNode("price/text()") selects the text node (the "body" if you will) inside the tag. The nested text node doesn't have an attribute avail. Also, GetAttribute() doesn't return an object, so you must not use the Set keyword there.
Change this:
Set title = Item.SelectSingleNode("title/text()")
S_title = Trim(title.data)
Set price = Item.SelectSingleNode("price/text()")
S_price = Trim(price.data)
response.Write S_title & S_price
Set Objavail = PRICE.GetAttribute("avail")
S_avail = Objavail.value
response.Write S_avail &"
"
into this:
Set title = Item.SelectSingleNode("title")
S_title = Trim(title.text)
Set price = Item.SelectSingleNode("price")
S_price = Trim(price.text)
response.Write S_title & S_price
S_avail = price.GetAttribute("avail")
response.Write S_avail &"
"