0

Internetsuche

Ich erzeuge eine Internetsuche, es geht wunderbar ,der text aus den Textfeldern wird eingetragen,
Nur wenn im text Sonderzeichen enthalten sind ,geht es nicht .

let myjahr := 1920;

let myAutor := Kisch;
let myTitel := Asien gründlich verändert;
let myVerlag := Erich Reis Verlag;

SuchenInternetVerweise := html("https://www.abebooks.com/servlet/SearchResults?yrh=" + myjahr + "&pn=" + myVerlag + "&bi=0&ds=30&isbn=" + ISBN + "&bx=off&sortby=1&tn=" + myTitel1 + "&an=" + myAutor + "&recentlyadded=all&refined=1“)

Ergebnis in der Suchmaske .     Asien gründlich verändert
Weis einer rat?

4 Antworten

null
    • Leonid_Semik
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Hallo Klaus,

    Versuch mal mit urlEncode:

    ---

    SuchenInternetVerweise := html(urlEncode("https://www.abebooks.com/servlet/SearchResults?yrh=" + myjahr + "&pn=" + myVerlag + "&bi=0&ds=30&isbn=" + ISBN + "&bx=off&sortby=1&tn=" + myTitel1 + "&an=" + myAutor + "&recentlyadded=all&refined=1"))

    ---

    Leo

    • Klaus_J
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Hallo Leo 

    ich haben es ausprobiert geht nicht, ergibt falsches Format.

    Versuch:

    let myTitel := "Das Räubermärchen.";
    html(urlEncode(myTitel))

    html ergebnis                             Das%20R%C3%A4uberm%C3%A4rchen.
    ausInternetZeile damit geht es.    Das%20R%E4uberm%E4rchen

    gruß klaus

    • Klaus_J
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Hallo Leo 

    das suchen auf der Internet seite abebooks.com geht nur mit dem code ISO 8859-1,

    und dann nur im Google Chrome , in Safari ist es nicht möglich.Übel....

    also suchen ersetzen .

    let myAutor := AutorNachname;
    let myTitel := "Das Räub RÄub Öub";
    let myVerlag := text('Verlag/Ort');
    let myJahr := Erscheinungsjahr;
    "nach ISO 8859-1";
    let myTitel := replace(myTitel, "ä", "%E4");
    let myTitel := replace(myTitel, "Ä", "%C4");
    let myTitel := replace(myTitel, "ö", "%F6");
    let myTitel := replace(myTitel, "Ö", "%D6");
    let myTitel := replace(myTitel, " ", "+");
    let myText := "www.abebooks.com/servlet/SearchResults?an=" + myAutor + "&bi=0&bx=off&cm_sp=SearchF-_-Advtab1-_-Results&ds=30&pn=" + myVerlag + "&recentlyadded=all&sortby=1&sts=t&tn=" + myTitel + "&yrl=" + myJahr;
    SuchenInternetVerweise := myText

    danke für deine schnelle Antwort.

    gruß klaus

    • Klaus_J
    • vor 4 Jahren
    • Gemeldet - anzeigen

    Hallo kleiner Nachtrag ,in Safari geht es jetzt auch!