我的法典正在做罚款,直到一把它转移到另一个拥有防火墙的服务器。 其后,我的法典的某些部分没有发挥作用。 这似乎是一个xml-http POST问题。 请允许我指出正确的方向,以及如何确定防火墙是否是问题。 我的客户坚持要求我使用传统的手法,因此不能升级到网。
Dim objHttp
SUBMIT_URL = "http://www.abc.com/confirm.asp"
Call Process()
Public Sub Process()
set objHttp = Server.CreateObject("Microsoft.XMLHTTP")
set the timeout values in milliseconds
lResolve = 1 * 1000
lConnect = 1 * 1000
lSend = 2 * 1000
lReceive = 2 * 1000
objHttp.open "POST", SUBMIT_URL, false
objHttp.setRequestHeader "Content-type", "application/x-www-form-urlencoded"
objHttp.Send str
if err.number <> 0 then
Response.Write "Error : " & err.Description
err.Clear
end if
End Sub