VB应用程序怎样得到网页的返回值?
VB应用程序怎样得到网页的返回值?网页是php脚本创建的,能接收VB程序post上来的值,然后对该值进行一定的超值,然后返回一个结果,现在我想让VB程序能获取返回的值,怎...
VB应用程序怎样得到网页的返回值?网页是php脚本创建的,能接收VB程序post上来的值,然后对该值进行一定的超值,然后返回一个结果,现在我想让VB程序能获取返回的值,怎么实现?
请问
multiple1902:
XMLHTTP组件在哪?我的是企业版的,怎么没看到?
yoya0303:
按照你的方法,我获取到的网页返回值是<html><body>欢迎!</body></html>,我想让vb弹出一个对话框,显示"欢迎!"这几个字符而已,应该这么做?
谢谢大家:)回答了继续加分 展开
请问
multiple1902:
XMLHTTP组件在哪?我的是企业版的,怎么没看到?
yoya0303:
按照你的方法,我获取到的网页返回值是<html><body>欢迎!</body></html>,我想让vb弹出一个对话框,显示"欢迎!"这几个字符而已,应该这么做?
谢谢大家:)回答了继续加分 展开
3个回答
展开全部
可以用Inet控件或者XMLHTTP组件
Dim HTTP
Set HTTP=CreateObject("MSXML2.XMLHTTP")
With HTTP
.open "POST",LoginPageURL,False
.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
.send "POST信息：aaa=bbb&ccc=ddd"
Msgbox .getresponsetext
End With
Dim HTTP
Set HTTP=CreateObject("MSXML2.XMLHTTP")
With HTTP
.open "POST",LoginPageURL,False
.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
.send "POST信息：aaa=bbb&ccc=ddd"
Msgbox .getresponsetext
End With
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
可以用Inet控件或者XMLHTTP组件
Dim HTTP
Set HTTP=CreateObject("MSXML2.XMLHTTP")
With HTTP
.open "POST",LoginPageURL,False
.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
.send "POST信息：aaa=bbb&ccc=ddd"
Msgbox .getresponsetext
End With
Dim HTTP
Set HTTP=CreateObject("MSXML2.XMLHTTP")
With HTTP
.open "POST",LoginPageURL,False
.setRequestHeader "Content-Type","application/x-www-form-urlencoded"
.send "POST信息：aaa=bbb&ccc=ddd"
Msgbox .getresponsetext
End With
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
部件- internet transfer control
协议设为http
a准备post的数据
Dim a as string,b as string ,url as string
a=1
url="www.163.com?a=" & a & ""
b=inet1.open(url)
do while inet1.stillexecuting =true
doevents
loop
b就是post数据后通过网页的反回值
协议设为http
a准备post的数据
Dim a as string,b as string ,url as string
a=1
url="www.163.com?a=" & a & ""
b=inet1.open(url)
do while inet1.stillexecuting =true
doevents
loop
b就是post数据后通过网页的反回值
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
