在循环中发送多个http post请求

时间:2015-04-20 01:12:44

标签: http post vbscript

如何在请求标头中请求循环?
我有一整天的交易存储在我的数据库中 我的服务器会将所有这些值发送到另一台服务器以更新付款状态。

我的VBScript代码。

 do while not abc.eof sUrl = "https:/abc.com"

            sRequest = "ID="&escape(a)&"&CODE="&escape(b)&"&NAME="&(strEncrypted)


            HTTPPost sUrl, sRequest         Function HTTPPost(sUrl, sRequest)
              Set oHTTP=Server.CreateObject("Msxml2.ServerXMLHTTP.6.0")
              oHTTP.setOption 2, 13056
              oHTTP.open "POST", sUrl,false
              oHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
              oHTTP.setRequestHeader "Content-Length", Len(sRequest)
              oHTTP.send sRequest
              HTTPPost = oHTTP.responseText
             End Function    abc.movenext      loop

1 个答案:

答案 0 :(得分:0)

Funcion(...)必须在Do While(...)

之外