无法完成JSON数据发送

向远程服务器发送JSON数据时，我收到一个错误（远程服务器返回了一个错误500。Internet服务器错误）：下面是代码

如果我在本地系统上运行代码，它就会工作

请帮助我解决此问题。

Dim request As HttpWebRequest = CType(WebRequest.Create("http://www.xxx.xom/rec/jsonrw/jsonwrite.php"), HttpWebRequest)
request.Method = "POST"
request.ContentType = "application/json"
request.ContentLength = json.Length
Dim streamWriter As New StreamWriter(request.GetRequestStream())
streamWriter.Write(json)
streamWriter.Close()
Dim httpResponse = CType(request.GetResponse(), HttpWebResponse)
Dim s As String
s = httpResponse.ToString

---

信息太少，无法帮助您。内部服务器错误500是服务器错误的集合状态代码。乍一看，不可能看出故障的实际位置。您只需了解：服务器报告意外错误。您需要（至少）添加Information，告诉他们您要将数据发送到哪种服务器，以及json的实际外观。即使这样，也不能保证人们能够帮助你，但至少他们有机会。如果您控制服务器，我建议您查看其日志文件，您的答案很可能就在那里。我正在连接到GoDaddy中的数据库，数据看起来像{“dsResBooking”：[{“GSTNAM”：“NEERAJ SHARMA先生”，“userid”：“SUNITA”，“GRPNAM”：“PRPCOD”：“JNP”，“ROMTYP”：“PLC”}]}我的php API，是否需要在HttpWebRequest中添加RequestVerificationToken头。我还没试过这个。