用webbrowser代替在页面上登录

yue 2002-07-23 08:06:31
我想通过程序代替在页面上登录的过程,它发送的地址和内容我都跟踪服装下来,但就是无法成功,这是这么回事?代码如下:
Dim postdata As String
Dim vPost As Variant
Dim sURL As String
Dim sHeaders As String
Dim lFlags As Long

lFlags = 0
sHeaders = "Content-Type: application/x-www-form-urlencoded" & vbCrLf
postdata = "login=2&mobile=abcd&passwd=11111&user=abcd&x=20&y=6"
vPost = StrConv(postdata, vbFromUnicode)
sURL = "http://sms.sina.com.cn/cgi-bin/sms/sinauserlogin.cgi"
WebBrowser1.Navigate sURL, lFlags, "", vPost, sHeaders
运行后,webbrower显示仍然停留在登录页面,没有登录成功。
...全文
50 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

7,786

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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