msxml3.dll Access Denied

Question

I have the following code:

Function filejson(json) 
  Dim objStream, strData 
  Set objStream = CreateObject(\"ADODB.S         


        

Answer 1

Also can change URL from http to https. Me helps