Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonnummern) (https://www.delphipraxis.net/52413-php-delphi-inverssuche-rueckwaertssuche-fuer-telefonnummern.html)

derpepe 29. Aug 2005 20:49


PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonnumme
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hallo,

ich habe soeben ein kleines Skript zusammengeschustert: Mit ihm kann man nach einer Telefonnummer suchen und bekommt die dazugehörige Adresse als Array zurück :-)
Das Ganze funktioniert über GoYellow.de, ich hoffe die sind mir nicht böse wenn ich deren Service hier verwende.
Der Code darf beliebig abgeändert werden und auch beliebig verwendet werden, lediglich der Copyright-Hinweis muss erhalten bleiben!

Ich würde mich freuen wenn sich jemand die Mühe macht das Ding nach Delphi zu portieren, wäre schön für meine Sammlung :-)

Falls nicht ist die Foren-Suche wieder um ein Stichwort schlauer, also nichts für ungut! :cheers:

Code:
<?php

//
// Inverssuche via 'goyellow.de'
//
// Copyright (c) 2005 Peter J. Schneider
// [url]www.raketenwerfer.de[/url]
//


define("NL", "
\n");


function get_name_by_number($number) {
   $url = 'http://www.goyellow.de/IDA2'.
      '?IDAERROR=&QRY=all&RNG=lequ&CTRY=ger&LANG=de&PAGE=telSearch'.
      '&LIP=telSearch&ACTION=search&STP=C&REQ=20&ZCD=&TEL='.
      urlencode($number);

   // Abfrage
   $file = fopen ($url, "r");
   if (!$file) {
      exit;
   }
   while (!feof ($file)) {
      $line = fgets ($file, 1024);
      if (eregi ("<div class=\"customer\">(.*)</div>", $line, $out)) {
         $customer = $out[1];
      }
      if (eregi ("<div class=\"street\">(.*)</div>", $line, $out)) {
         $street = $out[1];
      }
      if (eregi ("<div class=\"plzCity\">(.*)</div>", $line, $out)) {
         $plzCity = $out[1];
      }
   }
   fclose($file);

   return array($customer, $street, $plzCity);
}



$result = get_name_by_number($_GET['number']);

echo $result[0].NL;
echo $result[1].NL;
echo $result[2];

?>

Luckie 29. Aug 2005 21:24

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Hast du auch deren Genehmigung um deren Service zu nutzen?

jfheins 29. Aug 2005 21:28

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Ich bin jetzt kein Rechtsexperte, aber
Auszug aus den allgemeinen Nutzungsbedingungen:
Jede zweckfremde Nutzung, insbesondere die gewerbliche Auswertung der Informationen und jede gewerbliche Verwertung ist unzulässig, eine Nutzung oder Verarbeitung der ermittelten Daten ist im Übrigen nur unter den engen Voraussetzungen der datenschutzrechtlichen Bestimmungen, insbesondere des Bundesdatenschutzgesetzes, zulässig. Der Download von Adressdaten ist insbesondere nicht gestattet.


Hört sich nicht gerade danach an, als würden Sie dein Programm befürworten ;)

derpepe 29. Aug 2005 21:29

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Zitat:

Zitat von Luckie
Hast du auch deren Genehmigung um deren Service zu nutzen?

Ich nutze deren Service nicht, ich hab nur das Skript verbrochen.

Also zu Deiner Frage: nein.

Aber Du kannst die URL ja auch für "Das Örtliche" anpassen oder für was immer Du willst.

Wenn jemand diesen Service gebrauchen kann ist es natürlich an ihm mit der jeweiligen Firma einen Nutzungsvertrag abzuschließen bzw. erstmal die AGB des jeweiligen Services durchzulesen.

Andererseits glaube ich nicht dass die etwas dagegen haben solange Du deren Logo in Deiner Anwendung zeigst. Aber wie gesagt, selbst nachfragen ist immer besser.


Außerdem ist das Skriptchen nicht als produktive Funktion gedacht, sondern eher als "proof of concept".

derpepe 29. Aug 2005 21:34

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Zitat:

Zitat von jfheins
Ich bin jetzt kein Rechtsexperte, aber
Auszug aus den allgemeinen Nutzungsbedingungen:
Jede zweckfremde Nutzung, insbesondere die gewerbliche Auswertung der Informationen und jede gewerbliche Verwertung ist unzulässig, eine Nutzung oder Verarbeitung der ermittelten Daten ist im Übrigen nur unter den engen Voraussetzungen der datenschutzrechtlichen Bestimmungen, insbesondere des Bundesdatenschutzgesetzes, zulässig. Der Download von Adressdaten ist insbesondere nicht gestattet.


Hört sich nicht gerade danach an, als würden Sie dein Programm befürworten ;)

Dazu ein paar Feststellungen:
- meine Nutzung ist alles andere als zweckfremd!
- dann darf man meine Funktion halt nicht gewerblich nutzen
- privat darf meine Funktion also sehr wohl genutzt werden!
- datenschutzrechtliche Bestimmungen müssen eingehalten werden
- die Adressen werden nicht downgeloadet, dazu zähle ich Aktionen wie z.B. das Erstellen einer eigenen Datenbank anhand der Adressdaten von GoYellow.

Ich möchte nochmals betonen dass mein Programm nichts mit GoYellow zu tun hat, man kann genausogut jede andere URL eines Anbieters einer Inverssuche angeben! (eigentlich logisch, oder?)


Übrigens hab ich nicht nach der rechtlichen Seite gefragt, ich wollte wissen ob jemand Lust hat das Skript in Delphi als Funktion zu implementieren.
Also seid ihr OT :stupid:

Daniel G 29. Aug 2005 21:34

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
@jfheins:

Das ist Auslegungssache. Gegen die Nutzungsbedingungen wäre es, wenn das Script die Datenbank systematisch durchsucht, um z.B. Werbelisten zu erstellen. Außerdem habe ich auf der Website keinerlei Werbung gefunden. Das Argument würde in diesem Falle dann auch nicht ziehen.

derpepe 29. Aug 2005 21:36

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Konkreter bei den Nutzungsbedingungen von "Das Örtliche" (die wohl dasselbe im Sinn haben wie die Macher von GoYellow):
Zitat:

Jede zweckfremde Nutzung oder Verwertung ist unzulässig.

So ist insbesondere die vollständige, teilweise oder auszugsweise Verwendung des Verzeichnisses DasÖrtliche im Internet für gewerbliche Adressenverwertung oder als Unterlage bzw. Hilfsmittel für die Zusammenstellung oder Ergänzung von Teilnehmer-, Adress- oder anderen Verzeichnissen sowie das Auslesen der Daten im Internet zu den vorgenannten Zwecken sowie zu Zwecken sonstiger kommerzieller Verwendung nicht gestattet und wird von den Anbietern nach geltendem Recht unter Ausschöpfung des Rechtsweges verfolgt.

FriFra 29. Aug 2005 21:38

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Das Script an sich ist ja eine gute Idee, aber der verwendete Service taugt nichts... Ich habe gerade mal mehrere Nummern getestet, die definitiv im Telefonbuch stehen, aber goyellow findet nichts. Vielleicht finden die ja nur ihre eigenen kunden? :roll:

Wenn man keine Nummern zum Testen hat, wird's auch nichts mit einer Delphi-Version...

fcg 29. Aug 2005 21:41

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
also meine Nummer wird gefunden!

derpepe 29. Aug 2005 21:42

Re: PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonn
 
Zitat:

Zitat von FriFra
Das Script an sich ist ja eine gute Idee, aber der verwendete Service taugt nichts... Ich habe gerade mal mehrere Nummern getestet, die definitiv im Telefonbuch stehen, aber goyellow findet nichts. Vielleicht finden die ja nur ihre eigenen kunden? :roll:

Wenn man keine Nummern zum Testen hat, wird's auch nichts mit einer Delphi-Version...

Spontane Suche auf goyellow.de nach "Müller" in "Hamburg":
04043182609


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:41 Uhr.
Seite 1 von 2  1 2      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz