Capture Betfair Charts

[Realrocknrolla]

No worries. I will.

Check the market is in guardian for it to have a full effect and record all data.

[Anbell]

No worries. I will.

Check the market is in guardian for it to have a full effect and record all data.

Yeah - I've had it in guardian, looking at the final 5 minutes, but it's not doing what I want/expect it to do

[Realrocknrolla]

No worries. I will.

Check the market is in guardian for it to have a full effect and record all data.

Yeah - I've had it in guardian, looking at the final 5 minutes, but it's not doing what I want/expect it to do

Which markets? As in sports?

[ODPaul82]

I put this code together which from inspecting the byte data it does start to download a jpg based image but the file size is larger than if I was to just download the image directly from betfair. At a guess it's because it's not logged into betfair that it doesn't like it.

Feel free to play with it

Code: Select all

Private Const URL_MAIN As String = "https://xtsd.betfair.com/LoadRunnerInfoChartAction/"


' https://xtsd.betfair.com/LoadRunnerInfoChartAction/?marketId=180655630&selectionId=127991
' Paul Arrowsmith
' 03.04.2021
Public Sub gFetchChart(ByVal pstrMarketID As String, _
                       ByVal pstrSelID As String)
    
    Dim strURL As String
    Dim objWs As Excel.Worksheet
    Dim strFile As String
    Dim b As Byte
    Dim lngFileID As Long
    
    Dim xmlRequest As Object
    Set xmlRequest = CreateObject("MSXML2.XMLHTTP")
     
    strURL = URL_MAIN & "?marketId=" & pstrMarketID & "&selectionId=" & pstrSelID
    
    ' Request the hyperlink that generates the betfair graph
    
    xmlRequest.Open "GET", strURL, False
    xmlRequest.setRequestHeader "Content-Type", "image/jpg"
    xmlRequest.send
    
    ' Need to wait to ensure everything downloads
    Do While xmlRequest.readyState <> 4
        DoEvents
    Loop

    
    ' Get file ref, kill file if it already exists and then write out new file
    lngFileID = FreeFile
    If Dir("D:\Trading\BF Download Test\" & pstrMarketID & ".jpg") <> "" Then Kill "D:\Trading\BF Download Test\" & pstrMarketID & ".jpg"
    
    Open "D:\Trading\BF Download Test\" & pstrMarketID & ".jpg" For Binary As #lngFileID
    Put #lngFileID, , xmlRequest.responseBody
    Close #lngFileID
    
    Set xmlRequest = Nothing
    
       
'    Set objWs = ThisWorkbook.Worksheets("Market Charts")
'    objWs.Shapes.AddPicture strURL, msoTrue, msoTrue, 100, 100, 100, 100
    'Set xmlRequest = Nothing
    
End Sub

[Derek27]

It seems to be a software app like BA so it would need to

They don't need to place bets to access charts. It seems a lot of trust/permissions just to download Betfair charts that are free anyway!

The app places bets too

Fair point. I shouldn't try to read posts when trading Rosehill.

[Derek27]

Some pretty bold claims there for what charts can tell you, and do people seriously click through this? !!!!
Screenshot_3.png

They forgot to ask for permission to withdraw funds from your account!

Not for me that one. It amazes me that people still use BF charts. They are absolutely pony compared to what you can build in the advanced charts.

Attention to detail goes along way.

viewtopic.php?f=67&t=22921

Try this. You can adjust time frames accordingly.

Cheers RRR, I'll take a look at that.

[robsmith]

Thanks guys and thanks to Paul especially for the code

[Derek27]

Thanks guys and thanks to Paul especially for the code

+1, I'll experiment with that as well.