====== 4.2 Leggere Dati con VBA ======

Recuperare dati tabella tramite REST API.

===== Esempio Completo =====

<code vb>
Sub CaricaClienti()
    Dim http As Object
    Dim url As String
    Dim json As String

    url = "http://localhost:5000/api/v1/dsn/demo/tables/Customers?$top=10"

    Set http = CreateObject("MSXML2.XMLHTTP")
    http.Open "GET", url, False
    http.setRequestHeader "Accept", "application/json"
    http.send

    If http.Status = 200 Then
        json = http.responseText
        Debug.Print json
    Else
        MsgBox "Errore: " & http.Status
    End If
End Sub
</code>

===== Con Filtro =====

<code vb>
url = "http://localhost:5000/api/v1/dsn/demo/tables/Customers" & _
      "?$filter=Country eq 'Germany'&$orderby=Name"
</code>

===== URL-Encoding =====

I caratteri speciali nel filtro devono essere codificati:

<code vb>
filter = Application.EncodeURL("Country eq 'Germany'")
</code>