Wie die gelieferte xml-Datei aussieht, hängt ganz davon ab, welche Parameter du bei der Suchanfrage übergibst.
Hier mal eine einfache Anfrage...
AutoIt
;-- TIME_STAMP 2018-10-23 22:09:44 v 0.1
#include <Array.au3>
;~ https://tel.search.ch/api/help
; API-Key, wird benötigt, wenn mehr als eine Anfrage pro Tag gesendet wird.
Global $key = "xxxxxx"
; Allgemeiner Suchstring. Suche nach Namen, Rubriken oder Telefonnummern
Global $sSuche = "john+meier" ; "0442777777"
Global $aErgebnis = _Abfragen($sSuche)
_ArrayDisplay($aErgebnis, '$aErgebnis')
Func _Abfragen($was)
;~ Local $sURL = StringFormat("https://tel.search.ch/api/?maxnum=1&was=%s&key=%s", $was, $key) ; mit API-Key suchen
Local $sURL = StringFormat("https://tel.search.ch/api/?maxnum=1&was=%s", $was) ; ohne API-Key suchen
If FileExists('api-response.xml') Then
ConsoleWrite('! api-response.xml war bereits vorhanden' & @CRLF)
Else
If Not InetGet($sURL, 'api-response.xml', 1) Then Return False
ConsoleWrite('! api-response.xml wurde soeben gespeichert' & @CRLF)
EndIf
Local $sXML = FileRead('api-response.xml')
Local $sContent = StringRegExpReplace($sXML, '(?s).+<content type="text">(.+)</content>.+', '\1')
Local $aContent = StringRegExp($sContent & @CRLF, '(.+)(?:\R)', 3)
For $i = 0 To UBound($aContent) -1 Step 1
$aContent[$i] = StringStripWS($aContent[$i], 1)
ConsoleWrite('> ' & $acontent[$i] & @CRLF)
Next
Return $aContent
EndFunc ;==>_Abfragen
Alles anzeigen
und hier die gelieferte xml-Datei...
XML: api-response.xml
<?xml version="1.0" encoding="utf-8" ?>
<feed xml:lang="de" xmlns="http://www.w3.org/2005/Atom" xmlns:openSearch="http://a9.com/-/spec/opensearchrss/1.0/" xmlns:tel="http://tel.search.ch/api/spec/result/1.0/">
<id>https://tel.search.ch/api/fb10afc3a3e24bfa6da1b80fb59869e6</id>
<title type="text">tel.search.ch API Search Results</title>
<generator version="1.0" uri="https://tel.search.ch">tel.search.ch</generator>
<updated>2018-10-23T02:00:00Z</updated>
<link href="https://tel.search.ch/result.html?was=john+meier" rel="alternate" type="text/html" />
<link href="http://tel.search.ch/api/?was=john+meier" type="application/atom+xml" rel="self" />
<link href="http://tel.search.ch/api/?was=john+meier&pos=2" rel="next" type="application/atom+xml" />
<openSearch:totalResults>9</openSearch:totalResults>
<openSearch:startIndex>1</openSearch:startIndex>
<openSearch:itemsPerPage>1</openSearch:itemsPerPage>
<openSearch:Query role="request" searchTerms="john meier " startPage="2"></openSearch:Query>
<openSearch:Image height="1" width="1" type="image/gif">https://www.search.ch/audit/CP/tel/de/api</openSearch:Image>
<entry>
<id>urn:uuid:b15768ab56be5411</id>
<updated>2018-10-23T02:00:00Z</updated>
<published>2018-10-23T02:00:00Z</published>
<title type="text">Meier, John</title>
<content type="text">Meier, John
Via General Guisan 11
6828 Balerna/TI
*091 682 12 17</content>
<tel:nopromo>*</tel:nopromo>
<author>
<name>tel.search.ch</name>
</author>
<link href="https://tel.search.ch/balerna/via-general-guisan-11/john-meier" title="Details" rel="alternate" type="text/html" />
<link href="https://tel.search.ch/vcard/Meier.vcf?key=b15768ab56be5411" type="text/x-vcard" title="VCard Download" rel="alternate" />
<link href="https://tel.search.ch/edit/?id=b15768ab56be5411" rel="edit" type="text/html" />
</entry>
</feed>
Alles anzeigen