Forums Neueste Beiträge
 

Text in MAC-kompatiblen Text umwandeln

18/02/2008 - 18:45 von Steven Marti | Report spam
Hallo NG

Mit welchem Befehl làsst sich ein Sting "Schüler" in einen Mac-kompatiblen
String umwandeln (Codepage 10000)?

Steven Marti
 

Lesen sie die antworten

#1 Christoph Schneegans
18/02/2008 - 20:58 | Warnen spam
Steven Marti schrieb:

Mit welchem Befehl làsst sich ein Sting "Schüler" in einen Mac-kompatiblen
String umwandeln (Codepage 10000)?



Ich nehme an, du möchtest eine Datei schreiben; im Speicher sind in Access
sowie alle Strings UTF-16-codiert.

Das ADODB.Stream-Objekt unterstützt viele Codierungen, nàmlich gerade die,
die in [HKEY_CLASSES_ROOT\MIME\Database\Charset] aufgeführt werden. Man
kann so bspw. ohne viel Aufwand UTF-7-codierte Dateien erzeugen:

Dim s As String: s = "Schüler"
Dim str As ADODB.Stream: Set str = New ADODB.Stream
str.Charset = "utf-7"
str.Open
str.WriteText s
str.SaveToFile "foo.txt"
str.Close

Mit

str.Charset = "macintosh"

wird offenbar die Codierung "CP Mac Roman" verwendet, obwohl die Registry
bei mir keinen solchen Wert enthàlt.

Vorher Verweis auf neueste ADODB-Bibliothek einrichten.

<http://schneegans.de/usenet/mid-schreibweisen/> · Postings verlinken

Ähnliche fragen