小编Nil*_*ils的帖子

网站无法识别我的输入[如何从VBA手动触发IE dom事件]

我想自动购买gdax.但我在Amount窗口中的输入无法识别.我可以在小字段上看到,它说:Total (LTC) ? 0.00000000

我的代码:

Sub test()

    Dim ObjIE As New InternetExplorer
    Dim Ohtml As HTMLDocument
    Dim HTMLtags As IHTMLElementCollection
    Dim HTMLtag As IHTMLElement
    Dim HTMLobjekt As IHTMLElement
    Dim item_limit As Object
    Dim y As Integer

    With ObjIE
        .Visible = True
        .navigate "https://www.gdax.com/trade/LTC-EUR"
        Do Until .readyState = READYSTATE_COMPLETE: Loop
        Set Ohtml = .document
    End With

    'Amount
    Do
        Set HTMLtags = Ohtml.getElementsByClassName("OrderForm_input-box_XkGmi")
        DoEvents
    Loop While HTMLtags.Length = 0
    For Each HTMLtag In HTMLtags
        If HTMLtag.Children(1).innerText = "EUR" Then
            Set HTMLobjekt …
Run Code Online (Sandbox Code Playgroud)

javascript internet-explorer vba web-scraping dom-events

15
推荐指数
2
解决办法
1555
查看次数