проверить кучу данных - PullRequest
Новая
       7

проверить кучу данных

1 голос
/ 29 марта 2020

поэтому у меня есть много разных данных, которые нужно сравнить на сайте, я объясняю это глубоко

пример данных

, поэтому у меня есть на go на веб-сайт вставьте a1 на box1 вставьте b1 на box2 и вставьте c1 на box3 сайта, на котором есть recaptcha (я не спрашиваю, могу ли я обойти или нет, я знаю, что мне придется решить это сам, так что Если мой сценарий, приложение или что-то еще должно было бы ждать, пока я не решу капчу как , показанную здесь , то это приведет к новой странице с определенным фрагментом текста , в этом случае приложение макроса или что-то еще должно опубликовать в d1 что-то вроде INVALID, тогда оно должно быть перезапущено, но на этот раз возьмите столбец 2 ie a2 b2 c2 d2. Я читал, что лучший способ добиться этого - делать это в VBA, и я попытался следовать учебным пособиям и так далее, но я, кажется, не совсем понимаю это ... пожалуйста, помогите

, что я пробовал, это: 

    Sub ListaNominal()

Dim IE As Object
Dim doc As HTMLDocument

Set IE = CreateObject("InternetExplorer.Application")
IE.Visible = True
IE.navigate "xxxxxxxxxxxxxxx/"

Do While IE.Busy Or IE.readyState <> 4
Application.Wait DateAdd("s", 1, Now)
Loop

Set doc = IE.document
IE.document.getElementById("claveElector").Value = GTLPAL73052511H600
doc.getElementById("numeroEmision").Value = 2
doc.getElementById("ocr").Value = 1121035022017#
MsgBox "Click to go on", , "Example"


Set element = doc.getElementsByClassName("col-xs-6 col-sm-8 table-responsive")("VALIDA")


ThisWorkbook.Sheets("Hoja1").Range("d1").Value = element

End Sub

но doestn, кажется, работает даже с трудным закодированное значение мой друг сказал мне, что, возможно, VBA будет очень сложно, что я должен попробовать CSV-файл вместе с приложением Autofill Chrome, но я не понимаю, как это сделать, любая помощь будет оценена

...