warum findet u.g. Funktion bei Mustername<br die drei letzten Zeichen korrekt und bei Musterstrasse 10<br dagegen nicht?
Diese Unterfunktion soll den html-Schrott <br an Stringenden entfernen!
Code: Alles auswählen
function uf_brweg(ls_br$) as string
Dim ls_gutstring_anz_zeich#
if Right(ls_br,3) = "<br" then
ls_gutstring_anz_zeich = Len(ls_br) - 3
uf_brweg= Left(ls_br,ls_gutstring_anz_zeich)
end if
end function
Winni