12/01/08 10:50:37.63 Rn7jJzWy0
ブラウザ開いて画面をスクロールしたいと考えていますが
最後のスクロールだけできません。
間違いを教えていただけないでしょうか？
Dim ObjIE = CreateOleObj("InternetExplorer.Application")
ObjIE.Visible = True
ObjIE.Navigate("URLﾘﾝｸ(www.yahoo.co.jp)")
Repeat
Sleep(0.2)
Until !ObjIE.Busy and ObjIE.ReadyState = 4 // IEの表示待ち
TITLE = GETID("yahoo")
CTRLWIN(TITLE, ACTIVATE)
CTRLWIN(TITLE, MAX)
Sleep(0.2)
KBD(VK_NEXT,CLICK,3) //PAGEDOWN