Wie kann ich mich mit einem API-Server verbinden und eine JSON-Query senden?

a.b_om · 21. November 2019, 12:27

Hallo Community,

Ich schlage mal eine andere Richtung ein. Ich mache jetzt eine Übung mit API. Mein Ziel ist,
dass man den Abfahrtsort und Ankunftsort eingeben kann, und so alle Zugverbindungen dazu bekommt.

Das GUI und die Query ist fertig.

Wie kann ich diese Query jetzt zum API-Server schicken?
Diese Daten, die ich zurückbekomme, soll auch einer Liste/ein Array gespeichert werden.

Mein Querybeispiel:
transport.opendata.ch/v1/conne…?from=Luzern&to=Dallenwil

Das Array sollte ca. so aussehen:

Zugart(IR, S4, S1, etc.)	Abfahrtsort	Ankunftsort	Abfahrtszeit	Ankunftszeit
IR	Luzern	Dallenwil	12:10	12:27
S4	Luzern	Dallenwil	12:26	12:58
IR	Luzern	Dallenwil	13:10	13:27
...	...	...	...	...

C.O.D.E · 21. November 2019, 12:37

VB.NET-Quellcode

Dim wc As New System.Net.WebClient
Dim s As String = wc.DownloadString("http://transport.opendata.ch/v1/connections?from=" & Textbox1.Text & "&to=" & Textbox2.Text)

Der JSON ist dann in der Variable S.

a.b_om · 21. November 2019, 12:42

@C.O.D.E
Ich bekomme nachher das:
{"connections":[],"from":null,"to":null,"stations":{"from":[],"to":[]}}

Wo sind die Daten und so?
Wenn ich auf den Link klicke, der ich gepostet habe, bekomme ich fast alle Daten

Edit:
Dass das JSON ist, weiss ich, aber wie bekomme ich die Daten in eine Liste/ein Array, der so angeordnet ist, wie im 1. Post erklärt?

C.O.D.E · 21. November 2019, 12:47

Nein, funktioniert eindeutig.

Und zum Thema Array: Du musst die Dateien entweder parsen (Substring, Split ect) oder du holst dir einen json-reader!

-> Vielleicht hilft dir das: stackoverflow.com/questions/38…e-json-and-read-in-vb-net

RodFromGermany · 21. November 2019, 12:48

a.b_om schrieb:

Ich bekomme nachher das:

Sieh Dir mal den Connectionstring an, bevor Du ihn losschickst. Ich denke mal, der ist nicht in Ordnung.

a.b_om · 21. November 2019, 12:51

@RodFromGermany
Danke, jetzt habe ich es korrigiert.

@C.O.D.E
Aber wie kann ich das splitten, oder wie bekomme ich den Reader?

Es ist das erste mal, dass ich etwas mit API mache.

Es zu splitten, denke ich, ist es zu riskant, weil es zu viele Daten dort sind und ich den Aufbau von dort nicht überschaubar finde.

EaranMaleasi · 21. November 2019, 13:28

Dafür ist die Klasse HttpClient in System.Net.Http da.
Du musst die Funktion .GetStringAsync() aufrufen, und schon hast du nen JSON-String.

Als erstes öffnest du jedoch mal die Query im Browser und kopierst die Rohdaten hier her:
json2csharp.com/
Die Seite erzeugt dir alle nötigen Klassen, die du deinem Projekt hinzufügst.

Als nächstes installierst du das NuGet JSON.NET (Newtonsoft.Json).
Nun jagst du das, was du aus .GetStringAsync() bekommst, durch JsonConvert.DeserializeObject<RootObject>() und hast dadurch alles was du brauchst in einem RootObject Objekt.
Mithilfe eines Browsers kannst du dir dann die Daten die du brauchst raussuchen und darstellen:

a.b_om · 21. November 2019, 13:30

Ich habe herausgefunden, dass jeder Datensatz mit {"station": anfängt, wie kann ich danach den JSON splitten?

Edit:
@EaranMaleasi
Sorry dein Post zu spät gesehen.

Edit2:
Sorry für die vielen Edits, kann keine Antworten schreiben, bis eine gewisse Zeit abgelaufen ist.
@EaranMaleasi

NuGet installiert
Klassen hinzugefügt

Was ist mit .GetStringAsync()?
Wie und wo muss ich das machen?
Wie gehts weiter? Ich mache das eben zum ersten Mal!

Mein jetztiger ProjektCode:

Spoiler anzeigen

VB.NET-Quellcode

Imports System.IO
Imports System.Net
Imports System.Text
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
label5.Text = ""
label6.Text = ""
label7.Text = ""
label8.Text = ""
label9.Text = ""
label10.Text = ""
End Sub
Private Sub button1_Click(sender As Object, e As EventArgs) Handles button1.Click
Try
Dim wc As New System.Net.WebClient
Dim s As String = wc.DownloadString("http://transport.opendata.ch/v1/connections?from=" & textBox1.Text & "&to=" & textBox2.Text)
Dim sArray As Array = s.Split("station")
TextBox3.Text = s
Catch ex As Exception
End Try
End Sub
End Class
Public Class Coordinate
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Station
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate
Public Property distance As Object
End Class
Public Class Prognosis
Public Property platform As Object
Public Property arrival As Object
Public Property departure As DateTime?
Public Property capacity1st As Object
Public Property capacity2nd As Object
End Class
Public Class Coordinate2
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Location
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate2
Public Property distance As Object
End Class
Public Class From
Public Property station As Station
Public Property arrival As Object
Public Property arrivalTimestamp As Object
Public Property departure As DateTime
Public Property departureTimestamp As Integer
Public Property delay As Integer?
Public Property platform As String
Public Property prognosis As Prognosis
Public Property realtimeAvailability As Object
Public Property location As Location
End Class
Public Class Coordinate3
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Station2
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate3
Public Property distance As Object
End Class
Public Class Prognosis2
Public Property platform As Object
Public Property arrival As Object
Public Property departure As Object
Public Property capacity1st As Object
Public Property capacity2nd As Object
End Class
Public Class Coordinate4
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Location2
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate4
Public Property distance As Object
End Class
Public Class [To]
Public Property station As Station2
Public Property arrival As DateTime
Public Property arrivalTimestamp As Integer
Public Property departure As Object
Public Property departureTimestamp As Object
Public Property delay As Object
Public Property platform As String
Public Property prognosis As Prognosis2
Public Property realtimeAvailability As Object
Public Property location As Location2
End Class
Public Class Coordinate5
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Station3
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate5
Public Property distance As Object
End Class
Public Class Prognosis3
Public Property platform As Object
Public Property arrival As DateTime?
Public Property departure As DateTime?
Public Property capacity1st As Object
Public Property capacity2nd As Object
End Class
Public Class Coordinate6
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Location3
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate6
Public Property distance As Object
End Class
Public Class PassList
Public Property station As Station3
Public Property arrival As DateTime?
Public Property arrivalTimestamp As Integer?
Public Property departure As DateTime?
Public Property departureTimestamp As Integer?
Public Property delay As Integer?
Public Property platform As String
Public Property prognosis As Prognosis3
Public Property realtimeAvailability As Object
Public Property location As Location3
End Class
Public Class Journey
Public Property name As String
Public Property category As String
Public Property subcategory As Object
Public Property categoryCode As Object
Public Property number As String
Public Property [operator] As String
Public Property [to] As String
Public Property passList As List(Of PassList)
Public Property capacity1st As Object
Public Property capacity2nd As Object
End Class
Public Class Coordinate7
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Station4
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate7
Public Property distance As Object
End Class
Public Class Prognosis4
Public Property platform As Object
Public Property arrival As Object
Public Property departure As DateTime?
Public Property capacity1st As Object
Public Property capacity2nd As Object
End Class
Public Class Coordinate8
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Location4
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate8
Public Property distance As Object
End Class
Public Class Departure
Public Property station As Station4
Public Property arrival As Object
Public Property arrivalTimestamp As Object
Public Property departure As DateTime
Public Property departureTimestamp As Integer
Public Property delay As Integer?
Public Property platform As String
Public Property prognosis As Prognosis4
Public Property realtimeAvailability As Object
Public Property location As Location4
End Class
Public Class Coordinate9
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Station5
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate9
Public Property distance As Object
End Class
Public Class Prognosis5
Public Property platform As Object
Public Property arrival As DateTime?
Public Property departure As Object
Public Property capacity1st As Object
Public Property capacity2nd As Object
End Class
Public Class Coordinate10
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class Location5
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate10
Public Property distance As Object
End Class
Public Class Arrival
Public Property station As Station5
Public Property arrival As DateTime
Public Property arrivalTimestamp As Integer
Public Property departure As Object
Public Property departureTimestamp As Object
Public Property delay As Integer?
Public Property platform As String
Public Property prognosis As Prognosis5
Public Property realtimeAvailability As Object
Public Property location As Location5
End Class
Public Class Section
Public Property journey As Journey
Public Property walk As Object
Public Property departure As Departure
Public Property arrival As Arrival
End Class
Public Class Connection
Public Property from As From
Public Property [to] As [To]
Public Property duration As String
Public Property transfers As Integer
Public Property service As Object
Public Property products As List(Of String)
Public Property capacity1st As Object
Public Property capacity2nd As Object
Public Property sections As List(Of Section)
End Class
Public Class Coordinate11
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class From2
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate11
Public Property distance As Object
End Class
Public Class Coordinate12
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class To2
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate12
Public Property distance As Object
End Class
Public Class Coordinate13
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class From3
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate13
Public Property distance As Object
End Class
Public Class Coordinate14
Public Property type As String
Public Property x As Double
Public Property y As Double
End Class
Public Class To3
Public Property id As String
Public Property name As String
Public Property score As Object
Public Property coordinate As Coordinate14
Public Property distance As Object
End Class
Public Class Stations
Public Property from As List(Of From3)
Public Property [to] As List(Of To3)
End Class
Public Class RootObject
Public Property connections As List(Of Connection)
Public Property from As From2
Public Property [to] As To2
Public Property stations As Stations
End Class

Ich weiss, viel Code. Ist es normal, dass es jetzt eine Station-Klasse, eine Station1-Klasse, eine Station2-Klasse, etc. hat?

EaranMaleasi · 21. November 2019, 13:48

a.b_om schrieb:

Was ist mit .GetStringAsync()?

Schon meinen Post aufmerksam lesen. Du benutzt ja auch den WebClient, den @C.O.D.E vorgeschlagen hat, der hat diese Funktion natürlich nicht, kommt aber zum selben Ergebnis, ein string, der Json enthält.

a.b_om schrieb:

Ich weiss, viel Code. Ist es normal, dass es jetzt eine Station-Klasse, eine Station1-Klasse, eine Station2-Klasse, etc. hat?

Bei dem erzeugten Json leider ja. Natürlich könntest du, nachdem du alle Daten die du brauchst gefunden hast, alle Klassen die du nicht brauchst, und die Properties die auf diese Klassen verweisen entfernen.

a.b_om · 21. November 2019, 13:53

@EaranMaleasi
Und wie?

Wenn ich einen Punkt mache und es anfange zu schreiben, wird es mir nicht vorgeschlagen.

Ich weiss, dass ich gerade ein vollkommener Noob bin. Entweder das, oder ich stehe auf dem Schlauch.

Edit
@EaranMaleasi
Ich hab das mit .GetStringAsync geschafft, aber wie geht es weiter. Der nächste Schritt funktioniert nicht. Auch die Anzeige ist mir föllig unklar

a.b_om · 21. November 2019, 15:10

Ok, jetzt hat es auch geklappt. Wie bekomme ich jetzt den 1., 2. und den 3. Ankunfts-/Abfahrtszeit in verschiedenen variablen?

VB.NET-Quellcode

Dim wc As New System.Net.WebClient
Dim s As String = wc.DownloadString("http://transport.opendata.ch/v1/connections?from=" & textBox1.Text & "&to=" & textBox2.Text)
Dim journey = JsonConvert.DeserializeObject(Of RootObject)(s)

EaranMaleasi · 22. November 2019, 13:20

In journey.connections findest du die Verbindungen.

Hier mal, der Code meiner Konsole

C#-Quellcode

int pad = 15;
Trainz trainz = JsonConvert.DeserializeObject<Trainz>(json);
//Console.WriteLine($"|{"".PadRight(pad * 5 + 4, '=')}|");
Console.WriteLine($"|{"Zugart".PadRight(pad)}" +
$"|{"Abfahrtsort".PadRight(pad)}" +
$"|{"Ankunftsort".PadRight(pad)}" +
$"|{"Abfahrtszeit".PadRight(pad)}" +
$"|{"Ankunftszeit".PadRight(pad)}|");
foreach (Connection item in trainz.connections)
{
Console.WriteLine($"|{"".PadRight(pad * 5 + 4, '=')}|");
Console.WriteLine($"|{item.products[0].PadRight(pad)}" +
$"|{item.from.station.name.PadRight(pad)}" +
$"|{item.to.station.name.PadRight(pad)}" +
$"|{item.from.departure.ToString("HH:mm").PadRight(pad)}" +
$"|{item.to.arrival.ToString("HH:mm").PadRight(pad)}|");
}
Console.WriteLine($"|{"".PadRight(pad * 5 + 4, '=')}|");
Console.ReadKey(true);

Zum Verständnis ich habe die Klasse RootObject in Trainz umbenannt, sonst aber nicht berührt.

Wie du siehst, musst du nur durch die Connections iterieren, und bekommst dann alle Daten.

Das habe ich gefunden, indem ich die Query einfach mit dem FireFox abgesetzt habe, und der dann, neben der Rohdatenansicht, auch diese Ansicht bietet:

(Ich gehe einfach mal davon aus, dass Chrome usw. ähnliche Ansichten bieten)
Da die Klassen die du hinzugefügt hast 1:1 die JSON Elemente abbilden, musst du jetzt einfach nur noch die entsprechenden Properties abrufen und schon hast du deine Daten.

a.b_om · 27. November 2019, 11:20

Ich werde es ausprobieren und melde mich danach wieder.

a.b_om · 5. Dezember 2019, 08:41

Es funzte

Danke

Wie kann ich mich mit einem API-Server verbinden und eine JSON-Query senden?

Wie kann ich mich mit einem API-Server verbinden und eine JSON-Query senden?

VB.NET-Quellcode

a.b_om schrieb:

VB.NET-Quellcode

a.b_om schrieb:

a.b_om schrieb:

VB.NET-Quellcode

C#-Quellcode

Tags

Ähnliche Themen

4 Benutzer haben hier geschrieben