Hallo
Ich hab ein Problem beim ersetzten von Umlauten, genauer von groß geschriebenen Umlauten.
Bsp.:
MsgBox(0,"",StringRegExpReplace("Österingen","(?i)ö","oe")
Kann mir dabei jemand helfen?
MFG
Philipp
Umlaute ersetzten
-
- [ gelöst ]
-
Cerverus -
18. November 2010 um 15:27 -
Geschlossen -
Erledigt
-
-
Dabei kann ich dir leider nicht helfen, aber es gibt auch noch die Methode mit Objekten wie sie z.B. hier verwendet wurde.
-
[autoit]
MsgBox(0,"",_replace("Ä Ö Ü ä ü ö"))
[/autoit][autoit][/autoit][autoit]Func _replace($sString)
[/autoit]
Local $aUmlaute[6][2] = [["Ö","Oe"],["Ä","Ae"],["Ü","Ue"],["ö","oe"],["ä","ae"],["ü","ue"]]
For $i = 0 To 5
$sString = StringRegExpReplace($sString, $aUmlaute[$i][0], $aUmlaute[$i][1])
Next
Return $sString
EndFuncJe nachdem woher die Umlaute kommen oder wobei sie dich behindern, wäre es vlt. besser das Problem anders anzugehen.
-
Die Umlaute stammen aus Ortsnamen, welche an einen Automaten übergeben werden, der mit Umlauten nicht klarkommt. Auf den Automaten kann ich leider keinen Einfluss nehmen, aber dafür auf die Daten die ich ihm zufütter. Konkret habe ich hier eine Oberfläche in der der Benutzer den Ort eingibt und das script die Eingabe prüft und gegebenenfalls auftretende Umlaute ersetzt.
Deine Funktion ist super und genau das was ich gesucht habe, herzlichen Dank
MFG
Philipp
-
Außerdem braucht man dann auch kein RegExpReplace mehr
[autoit]
.MsgBox(0,"",_replace("Ä Ö Ü ä ü ö"))
[/autoit][autoit][/autoit][autoit]Func _replace($sString)
[/autoit]
Local $aUmlaute[6][2] = [["Ö","Oe"],["Ä","Ae"],["Ü","Ue"],["ö","oe"],["ä","ae"],["ü","ue"]]
For $i = 0 To 5
$sString = StringReplace($sString, $aUmlaute[$i][0], $aUmlaute[$i][1])
Next
Return $sString
EndFunc