Visual Basic Foro

Programación => Visual Basic .NET / C# => Mensaje iniciado por: Baator en Diciembre 06, 2022, 04:22:51 am

Título: (.NET) Obtener información de archivo JSON.
Publicado por: Baator en Diciembre 06, 2022, 04:22:51 am

Hola chic@s, un placer.

Tengo un archivo JSON (https://api.coinbase.com/v2/prices/spot?currency=USD), del cual concretamente quiero obtener el fragmento del precio del Bitcoin (“amount”) y luego mostrarlo dentro de un TextBox. Parece que no poseo el conocimiento suficiente aún para hacerlo funcionar yo solo.

Les agradezco la ayuda. 🙂

Título: Re:(.NET) Obtener información de archivo JSON.
Publicado por: LeandroA en Diciembre 14, 2022, 11:42:05 pm

Hola existe algunos módulos para leer JSON, pero veo que para tu caso s un Json sencillo y podría pasearse con  algunas funciones

Código: [Seleccionar]

Private Sub Form_Load()
    Dim oXMLHTTP As Object
    Dim sURL As String
    Dim sJSON As String
    Dim lPos1 As Long, lPos2 As Long
   
    sURL = "https://api.coinbase.com/v2/prices/spot?currency=USD"
   

    Set oXMLHTTP = CreateObject("Microsoft.XMLHTTP")

    oXMLHTTP.Open "GET", sURL, False
    oXMLHTTP.send
   
    If oXMLHTTP.Status = 200 Then
        sJSON = oXMLHTTP.responseText
        lPos1 = InStrRev(sJSON, """:""")
        lPos2 = InStrRev(sJSON, """")

        Text1.Text = Mid$(sJSON, lPos1 + 3, lPos2 - lPos1 - 3)
    End If
End Sub

Título: Re:(.NET) Obtener información de archivo JSON.
Publicado por: ticosoft en Noviembre 22, 2023, 04:00:38 pm

Oye Leandro, genial este aporte.. fuiste mas certero en este momento que el mismo chatgpt