---

Hallo zusammen,

hab ein Brett vor dem Kopf 

Ich möchte ein Script (.net) für Autodesk Topobase bauen. In einer Maske sind Bauarten mit botanischer und deutscher Bezeichnung enthalten. Hier habe ich einen Scriptbutton eingefügt der im WWW nach Informationen zu diesem Baum suchen soll.

Code:

---

Public Overrides Sub Button_Click()

    dim Baumname as string
    dim i as integer
    dim Cont as topobase.forms.DialogControls.SqlLabel

    ' Control für Baumart
    cont = me.Dialog.Controls.Item("$DEUTSCHEBAUMART")
    if cont.ExcelExportValue.Length > 0 then
        ' Zusammengesetzter Name
        Baumname = cont.ExcelExportValue
        Baumname=Microsoft.VisualBasic.replace(Baumname," ","%20")
        Baumname=Microsoft.VisualBasic.replace(Baumname,"ö","%")
        Baumname=Microsoft.VisualBasic.replace(Baumname,"Ö","%")
        Baumname=Microsoft.VisualBasic.replace(Baumname,"ä","%")
        Baumname=Microsoft.VisualBasic.replace(Baumname,"Ä","%")
        Baumname=Microsoft.VisualBasic.replace(Baumname,"ü","%")
        Baumname=Microsoft.VisualBasic.replace(Baumname,"Ü","%")

        Baumname=Microsoft.VisualBasic.replace(Baumname,"á","%")

        ' Url öffnen
        me.Application.OpenUrl ("http://www.baumkunde.de/suche.php?suche=" & Baumname)
    else
        ' allegemeine Liste öffnen
        me.Application.OpenUrl ("http://www.baumkunde.de/baumlisten/baumliste_az.php")
    end if
End Sub

---

Das klapp auch soweit ganz gut, aber wenn sich der Baum z.B. Fächer-Ahorn nennt, klappt es mit der Suche nicht. Die Umlaute und Sonderzeichen stören.
Gibt es in .net eine Funktion die aus einem String eine ordnungsgemäße URI produziert ??
Mit meinen einzelnen replace Funktionen geht das zwar auch aber die Suche soll auch über den botanischen Namen klappen. Da gibt es noch eine Menge Zeichen.

Wilfried Stelberg

------------------
Warum lisp'eln wenn's auch anders geht.
www.ib-stelberg.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Guten Morgen Wilfried,

Du musst deine URI einfach in Unicode umwandeln.
Hier ist eine übersichtliche Liste mit vielen Sonderzeichen.
Die Umwandlung bei einem ö ist zum Beispiel so:

Code:

---

Baumname=Microsoft.VisualBasic.replace(Baumname,"ö","&#*214")

---

(ohne Stern, sonst wird ja jetzt schon nur ein ö angezeigt!)
Jetzt müsste es klappen!

------------------
Mfg Daniel

Wer A sagt, der muss nicht B sagen. Er kann auch erkennen, dass A falsch war. Bertolt Brecht
------------------
VBasic / vb.net / vbs / wsh | Freeware

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Daniel,

danke für die Antwort. War eine Weile unterwegs ...

Ich hatte in wager Erinnerung das es da eine Methode (urldecode in PHP) gibt.
Ansonsten wäre das ein Fall für Trekkie mit RE.

Wilfried Stelberg

------------------
Warum lisp'eln wenn's auch anders geht.
www.ib-stelberg.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP