webbrowserで<form>以外の場所のコントロールの取得

解決


T  2009-03-05 12:29:01  No: 141637  IP: 192.*.*.*

こんにちは

私は、webbrowserを使用するプログラムを作成しています。もう何日も考え込んでいます。
前後省略してありますが下記のVB6用プログラムにてform内のコントロールは取得できるのですが
<form></form>の中に入っていないコントロールを習得する方法がどうしてもわかりません。

objDocument.    →このあとにForm以外指定できるのでしょうか

Set objForm = objDocument.Forms(0)
              ↓
Set objForm = objDocument.All  
このようにしてもダメでした。


どなたかお教えいただけないでしょうか


<html ...>
  <head>
          
  </head>
  <body>
    <textarea>     →ここらへんにあるコントロール 
      ...........
    <form>
    </form>
  </body>
</html>

    Dim objDocument    As Object    
    Dim objForm        As Object    
    
    Dim objElement     As Object    
    Dim objElements    As Object    

    Set objDocument = Frmmain.WebBrowser1.Document
    Set objForm = objDocument.Forms(0)
    
    Set objElements = objForm.elements
       
    For Each objElement In objForm
  debug.print objElement.Name
    Next

    Set objElements = Nothing
    Set objForm = Nothing
    Set objDocument = Nothing

編集 削除
T  2009-03-05 20:17:33  No: 141638  IP: 192.*.*.*

もういちどいろいろ試して自己解決しました。

objDocument.All  で<form>に入っていないところもコントロールできました。

みなさまありがとうございました。

編集 削除