submit form data using XML2, possible to add doevents loop, exitif dl not poss?

[Mike Scirocco]

I'm using XML to submit form data and download the results returned by
the server. I'd like to add a loop that includes Doevents while waiting
for the download to take place, and I'd like to watch for an error value
that would tell me the download can't be completed. Right now the
program just hangs until the download completes, and if the server is
down the download never completes. Is it possible to add a doevents loop
and trap errors when using XML2?

TIA,
Mike

Set XML = CreateObject("MSXML2.XMLHTTP")
XML.open "POST", url, False
XML.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
XML.send "action=xxx&Type=yyy&ZipCode=00000&RefNum=12345678 9"
ResultString = XML.responseText