1 
Set resultClasses = IeUsps.document.getElementsByTagName("FRAME") 
    For Each resultClass In resultClasses 
        MsgBox resultClass.Name 
    Set resultClasses1 = IeUsps.document.getElementsByTagName("form")           
         For Each resultClass1 In resultClasses1     
            MsgBox resultClass1.Name    
        Next resultClass1        
 Next resultClass

上記のコードがあります。上記を実行すると、フレームのすべての名前を表示できますが、各フレーム内のフォームは表示されません。その必要なフォーム内のフレーム、そのいくつかの入力タグ内にアクセスする必要があります。助けてください。

4

2 に答える 2

0

私は少し前にまったく同じ問題を抱えていました。ボタンを押した後にフレームからデータにアクセスする場合は、ページが読み込まれるまで待つ必要があります。ボタンを押した後、コードに次を追加するだけです。

    Dim Bongeszo As InternetExplorer
    Do
    Application.Wait DateAdd("s", 0.1, Now)
    Loop Until Bongeszo.document.readyState = "complete"

ページが読み込まれるのを待った後、フレーム内のすべての情報にアクセスできました。それがあなたを助けたかどうか私たちに知らせてください。

于 2014-08-11T20:08:50.867 に答える