<%
Function bytes2bstr(vin)
Dim objStream,result
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 2
objStream.Open
objStream.WriteText vin
objStream.Position = 0
objStream.Charset = "utf-8"'或者gb2312
objStream.Position = 2
result = objStream.ReadText
objStream.Close
Set objStream = Nothing
bytes2bstr = result
End function
Dim numCount : numCount = Request.TotalBytes
If numCount>0 Then
Response.Write(bytes2bstr(Request.BinaryRead(numCount)))
End If
%>注意，Request.BinaryRead和Request.Form互斥，使用一个后不能再使用另一个：
Request 对象 错误 'ASP 0207 : 80004005'
不能使用 Request.Form
/request.asp，行 30
调用 BinaryRead 之后，不能使用 Request.Form 集合。
Request 对象 错误 'ASP 0206 : 80004005'
不能调用 BinaryRead
/request.asp，行 32
使用 Request.Form 集合之后，不能调用 BinaryRead。
参考资料
[1].asp接收和解析post传递的json数据：https://blog.csdn.net/lanzengquan/article/details/123707971
评论（0）
暂无评论。