これは、すべてのページがダウンロードされるまで待機します。内のすべてのページをループ
Do Until WaitProperty = Argument
print "Wait. Progress "&Progress
wait 3 'wait 3 seconds
Progress = Progress+"." 'add a period to show progress
Set ObjColl = MyBrowser.ChildObjects(WObj)
WaitProperty = cstr(ObjColl(t).GetROProperty(Arg4)) 'get the object property
Loop
よう
Browser().Page().Sync
あなたがオブジェクト(複数可)の性質のためにしたい場合はこれを変更するには、特定のオブジェクト
Browser().Page().Object().Waitproperty
を待ちます、ループそれ、ブラウザ:
'Get Pages count:
Set browserObject = Description.Create
browserObject("micclass").Value = "Browser"
GetBrowserCount = Desktop.ChildObjects(browserObject).Count
'loop and sync (or any other methods):
for i = 0 to GetBrowserCount-1
browser().page("micclass:=Page","CreationTime:="&i,"Title:=.*").Sync
next
それぞれのブラウザ'オブジェクトを読み込み、ロードする前にロードされていることを確認しますか? – Dave
はい。どうしたらいいですか? – bugfinder