主题：[求助][讨论]如何代码实现模拟点击网页按钮？？？

文档：http://msdn.microsoft.com/zh-cn/library/system.windows.forms.htmldocument.aspx

 
Dim web As New System.Windows.Forms.WebBrowser()
web.Navigate("http://www.foxtable.com")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop

' 自己取数据
Dim elems As System.Windows.Forms.HtmlElementCollection
Elems = web.Document.GetElementsByTagName("META")   '根据标签得到数据集合
For Each elem As System.Windows.Forms.HtmlElement In Elems
    Dim NameStr As String = elem.GetAttribute("name")   '得到属性
    If ((NameStr IsNot Nothing) And (NameStr.Length <> 0)) Then
        If NameStr.ToLower().Equals("description") Then
            Dim ContentStr As String = elem.GetAttribute("content")
            MessageBox.Show("Document: " & web.Url.ToString() & vbCrLf & "Description: " & ContentStr)
        End If
    End If
Next

 找到网页的那一个form，然后submit一下，网上挺多这样的教程，自己搜一下。

简单弄了一下，具体看代码。楼主要用这个东西做什么坏事吗？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:模拟单击.table

此主题相关图片如下：qq截图20121016100305.png