WebBrowser で特定のテーブルからリンクを取得するには？

クリス 2003-11-16 01:31:06 No: 109976

現在 Webページ全体のハイパーリンクと目的とするテーブルのテキストを取得し、
お互いの文字列を比較することによって、特定のテーブルのリンクと判断する処理を行っていますが、
もっとスマートにテーブル内のみのリンクを取得したくて、下記のように記述してみたところ、うまくいきません。
    Dim objTables As Object
    Dim objTable  As Object
    Set objTables = WebBrowser1.Document.getElementsByTagName("TABLE")
        For i = 0 To objTables(1).links.Length - 1
            Debug.Print objTables(1).links(i).outerText
            Debug.Print objTables(1).links(i).href
        Next i
皆様のお知恵を貸して頂けないでしょうか？宜しくお願いします。

クリス 2003-11-16 11:01:50 No: 109977

環境を書き忘れました。VB6 SP5を使用しています。
質問が分かりにくくて、すいません。
宜しくお願いします。