Sonderzeichen wie € werden in DB nur in unicode gespeichert
Verfasst: 22.11.2013 13:15
Sonderzeichen wie € und andere werden in die Datenbanken PostgreSQL und SQLite mit einem
unicode-off-executable in UNICODE geschrieben und in ASCII gelesen, und zwar in den PB-Version 5.10-5.21.
Ein geschriebenes € wird als ? gelesen!
Ein unicode-executable wirft dagegen beim lesen ein € aus, und zwar auch dann, wenn es mit einem
unicode-off-executable geschrieben wurde.
In den Versionen 5.00 und davor wurden die Sonderzeichen mit einem unicode-off-executable in ASCII geschrieben
und in ASCII gelesen.
Diese können mit einem unicode-executable nicht korrekt gelesen werden, da sie an die Datenbanken in ASCII
übergeben wurden (korrekterweise).
Dieser Code funktioniert mit PB 5.00 auch im unicode-off-Modus, mit PB 5.10-5.21 nur im unicode-Modus:
Ich habe den Fehler bereits im englischen Forum gepostet (am Montag den 18.11), habe bis heute jedoch
kein Feedback bekommen. In der Version 5.21 ist er immer noch drin.
unicode-off-executable in UNICODE geschrieben und in ASCII gelesen, und zwar in den PB-Version 5.10-5.21.
Ein geschriebenes € wird als ? gelesen!
Ein unicode-executable wirft dagegen beim lesen ein € aus, und zwar auch dann, wenn es mit einem
unicode-off-executable geschrieben wurde.
In den Versionen 5.00 und davor wurden die Sonderzeichen mit einem unicode-off-executable in ASCII geschrieben
und in ASCII gelesen.
Diese können mit einem unicode-executable nicht korrekt gelesen werden, da sie an die Datenbanken in ASCII
übergeben wurden (korrekterweise).
Dieser Code funktioniert mit PB 5.00 auch im unicode-off-Modus, mit PB 5.10-5.21 nur im unicode-Modus:
Code: Alles auswählen
UseSQLiteDatabase()
OpenWindow(0, 0, 0, 300, 300, "", #PB_Window_SystemMenu)
StringGadget(1, 10, 10, 200, 20, "")
EditorGadget(2, 10, 40, 200, 100)
Define String.s
Define DatabaseFile.s = GetTemporaryDirectory()+"Database.txt"
CreateFile(0, DatabaseFile) : CloseFile(0)
OpenDatabase(0, DatabaseFile, "", "")
DatabaseUpdate(0, "CREATE TABLE test (name TEXT)")
DatabaseUpdate(0, "INSERT INTO test (name) VALUES ('€')")
If DatabaseQuery(0, "SELECT * FROM test")
While NextDatabaseRow(0)
String = GetDatabaseString(0, 0)
Debug String
SetGadgetText(1, String)
SetGadgetText(2, String)
Wend
FinishDatabaseQuery(0)
EndIf
CloseDatabase(0)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindowkein Feedback bekommen. In der Version 5.21 ist er immer noch drin.