[Сеть, интернет] вытащить данные изменяющиеся данные из html

#include <IE.au3>
#include <Array.au3>

$http = "https://............"

Сheck()

Func Сheck()
	$oIE = _IECreate($http,'',0)
	_IELoadWait($oIE,100)

	Do
		Global $oLinks = _IETagNameGetCollection($oIE, 'text')
		Sleep(50)
	Until IsObj($oLinks)

	For $oLink In $oLinks
		If $oLink.getAttribute("class") == "pin_text" Then
			$sResult=$oLink.innertext
			MsgBox(0,'',$sResult)
		EndIf
	Next

	_IEQuit($oIE)
EndFunc

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <Array.au3>
$http = 'https://...'
$oIE = _IECreate($http,'',1)
_IELoadWait($oIE,50)
Global $mas[2]
Dim $y
Dim $sResult
Func sot()
while 1
   Do
	  Global $oLinks = _IETagNameGetCollection($oIE, 'text')
	  Sleep(10)
	  Until IsObj($oLinks)



		  For $oLink In $oLinks
		 If $oLink.getAttribute("class") == "pin_text"  Then
			For $i=0 To 1 step 1
			$mas[$i]=$oLink.innertext
			MsgBox(64, $mas[0], $mas[1])
		 Next
		  EndIf

;~ 		 MsgBox(64, $mas[0], $mas[1])

;~ 	  MsgBox(32, $mas[0], $mas[1])
   Next
WEnd
EndFunc

#Region ### START Koda GUI section ### Form=E:\Новая папка (2)\Новая папка (2)\Form1.kxf
$Form1 = GUICreate("Form1", 615, 437, 304, 172)
$Button1 = GUICtrlCreateButton("Старт", 128, 208, 115, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Form1
		Case $Button1
		  sot()
	EndSwitch
WEnd

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <Array.au3>
#Include <INet.au3>
$http = 'https://...'
$oIE = _IECreate($http,'',1)
_IELoadWait($oIE,50)
Global $i=0
Global $asResult

Global $HTML

Func sot()

while 1
   Do
	  Global $oLinks = _IETagNameGetCollection($oIE, 'text')
	  Sleep(3000)
	  Until IsObj($oLinks)

   For $oLink In $oLinks
	  If $oLink.getAttribute("class") == "pin_text"  Then
		$HTML=_INetGetSource($http)

		$asResult = StringRegExp($HTML, 'font-size: 14px; font-weight: bold; fill: #fff;" text-anchor="start" x="1413.34" y="2" dx="4" dy="3">(\d\d\d\d.\d\d\d)</text>', 1)
      
		 MsgBox(1, $asresult, $asresult)
EndIf





   Next

WEnd
;~    _IEQuit($oIE)
EndFunc

#Region ### START Koda GUI section ### Form=E:\Новая папка (2)\Новая папка (2)\Form1.kxf
$Form1 = GUICreate("Form1", 615, 437, 304, 172)
$Button1 = GUICtrlCreateButton("Старт", 128, 208, 115, 57)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit

		Case $Form1
		Case $Button1
		  sot()
	EndSwitch
WEnd