返回列表 上一主題 發帖

網頁填寫

回復 3# ssooi



    Set itemlist = IE.document.getElementsByClassName("quantumWizMenuPaperselectOption")

For Each Item In itemlist
                If Item.getAttribute("data-value") Like "PM" Then  '下午
                    Item.classList.Add ("isSelected")
                    Item.setAttribute "aria-selected", "true"
                    Item.setAttribute "tabindex", "0"
                Else
                    Item.classList.Remove ("isSelected")
                    Item.setAttribute "aria-selected", "false"
                    Item.setAttribute "tabindex", "-1"
                End If
Next

TOP

        靜思自在 : 修行要繫緣修心,藉事練心,隨處養心。
返回列表 上一主題