asp post请求 

 1 Function SendSms(mobiles,content)                    
 2     url="username="mobile="&mobiles&"&content="&content
 3     Set   HttpReq   =  Server.CreateObject("Microsoft.XMLHTTP") 
 4     HttpReq.open "post", "http://XXXX.XXX", False,"",""
 5     HttpReq.setRequestHeader "Content-Length",len(url)
 6     HttpReq.setRequestHeader "Content-Type", "application/x-www-form-urlencoded;charset=UTF-8"
 7     url=URLEncoding(url)
 8     HttpReq.send(url)
 9     str=HttpReq.responseText
10     ' response.Write parseJSON(str).code
11     if parseJSON(str).code=0 Then
12     response.Write "发送成功"
13     else
14     response.Write "发送失败"
15     end If
16 End Function

 

posted @ 2018-12-10 15:08  搬码道人  阅读(3013)  评论(0)    收藏  举报