Ho un problema con questo codice(l'url è casuale non è quello che userò):

codice:
<%
URL = "http://www.html.it"
Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objXMLHTTP.Open "Get", URL, False
objXMLHTTP.Send
testoHTML = CStr(objXMLHTTP.ResponseStream)
Set xml = Nothing

response.write(testoHTML)
%>
mi dà questo errore

codice:
Microsoft VBScript runtime error '800a000d' 

Type mismatch: 'CStr' 

/prova3.asp, line 6
sapete dirmi perchè?

se tolgo il CStr mi dice che l'errore "type mismatch" è alla riga 0