AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonnummern)

PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonnummern)

Ein Thema von derpepe · begonnen am 29. Aug 2005 · letzter Beitrag vom 29. Aug 2005
Antwort Antwort
Seite 1 von 2  1 2   
Benutzerbild von derpepe
derpepe

Registriert seit: 16. Mär 2005
Ort: Dotternhausen
164 Beiträge
 
Delphi 2005 Personal
 
#1

PHP->Delphi: Inverssuche (Rückwärtssuche für Telefonnumme

  Alt 29. Aug 2005, 21:49
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!

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];

?>
Angehängte Dateien
Dateityp: zip inverssuche_209.zip (648 Bytes, 13x aufgerufen)
Peter J. Schneider
http://raketenwerfer.de/programmieren/delphi/index.html
Nes dar in da kev, sed un est a log!
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#2

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

  Alt 29. Aug 2005, 22:24
Hast du auch deren Genehmigung um deren Service zu nutzen?
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#3

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

  Alt 29. Aug 2005, 22:28
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
  Mit Zitat antworten Zitat
Benutzerbild von derpepe
derpepe

Registriert seit: 16. Mär 2005
Ort: Dotternhausen
164 Beiträge
 
Delphi 2005 Personal
 
#4

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

  Alt 29. Aug 2005, 22:29
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".
Peter J. Schneider
http://raketenwerfer.de/programmieren/delphi/index.html
Nes dar in da kev, sed un est a log!
  Mit Zitat antworten Zitat
Benutzerbild von derpepe
derpepe

Registriert seit: 16. Mär 2005
Ort: Dotternhausen
164 Beiträge
 
Delphi 2005 Personal
 
#5

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

  Alt 29. Aug 2005, 22:34
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
Peter J. Schneider
http://raketenwerfer.de/programmieren/delphi/index.html
Nes dar in da kev, sed un est a log!
  Mit Zitat antworten Zitat
Daniel G
(Gast)

n/a Beiträge
 
#6

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

  Alt 29. Aug 2005, 22:34
@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.
  Mit Zitat antworten Zitat
Benutzerbild von derpepe
derpepe

Registriert seit: 16. Mär 2005
Ort: Dotternhausen
164 Beiträge
 
Delphi 2005 Personal
 
#7

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

  Alt 29. Aug 2005, 22:36
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.
Peter J. Schneider
http://raketenwerfer.de/programmieren/delphi/index.html
Nes dar in da kev, sed un est a log!
  Mit Zitat antworten Zitat
Benutzerbild von FriFra
FriFra

Registriert seit: 19. Apr 2003
1.291 Beiträge
 
Delphi 2005 Professional
 
#8

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

  Alt 29. Aug 2005, 22:38
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?

Wenn man keine Nummern zum Testen hat, wird's auch nichts mit einer Delphi-Version...
Elektronische Bauelemente funktionieren mit Rauch. Kommt der Rauch raus, geht das Bauteil nicht mehr.
  Mit Zitat antworten Zitat
fcg

Registriert seit: 15. Apr 2003
98 Beiträge
 
#9

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

  Alt 29. Aug 2005, 22:41
also meine Nummer wird gefunden!
.: Wer für alles offen ist, kann nicht ganz dicht sein! :.
  Mit Zitat antworten Zitat
Benutzerbild von derpepe
derpepe

Registriert seit: 16. Mär 2005
Ort: Dotternhausen
164 Beiträge
 
Delphi 2005 Personal
 
#10

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

  Alt 29. Aug 2005, 22:42
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?

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
Peter J. Schneider
http://raketenwerfer.de/programmieren/delphi/index.html
Nes dar in da kev, sed un est a log!
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2   

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 22:59 Uhr.
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