- 572 名前：名無しさん＠お腹いっぱい。 mailto:sage [2012/01/08(日) 10:50:37.63 ID:Rn7jJzWy0]
- ブラウザ開いて画面をスクロールしたいと考えていますが
最後のスクロールだけできません。
間違いを教えていただけないでしょうか？
Dim ObjIE = CreateOleObj("InternetExplorer.Application")
ObjIE.Visible = True
ObjIE.Navigate("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
