在线等待，关于浏览器的问题，100分

在vb里设置了浏览器控件，如何把浏览器里网页里的组合框选择指定项目，如何按下浏览器里的按钮？帮帮我

解决方案 »

  1.   

    http://www.applevb.com/qa/qa000257.htm
      

  2.   

    对于select差不多，只要将If UCase(vDoc.All(i).tagName) = "INPUT" Then
    改为If UCase(vDoc.All(i).tagName) = "SELECT" Then
    其它的判断差不多。
      

  3.   

    按下浏览器按纽不好办,但是可以通过程序来实现按下了网页上某个按钮的功能.具体如何做,要看按下那个按钮做了什么了,是POST还是连接一个站点,或者其它....
      

  4.   

    to:： 3661512(菜鸟一只) 
    asp的网页，应该是用post发送数据的
      

  5.   

    一起studying
    顶
    还有人有建议吗？
      

  6.   

    谁知道模拟按下网页的按钮怎么写代码？那个按钮是post的
      

  7.   

    ok了，谢谢你，已经解决了，能再附带问一个吗？如何把网页里面的table里面的文字取出来？
      

  8.   

    关于HTTP的POST,你可以参考微软的Knowledge Base(http://support.microsoft.com/)的文章：“Q167706 IX: Internet Transfer Control 5.0 "POST" Request Doesn't Work”。 (如何实现POST方法)http://support.microsoft.com/support/kb/articles/Q167/7/06.asp
      

  9.   

    假设你的HTML中的Table是这样的：<BODY>
    <TABLE id=oTable border=1>
    <TR><TH>1&nbsp;</TH><TH>2&nbsp;</TH><TH>3&nbsp;</TH><TH>4&nbsp;</TH></TR>
    <TR><TD>5&nbsp;</TD><TD>6&nbsp;</TD><TD>7&nbsp;</TD><TD>8&nbsp;</TD></TR>
    <TR><TD>9&nbsp;</TD><TD>0&nbsp;</TD><TD>&nbsp;</TD><TD>&nbsp;</TD></TR>
    </TABLE>
    </BODY>那么在webbrowser中就可以这样获得table中的内容：    Dim i, j
        
        For i = 0 To WebBrowser1.Document.All.oTable.rows.length - 1
            For j = 0 To WebBrowser1.Document.All.oTable.rows(i).cells.length - 1
                Debug.Print WebBrowser1.Document.All.oTable.rows(i).cells(j).innerText,
            Next j
            Debug.Print
        Next i