dom xml

olá, eu gostaria de imprimir toda a resposta xml desta chamada mas o método responseText não está funcionando.

Set xmlhttp = server.Createobject("MSXML2.XMLHTTP") xmlhttp.Open "POST", "http://localhost/appdata/functions.asmx/RecuperarLista" ,false xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" xmlhttp.setRequestHeader "Method", "POST" xmlhttp.send "RecuperarItens=true" ' ESTA RETORNANDO 0 Response.Write xmlhttp.responseXML.getElementsByTagName("Produto").length set objNodeList = xmlhttp.responseXML.getElementsByTagName("Produto") i = 1 For Each objNode In objNodeList Response.write i&"<br>"&VbCrLf i = i+1 Next set objNodeList = Nothing