vb编程,inet控件的使用,post提交数据的格式 35
我想做个qq自动申请的软件,想使用inet控件来做,可惜不懂怎么使用,求大神教教!最好有实例,然后实例上有注释是最好的,谢谢!DimmyheadAsString,strU...
我想做个qq自动申请的软件,想使用inet控件来做,可惜不懂怎么使用,求大神教教!
最好有实例,然后实例上有注释是最好的,谢谢!
Dim myhead As String, strURL As String
strURL = "http://reg.qq.com/cgi-bin/getnum"
myhead = "Content-Type: application/x-www-form-urlencoded "
Inet1.Execute strURL, "post", RealPostData, myhead
RealPostData是提交的数据,这个数据怎么得到,我看不懂,求详细解答!
然后后面的myhead,只要这一个就行了吗,求Inet1.Execute具体用法,最好有实例!
Inet1.Execute “ ” , ”get“ 具体用法,得到什么?
Inet1.Execute “ ” , ”head“ 具体用法,得到什么?
这是我身上全部的财富值了,请高手好好教教我,很急!好人一生平安,谢谢。 展开
最好有实例,然后实例上有注释是最好的,谢谢!
Dim myhead As String, strURL As String
strURL = "http://reg.qq.com/cgi-bin/getnum"
myhead = "Content-Type: application/x-www-form-urlencoded "
Inet1.Execute strURL, "post", RealPostData, myhead
RealPostData是提交的数据,这个数据怎么得到,我看不懂,求详细解答!
然后后面的myhead,只要这一个就行了吗,求Inet1.Execute具体用法,最好有实例!
Inet1.Execute “ ” , ”get“ 具体用法,得到什么?
Inet1.Execute “ ” , ”head“ 具体用法,得到什么?
这是我身上全部的财富值了,请高手好好教教我,很急!好人一生平安,谢谢。 展开
展开全部
Public Function httpPost(strURL As String, strData As String, Inet As Object)
If Inet.StillExecuting Then Exit Function
Inet.Execute strURL, "POST", strData, "Content-Type: application/x-www-form-urlencoded"
Do While Inet.StillExecuting
DoEvents
Loop
httpPost = Inet.GetChunk(20000)
End Function
上面是一个inet post函数,这样调用:
httpPost('post网址','post内容',inet控件名)
如果是get的话:
inet1.openurl "get的网址"
你要做这个,首先你得看清楚QQ注册提交数据是post或get
要学会浏览器抓包工具..
另外QQ注册不是你想像的那么简单,
你要模仿人工输入,也就是说,填写资料的时候,都有向服务器发信息,以确认是机器人还是真人注册,
另外,你过得了验证码么?
过得了验证码,你过得了IP么?
If Inet.StillExecuting Then Exit Function
Inet.Execute strURL, "POST", strData, "Content-Type: application/x-www-form-urlencoded"
Do While Inet.StillExecuting
DoEvents
Loop
httpPost = Inet.GetChunk(20000)
End Function
上面是一个inet post函数,这样调用:
httpPost('post网址','post内容',inet控件名)
如果是get的话:
inet1.openurl "get的网址"
你要做这个,首先你得看清楚QQ注册提交数据是post或get
要学会浏览器抓包工具..
另外QQ注册不是你想像的那么简单,
你要模仿人工输入,也就是说,填写资料的时候,都有向服务器发信息,以确认是机器人还是真人注册,
另外,你过得了验证码么?
过得了验证码,你过得了IP么?
追问
首先谢谢你的回答!
验证码有验证码平台,ip可以自动断网重连的。
算了,这东西都是别人的核心技术,还是自己慢慢探索吧!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询