asp源码微信公众号拍照或从手机相册中选图接口上传jdk上传代码

原创于 2018-11-13 10:16:46 发布 · 1k 阅读

CC 4.0 BY-SA版权

本文详细介绍了如何使用VBA进行参数设置及通过Microsoft.XMLHTTP对象发送GET/POST请求的方法。深入探讨了VBA中参数设置的流程，包括参数的添加与移除，并演示了如何利用XMLHTTP对象实现URL请求，获取远程资源。

'设置参数值
Public Sub setParameter(parameter, parameterValue)
If parameters.Exists(parameter) = True Then
parameters.Remove(parameter)
End If
parameters.Add parameter, parameterValue
End Sub

'Microsoft.XMLHTTP
'Get/Post方法请求url,获取请求内容
Public Function RequestUrl(url,method,data)
Set XmlObj = Server.CreateObject(“Msxml2.ServerXMLHTTP.3.0”)
XmlObj.open method,url, false
XmlObj.send(data)
If XmlObj.Readystate=4 Then
RequestUrl = XmlObj.responseText
Else
Response.Write(“xmlhttp请求超时！”)
Response.End()
End If
Set XmlObj = nothing
End Function