Kod: Tümünü seç
Func _GA()
Local $darendeliiii = "Gün Sonu Kapanış Verileri"
Local $darendelii = 64
Local $darendeli = " | | | | | | | | | | | | "
Local $oIE = _IECreate("https://www.turkishbulls.com/SignalList.aspx?lang=tr&Country=tr&MarketSymbol=IMKB", 0, 0, 1, 0)
$oTables =_IETagNameGetCollection ($oIE, "table")
$index = 0
For $oTable in $oTables
$sText = $oTable.className
If String ($oTable.className) = "dxgvTable" Or String ($oTable.className)="dxgvTable dxgvRBB" Then ;dxgvTable dxgvRBB
$aTableData = _IETableWriteToArray ($oTable, True)
$iIndex = _ArraySearch($aTableData, $darendeliiii, Default, Default, Default, 1)
If Not @error Then
_ArrayDelete($aTableData, $iIndex)
EndIf
_ArrayDisplay($aTableData,"Darendeli (Genel Analiz)" & " Analiz Saati ===> " & _NowTime(),Default, $darendelii, Default,$darendeli)
ExitLoop
Else
ConsoleWrite($index & ": [" & $oTable.className & "]" & @CR)
$index += 1
EndIf
Next
ConsoleWrite($index & ":END [" & $oTable.className & "]" & @CR)
EndFunc
