Board logo

标题: xmlhttp POST后怎么看不见登录网页? [打印本页]

作者: bd123456789     时间: 2010-7-22 13:13    标题: xmlhttp POST后怎么看不见登录网页?

Dim xmlhttp
Set xmlhttp = CreateObject("msxml2.xmlhttp")
With xmlhttp
.open "POST", "http://www.hnlib.com/", False
.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
.send "tbUid=000&tbPwd=59"
MsgBox .responseText '显示POST之后网页返回的结果
End With
Set xmlhttp = Nothing