Lottozahlen von lotto.de abrufen

[Popov]

Ok, wie gesagt, ist noch zu früh.

Also wenn das so nicht geht, dann entweder die Funktionen selbst auswerten oder den Browsertext filtern.

[Gutelo]

Auch wenn es anders geht, wuerde ich doch gerne wissen wie man das generell machen kann wenn Javascript verwendet wird.

[Neutral General]

Ich hatte mir die Lottozahlen damals von einer anderen Seite runtergeladen.
Ohne nachzugucken kann ich dir auswendig aber nicht mehr sagen wo das war...

[Perlsau]

Als ich letztes Jahr meine Lottoanwendung zusammengestrickt hatte, nahm ich mir viel Zeit, um die besten Aktualisierungsseiten herauszufinden und die Orte, wo man das Ganze auch ohne HTML-Parserei runterladen kann.

Fazit: Es gibt zwar CSV- und Excel-Archive zum Runterladen, aber die werden wohl nicht immer zeitnah gepflegt. Ich hab mich dann nach vielem Herumprobieren für diese Seite entschieden: Da ist alles drin, was ich brauche, auch die Gewinnquoten und die Anzahl der Gewinner usw.

[Gutelo]

Danke Perlsau,

ich hab jetzt eine erste Rumpfimplementation. Fuer diejenigen die es interessiert hier das Grundgeruest:

Code:

procedure TMainForm.Button2Click(Sender: TObject);
var sl: TStringList;    // Store Webpage Source Code
    RegExStr : String;  // Search Expression
    RegEx : TRegEx;     // Expression Evaluation Class
    MatchCollection : TMatchCollection;  //Store all Determined Matches
    i: Integer;
    LottoNumbers : String;
begin
  // Read Lotto Webpage
  sl:=TStringList.Create;
  sl.Text := IdHttp1.Get('http://www.sachsenlotto.de/mskp/user/lottoresults/lottoresultsshow.do?ziehungsDatum=18.12.2013#');
  // Get numbers 1 to 6 and store them in MatchCollection
  RegExStr := '<span class="lottonumberbig">(\d*)</span>';
  RegEx := TRegEx.Create(RegExStr,[roSingleLine,roIgnoreCase]);
  MatchCollection := RegEx.Matches(sl.text);
  // if six numbers found then plot results
  if MatchCollection.Count = 6 then
  begin
    LottoNumbers := 'Zahlen: ';
    for i := 1 to 6 do
    begin
      LottoNumbers := LottoNumbers + MatchCollection.Item[i-1].Groups[1].Value + ', ';
    end;
    Showmessage(LottoNumbers);
  end
  else
    begin
    Showmessage('Error: No Lotto numbers found!');
    end;

  // Get Superzahl and store it in MatchCollection
  RegExStr := '<span class="extralottonumberbig">(\d*)</span>';
  RegEx := TRegEx.Create(RegExStr,[roSingleLine,roIgnoreCase]);
  MatchCollection := RegEx.Matches(sl.text);
  // if one number found then plot Superzahl
  if MatchCollection.Count = 1 then
  begin
    Showmessage('Superzahl: ' + MatchCollection.Item[0].Groups[1].Value);
  end;
end;

Das Datum in der URL kann gegen jedes beliebiges Datum von vergangenen Ziehungen ausgetauscht werden und man erhaelt so alle Zahlen von 1955 bis heute.

Viel Spass damit

Gutelo

[vagtler]

Ich will ja kein Spielverderber sein, aber hat sich mal jemand bei den Anbietern erkundigt, ob solch eine Vorgehensweise rechtens ist?

Ich zitiere hier mal exemplarisch aus den Nutzerhinweisen von www.sachsenlotto.de:

Zitat:

Urheber- und Markenrechte
Die Inhalte (Bilder oder Texte) und/oder die graphische Gestaltung dieser Website sind urheber- bzw. markenrechtlich geschützt. Kein Teil der graphischen Gestaltung dieser Website darf ohne schriftliche Zustimmung der Sächsischen LOTTO-GmbH in irgendeiner Form weiterverwendet werden. Gleiches gilt für die Inhalte, soweit diese nicht ausdrücklich für die öffentliche Information und Berichterstattung und deren Weiterverbreitung vorgesehen sind bzw. wenn deren Nutzung über die urheberrechtlich zulässige und erlaubte Verwendung hinausgeht.

Ich möchte zwar den Teufel nicht an die Wand malen und wo kein Kläger da kein Richter, aber dennoch halte ich die Veröffentlichung von Quelltext zum Screen bzw. Web Scraping zumindest für nicht unkritisch - auch nicht für den hiesigen Forenbetreiber.

[Daniel]

Das Hinweis ist völlig richtig und natürlich wird sich jeder Entwickler mit der Frage befassen müssen, ob er die gewünschten Inhalte überhaupt nutzen darf. Sofern es sich um die reinen Lotto-Zahlen handelt, mag es sein, dass deren Verwendung durch "öffentliche Information und Berichterstattung" abgedeckt ist, aber selbst das sollte man sich kurz bestätigen lassen.

[Perlsau]

Meiner Ansicht stellt privates Speichern der Daten eine "urheberrechtlich zulässige und erlaubte Verwendung" dar: Keine kommerzielle Verwendung, kein Schaden für die Lottogesellschaft. Ob ich die Daten jetzt zweimal die Woche abtippe, um sie in der DB zu archivieren, oder automatisch eintragen lasse, dürfte keine Rolle spielen.

Zitat von vagtler:

Ich will ja kein Spielverderber sein, aber hat sich mal jemand bei den Anbietern erkundigt, ob solch eine Vorgehensweise rechtens ist?

Du verdirbst aber hier ganz klar das Spiel, und du weißt das auch, weswegen du auch diesen Halbsatz voranstellen mußt. Dasselbe unten:

Zitat von vagtler:

Ich möchte zwar den Teufel nicht an die Wand malen und wo kein Kläger da kein Richter, aber dennoch halte ich die Veröffentlichung von Quelltext zum Screen bzw. Web Scraping zumindest für nicht unkritisch - auch nicht für den hiesigen Forenbetreiber.

Du malst hier jedoch ganz entgegen deiner Beteuerung den Teufel an die Wand und rufst laut nach dem Forenbetreiber. Vielleicht solltest du dich mal als Abmahn-Anwalt bewerben, die suchen immer solche Leute ...