Question

vb6 post提交表单数据

求 vb6 post方式提交表单数据

假设网址： http://test1/index.php
POST数据： MENU 200
code 1540
JOB VOTE
发现朋友们回答的问题 百度知道不能显示出来。 请发到信箱742874707@qq.com 谢谢， 选定后在赠送积分。 怎么回事匿名回答呢，百度的问题吧

Answer 1

Dim xmlhttp
Set xmlhttp = CreateObject("msxml2.xmlhttp")
With xmlhttp
.open "POST", "填写上面假设的网址", False
.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
.send "MENU=200&code=1540&JOB=VOTE"
MsgBox .responseText '显示POST之后网页返回的结果
End With
Set xmlhttp = Nothing

Answer 2

这个问题很专业，我不太懂，但我提供一个思路，我在学VBA时，经常遇到问题到论坛中去求助，版主都是非常热心的，你也可以到相应的论坛中求助，一定会有热心的版主帮你的。助你成功！