05. november 2002 - 12:37
Der er
1 kommentar og
1 løsning
hvor sætter jeg min æ ø å replace
Jeg har lavet et forum, og jeg vil sikre mig at alle kan læse æ ø å korekt, således, at står der æ, ø eller å i databasen, så skal de omdannes til æ ø og å inden de smides ud til klienten. Hvor gøres det på min dimentionering af informationerne?
Dim info
info = rs("Info")
info = Replace(info, "'", "''")
info = Replace(info, vbCrLf, "<br>")
info = Replace(info, Chr(9), "<br> ")
05. november 2002 - 13:17
#2
fandt ud af det - lukker.
info = rs("Info")
info = Replace(info, "'", "''")
info = Replace(info, vbCrLf, "<br>")
info = Replace(info, Chr(9), "<br> ")
info = replace(info, chr(230), "æ")
info = replace(info, chr(248), "ø")
info = replace(info, chr(229), "å")
info = replace(info, chr(198), "&AELIG;")
info = replace(info, chr(216), "&OSLASH;")
info = replace(info, chr(197), "&ARING;")
info = replace(info, chr(252), "ü")
info = replace(info, chr(220), "Ü")
info = replace(info, chr(223), "ß")
info = replace(info, chr(64), "@")