1
MSSQL 2000 / Umlaute ersetzen
Geht sowas auch in MSSQL?!
IsUpCase As Boolean, Res As String
If IsNull(pString) Then Umlaut = Null: Exit Function
Res = ""
For I = 1 To Len(pString)
Ch = Mid(pString, I, 1)
Ch1 = IIf(I < Len(pString), Mid(pString, I + 1, 1), " ")
IsUpCase = (Asc(Ch1) = Asc(UCase(Ch1)))
Select Case Asc(Ch)
Case Asc("Ä"): Res = Res & IIf(IsUpCase, "AE", "Ae")
Case Asc("Ö"): Res = Res & IIf(IsUpCase, "OE", "Oe")
Case Asc("Ü"): Res = Res & IIf(IsUpCase, "UE", "Ue")
Case Asc("ä"): Res = Res & "ae"
Case Asc("ö"): Res = Res & "oe"
Case Asc("ü"): Res = Res & "ue"
Case Asc("ß"): Res = Res & "ss"
Case Else: Res = Res & Ch
End Select
Next I
Umlaut = Res
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 48026
Url: https://administrator.de/forum/mssql-2000-umlaute-ersetzen-48026.html
Ausgedruckt am: 24.01.2025 um 19:01 Uhr
1 Kommentar
Habs selbst gelöst:
damit werden ö,ä,ü,Ö,Ä,Ü und ß ersetzt.
replace(replace(replace(replace(replace(replace(replace(DB_FIELD, 'ö', 'ö'), 'ä','ä'),'ü','ü'),'ß','ß'),'Ö','Ö'),'Ä','Ä'),'Ü','Ü') damit werden ö,ä,ü,Ö,Ä,Ü und ß ersetzt.
