Что нового

[Автоматизация] Автоматическое заполнение полей веб формы данными из файла txt

ARM2018

Новичок
Сообщения
2
Репутация
0
Нужна помощь за вознаграждение по автоматизации заполнения анкетных данных. Есть данные в txt файле в виде списка:
Сотрудник 1
Должность
Возраст
Стаж работы
Сотрудник 2
Должность
Возраст
... и т.д. по всем работникам
Нужно чтобы данные переносились на веб в соответствующие поля (браузер предпочтительно хром), которые не всегда находятся на одном месте. При появлении тех сообщение или новый новостей на сайте поля соответственно смещаются. Также имеются поля для выбора даты и времени в виде всплывающего календаря.
 

Matuin

Новичок
Сообщения
10
Репутация
0
добавьте скриншоты формы для всех возможных вариантов, а то не совсем ясна сложность задачи.
 

alex33

Скриптер
Сообщения
1 457
Репутация
184
UIAutomate
Код:
#include "UIAutomate.au3"
; Opt("MustDeclareVars", 1)

Local $chrome_dir = 'C:\Program Files\Google\Chrome\Application' ; папка, куда установлен chrome
Local $url = "http://example.org/mypage.html" ; адрес страницы
Run('"' & $chrome_dir & '\chrome.exe" ' & $url & ' --force-renderer-accessibility', $chrome_dir) ; запуск браузера

Local $hWnd = WinWait("[RegexpTitle: - Google Chrome]", "", 10) ; ждем окно
Local $oParent = _UIA_GetElementFromHandle($hWnd)

Local $hFile = FileOpen(@ScriptDir & "\file.txt", 0) ; открываем файл
; и в цикле последовательно читаем и заполняем форму
Local $oElem, $sLine
Local $bExitLoopFlag = False
While Not $bExitLoopFlag
	$oElem = _UIA_GetControlTypeElement($oParent, $UIA_EditControlTypeId, "Сотрудник: ")
	$sLine = FileReadLine($hFile)
	If @error = -1 Then $bExitLoopFlag = True
	_UIA_ElementSetFocus($oElem)
	_UIA_ElementTextSetValue($oElem, $sLine)

	$oElem = _UIA_GetControlTypeElement($oParent, $UIA_EditControlTypeId, "Должность: ")
	$sLine = FileReadLine($hFile)
	If @error = -1 Then $bExitLoopFlag = True
	_UIA_ElementSetFocus($oElem)
	_UIA_ElementTextSetValue($oElem, $sLine)

	$oElem = _UIA_GetControlTypeElement($oParent, $UIA_SpinnerControlTypeId, "Возраст: ")
	$sLine = FileReadLine($hFile)
	If @error = -1 Then $bExitLoopFlag = True
	_UIA_ElementSetFocus($oElem)
	_UIA_ElementTextSetValue($oElem, $sLine)

	$oElem = _UIA_GetControlTypeElement($oParent, $UIA_EditControlTypeId, "Стаж работы: ")
	$sLine = FileReadLine($hFile)
	If @error = -1 Then $bExitLoopFlag = True
	_UIA_ElementSetFocus($oElem)
	_UIA_ElementTextSetValue($oElem, $sLine)

	$oElem = _UIA_GetControlTypeElement($oParent, $UIA_ButtonControlTypeId, "Добавить")
	_UIA_ElementSetFocus($oElem)
	_UIA_ElementDoDefaultAction($oElem)
WEnd

FileClose($hFile)
 
Верх