用serverXMLHTTP怎么登录访问HTTPS站点??

晓疯馋曰 2005-09-21 04:57:10
下面是访问esales.163.com的代码:
function PostData(strurl,strPostData,mReferer)
dim mXmlHttp
set mXmlHttp=Server.CreateObject("Msxml2.ServerXMLHTTP")
mXmlHttp.open "POST",strurl,false
'mXmlHttp.setOption 2,13056 '忽略所有的SSL错误
'mXmlHttp.setOption 3,"VeriSign Class 3 Public Primary CA"
mXmlHttp.setRequestHeader "Accept", "image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-shockwave-flash, */*"
mXmlHttp.setRequestHeader "Referer", mReferer
mXmlHttp.setRequestHeader "Accept-Language","zh-cn"
' mXmlHttp.setRequestHeader "SOAPAction","https://secure-cn.imrworldwide.com"
mXmlHttp.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
mXmlHttp.setRequestHeader "UA-CPU","x86"
mXmlHttp.setRequestHeader "Accept-Encoding","gzip, deflate"
mXmlHttp.setRequestHeader "User-Agent","Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; SV1; .NET CLR 1.1.4322)"
mXmlHttp.setRequestHeader "Host","secsite.163.com"
mXmlHttp.setRequestHeader "Content-Length","62"
mXmlHttp.setRequestHeader "Connection","Keep-Alive"
mXmlHttp.setRequestHeader "Cache-Control","no-cache"
mXmlHttp.send strPostData
PostData=mXmlHttp.responseBody
end function

str=PostData("https://secsite.163.com/cgi-bin/login","comname=cqslzhao&pass=zhaoming&username=&admin=0&a=login&Submit=+","http://esales.163.com/")

返回"访问超时,请重新登录".
把定义 set mXmlHttp=Server.CreateObject("Msxml2.ServerXMLHTTP")
改为 set mXmlHttp=Server.CreateObject("Microsoft.XMLHTTP")
能够成功登录.
现在我要实现多用户,必需用serverXMLHTTP吧.
请问用serverXMLHTTP还要设置什么地方??

先谢谢了!
...全文
530 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
晓疯馋曰 2005-09-23
  • 打赏
  • 举报
回复
???????????
晓疯馋曰 2005-09-23
  • 打赏
  • 举报
回复
继续来人帮我!!!
zwrtv 2005-09-23
  • 打赏
  • 举报
回复
学习下
晓疯馋曰 2005-09-23
  • 打赏
  • 举报
回复
来来
晓疯馋曰 2005-09-23
  • 打赏
  • 举报
回复
HELP
jim.ma 2005-09-22
  • 打赏
  • 举报
回复
mark
zhlym 2005-09-22
  • 打赏
  • 举报
回复
路过,看到,那这样https的证书都不用安装了吗? 那这样https还有什么意义了?
晓疯馋曰 2005-09-22
  • 打赏
  • 举报
回复
来人帮一下我呀
晓疯馋曰 2005-09-22
  • 打赏
  • 举报
回复
最后顶一次
晓疯馋曰 2005-09-22
  • 打赏
  • 举报
回复
怎样安装证书撒?
晓疯馋曰 2005-09-21
  • 打赏
  • 举报
回复
晕罗,楼上的,你用set mXmlHttp=Server.CreateObject("Msxml2.ServerXMLHTTP")
这个可以登录?????
tigerwen01 2005-09-21
  • 打赏
  • 举报
回复
我试了,可以登陆。

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧