时间戳 = 时间_取现行时间戳 (真)planText = “orderno=” + 讯订单 + “,secret=” + 讯密钥 + “,timestamp=” + 时间戳 MD5_planText = 校验_取md5 (到字节集 (planText ), 真, )winHttp. SetIgnoreError ()winHttp. Open (“post”, “https://www.uhuitong.com/app/login”, 真)winHttp. SetProxy (“forward.xdaili.cn:80”)winHttp. SetRequestHeader (“Cookie”, “”)winHttp. SetRequestHeader (“Proxy-Authorization”, “sign=” + MD5_planText + “&orderno=” + 讯订单 + “×tamp=” + 时间戳 )winHttp. SetRequestHeader (“Content-Type”, “application/x-www-form-urlencoded”)winHttp. Send (post )winHttp. WaitForResponse (30 )网页源文件 = winHttp. GetResponseTextUtf8ToAnsi ()
|