Autoit ie ile aldığım verileri inetread ile alıp Listeye Nasıl aktarabilirim

Programlama ve Script dilleri konusunda bilgi paylaşım alanıdır.
Cevapla
darendeli
Byte4
Byte4
Mesajlar: 195
Kayıt: 06 Haz 2016, 16:55
Teşekkür etti: 1 kez
Teşekkür edildi: 6 kez

Autoit ie ile aldığım verileri inetread ile alıp Listeye Nasıl aktarabilirim

Mesaj gönderen darendeli »

Selamun Aleykum Öncelikle Bayadır Yoktum Tekrar Sorularla Baslıyorum inş. Simdiden Teşekkürler

Kod: Tümünü seç

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

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" Then
        $aTableData = _IETableWriteToArray ($oTable, True)
        _ArrayDisplay($aTableData)
        ExitLoop
    Else
        ConsoleWrite($index & ":  [" & $oTable.className & "]" & @CR)
        $index += 1
    EndIf
Next
ConsoleWrite($index & ":END [" & $oTable.className & "]" & @CR)
darendeli
Byte4
Byte4
Mesajlar: 195
Kayıt: 06 Haz 2016, 16:55
Teşekkür etti: 1 kez
Teşekkür edildi: 6 kez

Re: Autoit ie ile aldığım verileri inetread ile alıp Listeye Nasıl aktarabilirim

Mesaj gönderen darendeli »

Kod: Tümünü seç

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <Array.au3>
#include <Date.au3>
#include <String.au3>



#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 615, 437, 192, 124)
$Button2 = GUICtrlCreateButton("Button1", 16, 16, 219, 41)
$List1 = GUICtrlCreateList("", 16, 64, 585, 344)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button2
			_BSA()
	EndSwitch
WEnd




Func _BSA()
Local $oIE = BinaryToString(InetRead("https://tr.tradingview.com/markets/stocks-turkey/market-movers-large-cap/"))
$oTables =_StringBetween ($oIE, '<table class>','</table>')
GUICtrlSetData($List1,$oTables)
EndFunc
Bu şekilde bir deneme yaptım fakat yine olmadı
Cevapla

“Programlama ve Script dilleri” sayfasına dön