asp如何POST数据到HTTPS网站

[lzw858]

打开https的网站要弹出安全警告，将要使用证书，直接确定就可以了，
网站可以抓取数据，请问如何用ASP ,Post数据上去？

[lzw858]

Function GetBody() '飘易-获取远程IP地址POST信息
Set https = Server.CreateObject("MSXML2.XMLHTTP")
With https
.Open "Post", "https://ww.a.rvletSPEC.Login", False
.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
.Send "isIE=yes&jsON=on&PSWD=93&SMP=0&USER=zb&usertype=OPRM"
GetBody = .ResponseBody
End With
GetBody = BytesToBstr(GetBody,"GB2312")
Set https = Nothing
End Function

Function BytesToBstr(body,Cset) '转换GB2312
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function

Response.Write GetBody()

用这个代码测试了，只有HTTp成功，HTTPS就返回空白内容了

[Dogfish]

这个好像没有屏蔽掉那个警告的。