Filmdatenbank Internet abfragen

[schleicher]

Habe gesucht, aber nichts gefunden hier im Forum.
Wie kann man auf dem einfachsten Wege von einen Filmdatenbank im Web Informationen (Filmbeschreibung, Coverbild) abfragen und die Filmbeschreibung z.B. in einem Textgadget und das Cover in einem Imagegadget in Purebasic -Code darstellen ?

[ts-soft]

Einfach per API laden, z.B. von http://omdbapi.com/ per json oder xml.

[mk-soft]

Suche ich auch noch...

Aber mit Scannercode. Habe hier ein Handscanner aber noch keine Seite dafür gefunden.

[schleicher]

Einfach per API laden, z.B. von http://omdbapi.com/ per json oder xml.

Fast genau, was ich gesucht habe. Kann man die Filmbeschreibung auch in Deutsch bekommen ?

[ts-soft]

Die Datenbank ist 4-Sprachig, aber wo man das bestimmt, das ist mir nicht so klar, das wirste wohl selber rausfinden müssen.

Vielleicht ist diese ja einfacher: https://www.themoviedb.org/documentation/api

[schleicher]

Die Datenbank ist 4-Sprachig, aber wo man das bestimmt, das ist mir nicht so klar, das wirste wohl selber rausfinden müssen.

Konnte leider nichts finden, wie man da was auf deutsch bekommen könnte

Vielleicht ist diese ja einfacher: https://www.themoviedb.org/documentation/api

Auf Deutsch = ja aber einfacher = nein. Habe mich dort registriert und auch einen api-key bekommen, aber
wie setze ich das ganze nun in Purebasic um. Ich lerne immer am besten durch Beispiele. Wie rufe ich nun in PB Filminfos ab oder das Coverbild des Filmes ?

[Andesdaf]

Diese Dokumentation ist relativ umfangreich und auch mit Beispielabfragen ausgestattet.

[Kiffi]

als Starthilfe hier mal ein kleines Beispiel, um nach einem Film zu suchen:

Code: Alles auswählen

InitNetwork()

EnableExplicit

Structure sMovie
  vote_average.i
  overview.s
  original_language.s
  release_date.s
  original_title.s
  backdrop_path.s
  popularity.i
  poster_path.s
  title.s
  adult.i
  vote_count.i
  id.i
  video.i
  List genre_ids.i()
EndStructure

Structure sSearchResult
  total_results.i
  total_pages.i
  page.i
  List results.sMovie()
EndStructure

Define Movies.sSearchResult
Define ReturnValue.s
Define Buffer, Size

Define Movie.s  = "Matrix"
Define ApiKey.s = "DeinKey"

Buffer = ReceiveHTTPMemory("http://api.themoviedb.org/3/search/movie?api_key=" + ApiKey + "&language=de&query=" + URLEncoder(Movie))

If Buffer
  Size = MemorySize(Buffer)
  ReturnValue = PeekS(Buffer, Size, #PB_UTF8)
  ParseJSON(0, ReturnValue)
  ExtractJSONStructure(JSONValue(0), @Movies.sSearchResult, sSearchResult)
  FreeJSON(0)
  ForEach Movies\results()
    Debug Movies\results()\title
  Next
  FreeMemory(Buffer)
Else
  Debug "Failed"
EndIf

Für das weitere Vorgehen den Hinweis von Andesdaf beachten.

Grüße ... Peter

[schleicher]

Vielen Dank für die Hilfe. Leider funktioniert der Code be mir nicht.
Der Befehl ReceiveHTTPMemory( ist bei mir nicht vorhanden.

[RSBasic]

Du musst deine PureBasic-Version updaten.

Added: ReceiveHTTPMemory()