请教个网络投票的事情，急。
没办法，属于ZHENGZHI任务。请谅解。投票处理地址：http://app2.vote.cntv.cn/makeVoteAction.do?voteId=11332
1、如何直接处理该地址而不打开网页或也不在VB WEB控件中打开。
2、如何判断IP重复提交和统计成功与失败。
IP地址我采用循环拨号的方式，这个先不用管，只是解决投票的问题就可以了。谢谢。 --------------------编程问答-------------------- 用Microsoft Internet Transfer Control 控件 --------------------编程问答-------------------- 用了，然后如何判断是否成功？ --------------------编程问答-------------------- 你得提供原始网址吧？ --------------------编程问答--------------------
Public Function Vote() As String
Dim Http As Object
Dim URL As String, Data As String
On Error Resume Next '设置错误捕获,超时,或者网站错误之类的问题就省得他报告了
URL = "http://www.google.com/"
Data = "" '如果是Post数据的,那把Data填起来,比如 Data="a=12&b=adsdf&c=999"
Set Http = CreateObject("WinHttp.WinHttpRequest.5.1")
With Http
.Option(6) = False '忽略重定向错误和SSL警告用的
.Option(4) = 13056
If Len(Data) > 0 Then
.Open "POST", URL
.send Data
Else
.Open "GET", URL
.send
End If
Vote = .ResponseText '返回的数据就是投票之后返回的网页数据,判断是不是成功就分析一下这里边的文本内容吧
End With
Set Http = Nothing
End Function
补充：VB , 网络编程
