Vbscript 在经典ASP中使用Microsoft.XMLHTTP发布JSON会导致空白内容

这让我困惑了一段时间。 我试图将JSON内容发布到webhook，但需要使用经典的ASP。 我可以使用jquery来完成，但需要在服务器端。 我还尝试过使用JScript，这导致了同样的问题。还尝试了一个单独的服务器

如果我将

Content-Type

设置为

application/x-www-form-urlencoded

，则该脚本基本上可以正常运行，但一旦我更改为

application/json

，内容就会消失（请求会使内容消失，因为我可以检查另一端的标题）

---

任何值得赞赏的想法，都很奇怪，因为我所做的只是更改

内容类型

标题

我真的不知道为什么，但它已经开始工作了

最初，我尝试通过stringify函数（如果你想用谷歌搜索的话，由Fabio Zendhi Nagao编写的json解析器）创建json字符串，并注意到它工作正常

但后来我注意到其他一些早期的测试也在起作用

目前，我将其归结为包括：

xmlhttp.setRequestHeader“接受”、“应用程序/json”

---

然而，这是在早期的测试中失败的-它现在正在工作，所以我没有抱怨：-）

您可以使用访问发布的json。感谢@SearchAndResQ的响应，这似乎是关于阅读响应的，我的问题是它根本没有发布任何内容。然而，它现在似乎正在工作（我的更新如下）

strEnvelope = "{""content"":""Serverside Test Post"",""embeds"": [{""description"":""Now to grab and extract content""}]}"
data = "content="&Server.URLEncode(strEnvelope)

dim xmlhttp 
set xmlhttp = server.Createobject("Microsoft.XMLHTTP")
xmlhttp.Open "POST","https://discordapp.com/api/webhooks/000000000000/key",false
'xmlhttp.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlhttp.setRequestHeader "Content-Type", "application/json"
xmlhttp.send(data)
Response.Write xmlhttp.ResponseText
Set xmlhttp = nothing