Что нового

Копирование текста с сайта в файл

Tiberium6

Новичок
Сообщения
51
Репутация
0
Здравствуйте, не могу с сайта вывести текст, именно это значение THIIZ4WAOF-JCHA-7953 и записать в файл, выводит весь текст но само значение THIIZ4WAOF-JCHA-7953 не выводит.

код на странице сайта.
Код:
<div class="promo-code">
<input class="input-promo-code" type="text" readonly="" value="THIIZ4WAOF-JCHA-7953">https://elitedrop.ru/<div class="heading">ЕЖЕДНЕВНЫЙ ПРОМОКОД</div>
<div class="desc">Успей активировать ежедневный промокод! Их количество ограничено!</div>		                    
<a class="btn-signle" href="#">скопировать</a>
<div class="code-left">Осталось <span style="color: rgb(255, 0, 0);">0</span> из <span>3500</span> промокодов на сегодня</div>
</div>

Код:
#include <IE.au3>
#include <file.au3>
$sUrl= 'https://elitedrop.ru/'
$oIE = _IECreate($sUrl, 0, 1, 0)
_IELoadWaitTimeout(5000)
_IELoadWait($oIE)

;~     $sText = $oIE.document.getElementsByClassName('entry-content').item(0).InnerText

$sText = ""
$elems = _IETagNameGetCollection($oIE, "div")
If IsObj($elems) Then
For $elem In $elems
If StringInStr($elem.className, "promo-code") Then
$sText = $elem.innerTEXT
ExitLoop
EndIf
Next
EndIf
MsgBox(0, "text", $sText)
_FileWriteLog(@ScriptDir & "\text.txt", $sText)
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Код:
$elems = _IETagNameGetCollection($oIE, "input")
;...
If StringInStr($elem.className, "input-promo-code") Then
;...
$sText = $elem.value
 
Верх