“Klasyczny ASP Zdobądź JSON z URL” Kod odpowiedzi

Klasyczny ASP Zdobądź JSON z URL

Dim objSrvHTTP
Set objSrvHTTP = Server.CreateObject ("Msxml2.ServerXMLHTTP.6.0") 
   objSrvHTTP.open "GET", "https://example.com/outputJson.php", false
   objSrvHTTP.send
   Response.ContentType = "text/html"
Response.Write(objSrvHTTP.responseText)