使用VBA進入(透過帳號,密碼)網頁後,左邊有視窗選項,要先點選第一層後,接著會出現5個選項,總共要點二次才帶入日期輸入,此網頁是frameset>frame>架構? 如下:
< frameset >
< frame scr="menu.jsp" name="left" scrolling="auto" noresize>*
< li clas"closed collapsable">
< div class="hitarea closed-hiterarea"> </ div>
< li/>
dim c as object
set c=ie.document.contentwindow.document("left").
getElementsByClassName("hitarea closed-hiterarea")(0)
c.click
第二層選項則為: herf javaScrpipt
< a herf="javascripting;submitForm('modules/mm/fx/fx_query')"class>abcdef < /a>
dim b , a as variant
set b=ie.document.contentwindow.document("left").getElementsBytagename("a")
for each a in b
if a.innertext="abcdef" then
a.click
點選二層後, 要輸入日期
< input id="start-date" name="start-date"
ie.document.contentwindow.document("left").doc.getElementById("start-date").value="2019/11/29"
想請教我的程式碼那裡有問題,苦惱~,感謝各位的幫忙
請再試試看
dim c as object
set c = ie.document.getElementsByClassName("hitarea closed-hiterarea")(0)
c.click
dim a, b
set b = ie.document.getElementsBytagename("a")
for each a in b
if a.innertext="abcdef" then
a.click
exit for
enf if
next a
IE.Document.getElementById("start-date").value="2019/11/29"
謝謝pacheng0111回覆。
第一和第二段都出現Run-time error
Object doesnt support this property or method
(似乎抓不到或判斷不出frame)
第三段則是出現Run-time- error(424)
感覺就是frameset and frame那段出了問題???
我調整過請再試試看
第一段c=nothing
第二段 b=object /a=empty
想特別提出來的是=frame裡面的 name="left"
D=ie.document.getelementsbyname("left")
這裡的D__[objectHTMLFrameElement]