Проблема извлечения платы за передачу данных с веб-сайта

Я сталкиваюсь с проблемой, когда пытаюсь нажать кнопку с помощью VBA/HTML. Когда я ввожу данные в текстовое поле, я нажимаю «Ввод» или кнопку «Поиск», но кнопка щелчка не работает. Пожалуйста, помогите Большое спасибо

Веб-сайт: https://sellercentral.amazon.fr/fba/profitabilitycalculator/index?lang=en_GB

Мой код VBA:

Set IEDoc = IE.document
Set DOCelement = IEDoc.getElementById("search-string")
DOCelement.Value = "5010993370528"

Set DOCelement = IEDoc.getElementById("a-autoid-1")
DOCelement.submit

введите описание изображения здесь

Элемент "a-autoid-1" является кнопкой отправки. Вы можете «Отправить» «Форму»

— 22.04.2019 12:33

Спасибо Tanmay, но это все еще не работает. Этот же код работает, но страница не взимает плату. Я поставил это: Set IEDoc = IE.document Set DOCelement = IEDoc.getElementById("search-string") DOCelement.Value = "5010993370528" Set DOCelement = IEDoc.getElementById("search-form") DOCelement.submit Я предполагаю, что есть является скрытой областью. Спасибо за помощь

— 22.04.2019 22:51

html excel vba

22.04.2019 09:14

Улучшение производительности загрузки с помощью Google Tag Manager и атрибута Defer

В настоящее время производительность загрузки веб-сайта имеет решающее значение не только для удобства пользователей, но и для ранжирования в...

Введение в CSS

CSS является неотъемлемой частью трех основных составляющих front-end веб-разработки.

Как выровнять Div по центру?

Чтобы выровнять элемент <div>по горизонтали и вертикали с помощью CSS, можно использовать комбинацию свойств и значений CSS. Вот несколько методов,...

Навигация по приложениям React: Исчерпывающее руководство по React Router

React Router стала незаменимой библиотекой для создания одностраничных приложений с навигацией в React. В этой статье блога мы подробно рассмотрим...

Система управления парковками с использованием HTML, CSS и JavaScript

Веб-сайт по управлению парковками был создан с использованием HTML, CSS и JavaScript. Это простой сайт, ничего вычурного. Основная цель -...

Toor - Ангулярный шаблон для бронирования путешествий

Toor - Travel Booking Angular Template один из лучших Travel & Tour booking template in the world. 30+ валидированных HTML5 страниц, которые помогут...

Перейти к ответу Данный вопрос помечен как решенный

Ответы 2

Спасибо Tanmay, но это все еще не работает. Этот же код работает, но страница не взимает плату. Я поставил это:

Set IEDoc = IE.document
Set DOCelement = IEDoc.getElementById("search-string")
DOCelement.Value = "5010993370528"

Set DOCelement = IEDoc.getElementById("search-form")
DOCelement.submit

Я предполагаю, что есть скрытая область. Спасибо за твою помощь

22.04.2019 16:14

Ответ принят как подходящий

Приведенный ниже код опробован и протестирован в IE11.

Sub amazon()
    On Error GoTo Errors
        Dim ie As Object
        Set ie = CreateObject("InternetExplorer.Application")
        ie.navigate "https://sellercentral.amazon.fr/fba/profitabilitycalculator/index?lang=en_GB"
        ie.Visible = True
        Application.Wait Now + #12:00:05 AM#

        Set IEDoc = ie.document
        Set DOCelement = IEDoc.getElementById("search-string")
        DOCelement.Focus
        DOCelement.Click
        Application.Wait Now + #12:00:01 AM#
        DOCelement.Value = "5010993370528"

        Set DOCelement = IEDoc.getElementById("a-autoid-1").getelementsbytagname("input")(0)
        DOCelement.Click
        Application.Wait Now + #12:00:05 AM#
Errors:
        MsgBox Err.Description
End Sub

Фокус и щелчок необходимы, иначе текст будет выделен серым цветом.

23.04.2019 05:50