28,390
社区成员
发帖
与我相关
我的任务
分享
s=" {""touser"":""OPENID"", ""template_id"":""ngqIpbwh8bUfcSsECmogfXcV14J0tQlEpBO27izEYtY"",......."'自己整剩下的字符串
getHTTPPage("xxxxxx.asp",s)
function getHTTPPage(strurl,data)
set http = Server.CreateObject("Msxml2.ServerXMLHTTP")
http.Open "POST",strurl, false
Http.setRequestHeader "content-length", len(data)
http.Send(data)
getHTTPPage=http.responseText
set http=nothing
end function
getHTTPPage("xxxxxx.asp","你那串数据")