Beiträge von robbytobi

Anbei noch mal zusammenfassend die Einstellungen, die der Server zurückmelden sollte damit alles funktioniert

#Topic Solved#

;$sSQLstring enthält ein gültiges SQL-Statement, das wie folgt konvertiert werden muß:
        $sSQLstringUTF8 = _WinAPI_WideCharToMultiByte($sSQLstring,65001)                ;Konvertierung
        ConsoleWrite($sSQLstringUTF8&@CRLF)                                              ;Ausgabe an Konsole
        $oQueryResult = _SQLQuery($oConn, $sSQLstringUTF8)                                ;Ausgabe an DB

Das Problem war, dass MariaDB eine "ganz spezielle" Beziehung zu UTF8 hat! Auch wenn das nichts mehr mit AutoIt zu tun hat, will ich noch folgende Lösungsansätze hier posten, damit der nächste, der hier verzweifelt, auch fündig wird:

Grob gesagt ist UTF8 die falsche Wahl. Um zum Ziel zu kommen ist "UTF8MB4" notwendig gewesen. Hierzu musste ich in der Konfigurationsdatei des Servers my.cnf folgende Anpassungen vornehmen:

[client]
default-character-set = utf8mb4

[mysql]
default-character-set = utf8mb4

[mysqld]
character-set-client-handshake = FALSE
character-set-server = utf8mb4
collation-server = utf8mb4_unicode_ci

Natürlich müssen dann noch die Datenbank, Tabelle(n) und Spalte(n) entsprechend angepasst werden. Dann sieht das Ergebnis so aus:

Sowohl das Array, als auch die Konsole zeigen die identischen Daten und diese kommen auch korrekt in der Datenbank an.

Soweit ich das beurteilen kann: Case closed!

Vielen Dank für deine Hilfe Bitnugger !

Erstmal Dank für die User-Properties. Das entsprechende Fragment ist erfolgreich eingebaut und stimmt mit dem Screenshot überein.

Die Daten in der Datenbank hab ich sowohl mit PhpMyAdmin als auch mit DBeaver angeschaut. Wenn ich die Daten dort damit (mit beiden) versuchsweise mit den korrekten Zeichen überschreibe, dann erscheinen diese auch dort korrekt. Ich werd mal versuchen die Daten vor dem Absenden "doch" zu konvertieren...

Ich habe nun folgenden Status:

Soweit stimmt das. Ich konvertiere den Text vor der Konsolenausgabe und er erscheint richtig in der Konsole. Allerdings kommen in der DB nun wieder nur Fragezeichen an:

Zwei Fragen: Wo kann man die Statusleiste unten denn so einstellen? Ich hab dort nur einen Eintrag. Den kann ich per Klick toggeln. Aber das Encoding ist nicht dabei? (Ich denke zwar, dass das stimmt, aber kann es leider nicht final bestätigen)

Nachdem ich zuerst die SciTEUser.properties angepasst hatte ist noch gar nichts passiert. Die Zeichen wurden durch die berühmten Fragezeichen ersetzt.

Eine erste Veränderung hat nun der Einsatz von _WinAPI_WideCharToMultiByte ergeben: Folgendes Array wird wie unten stehend an der Console ausgegeben und kommt dann auch so in der Datenbank an....

Local $sUTFcontent[4][1]
$sUTFcontent[0][0] ="Content"
$sUTFcontent[1][0] ="облачные решения для любой отрасли"
$sUTFcontent[2][0] ="業界に特化したモダン"
$sUTFcontent[3][0] ="Loret ipsum äöüß"

;Consolen-Outout:
;INSERT INTO testcont (Content) VALUES ('облачные Ñ€ÐµÑˆÐµÐ½Ð¸Ñ Ð´Ð»Ñ Ð»ÑŽÐ±Ð¾Ð¹ отраÑли')
;INSERT INTO testcont (Content) VALUES ('業界ã«ç‰¹åŒ–ã—ãŸãƒ¢ãƒ€ãƒ³')
;INSERT INTO testcont (Content) VALUES ('Loret ipsum äöüß')

Ergo: Ich hab zwar noch nicht die richtige Quell/Ziel -Codepage, aber ich mutmaße, dass das, was ich an die Datenbank schicke mir richtig übertragen und auch von der Console entsprechend angezeigt wird. Also dafür schon mal einen kleinen Dank an dich! (nach zwei Wochen an diesem Thema ist das ein echter, erster Fortschritt!! )

Die Frage ist nun nur noch, wo das Problem liegen könnte? Wenn ich das Array in eine Datei schreibe und es mit Notepad öffne, dann zeigt er mir UTF8 an. Auch ohne, dass ich erst was konvertiere.

Was mich irritiert: in der Beschreibung von _WinAPI_WideCharToMultiByte steht "...Converts a UTF-16 (wide character) string to a multibyte string...". Ist das Problem vielleicht, dass ich das falsche "Quellformat" habe?

Vielleicht doch noch ein bisschen tiefer:

Hier die Funktion zum Schreiben des Arrays. Diese Funktion baut aus den in der ersten Zeile enthaltenen Spaltennamen ein "Basisstatement" auf und schreibt dann Zeilenweise die Daten an die richtigen Stellen

Func _Add2DArrayIntoDB($aArray, $sTable, $aServer)
    ;Einfügen eines 2D - Arrays in eine Tabelle.
    ;Gibt als Ergebnis ein 1D-Array mit dem Status (1 = ok/ 0 =failed) zurück
    If Ubound($aArray,0) <> 2 Then Exit                ;==> Abbruch: kein 2-D Array!!
    
    Local $aResult[UBound($aArray)]                    ;Leeres 1D-Return-Array
    $oConn = _SQLConnect($aServer[0],$aServer[1],1,$aServer[2],$aServer[3],$aServer[4],$aServer[5]) ;Server Connect
    
    ;Vorbereitung: Spaltennamen auswerten und Basisstatement (Header-Daten) vorbereiten
    Local $sColumnFieldsString = ""
    For $i = 0 To Ubound($aArray, $UBOUND_COLUMNS)-1
        $sColumnFieldsString &= $aArray[0][$i] & ", "
    Next
    $sColumnFieldsString = StringLeft($sColumnFieldsString,StringLen($sColumnFieldsString)-2)
     $sSQLBaseStatement = "INSERT INTO "& $sTable & " (" & $sColumnFieldsString&")" & " VALUES "
    ;Zeilendaten: Daten pro Zeile in einen String wandeln und zusammen mit dem Basisstatement einen gültigen SQL-Befehl bauen und an die DB senden
    For $i = 1 To Ubound($aArray,$UBOUND_ROWS)-1
        $sData = ""
        $sErrorInfo =""
        For $j = 0 To Ubound($aArray,$UBOUND_COLUMNS)-1
            $sData &= "'"&$aArray[$i][$j] & "', "
        Next
        $sData = StringLeft($sData,StringLen($sData)-2)
        $sData = "("&$sData&")"
        ConsoleWrite($sSQLBaseStatement&$sData&@CRLF)
        $iExpectedErrMode =1
        $oQueryResult = _SQLQuery($oConn, $sSQLBaseStatement&$sData)
        $iExpectedErrMode =0
        If $sErrorInfo <> "" Then
            $aResult[$i] = "0"
        else
            $aResult[$i] = "1"
        EndIf
    Next

    $sErrorInfo =""
    _SQLDisconnect($oConn)                                                                            ;Server Disconnect
    ;_ArrayDisplay($aResult)
    Return($aResult)
EndFunc

Ich übergebe hierbei die Verbindungsdaten des Servers als Array an eine entsprechend leicht modifizierte Funktion "_SQLConnect"

Func _SQLConnect($sServer, $sDatabase, $fAuthMode = 0, $sUsername = "", $sPassword = "", $sDriver = "{SQL Server}" ,$sPort = 3306)
;ConsoleWrite("Serververbindung... ")
Local $sTemp = StringMid($sDriver, 2, StringLen($sDriver) - 2)
Local $sKey = "HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers", $sVal = RegRead($sKey, $sTemp)
If @error or $sVal = "" Then Return SetError(2, 0, 0)
;ConsoleWrite($sTemp&": ")
;ConsoleWrite("sval:"& $sVal&@CRLF)


$oConn = ObjCreate("ADODB.Connection")
;If  IsObj($oConn) Then ConsoleWrite("ADODB.Connection läuft..."&@CRLF)
If NOT IsObj($oConn) Then Return SetError(3, 0, 0)


If $fAuthMode Then $oConn.Open ("DRIVER=" & $sDriver & ";SERVER=" & $sServer & ";DATABASE=" & $sDatabase & ";UID=" & $sUsername & ";PWD=" & $sPassword & "; PORT=" & $sPort & ";")
If NOT $fAuthMode Then $oConn.Open("DRIVER=" & $sDriver & ";SERVER=" & $sServer & ";DATABASE=" & $sDatabase)
If @error Then Return SetError(1, 0, 0)


Return $oConn
EndFunc   ;==>_SQLConnect

Das alles nur mal erwähnt, damit a) ihr wisst wie ich mich mit dem Server verbinde und (ansonsten erfolgreich) kommuniziere. Vielleicht hilft das ja jemand.

Musashi: Wie du (deiner Signatur entnommen) ganz sicher weißt, kann man doch fliegen wenn man nach dem Stolpern das hinfallen einfach weglässt. Wer braucht da noch ein Fliewatüüt

Bitnugger: Ja, das wäre dann die Kehrseite: Mal schnell jemandem helfen der "noch weniger weiß". Aber in der Tat ist das Geben auch ein kleiner Hintergedanke. In Foren, in dem dies funktioniert. Und zu denen man passt.

Hallo zusammen!

Ich habe eine Datenbank erstellt, in die ich Textblöcke in unterschiedlichen Sprachen hineinschreiben möchte. Diese "Kopierarbeiten" (Insert) funktionieren wunderbar, so lange keine chinesischen oder russischen Texte geschrieben werden sollen. Diese werden dann als Fragezeichen übertragen.

Nach nun etlichen Stunden des Recherchierens und Probierens gehen mir langsam die Ansätze aus. Außer, dass das Problem etwas mit den Eingestellten/ übertragenen Zeichensätzen zu tun hat (mutmaßlich) hab ich keine Ahnung was ich noch ausprobieren könnte (oder wo das Problem liegt).

Anbei ein Code-Schnipsel, dass die Problematik umschreibt. (Bei Nachhaken gehe ich gerne tiefer)

Local $sUTFcontent[4][1]
$sUTFcontent[0][0] ="Content"
$sUTFcontent[1][0] ="облачные решения для любой отрасли"
$sUTFcontent[2][0] ="業界に特化したモダン"
$sUTFcontent[3][0] ="Loret ipsum äöüß"

_ArrayDisplay($sUTFcontent)

Local $hFileOpen = FileOpen("UTF8.txt", $FO_OVERWRITE)
FileWrite($hFileOpen, $sUTFcontent[1][0])
FileClose($hFileOpen)

_Add2DArrayIntoDB($sUTFcontent, "testcont", $aDBserver)   ;Funktion, die das Schreiben (Insert) eines Arrays in eine Tabelle übernimmt

Ich habe zum Test ein kleines Array angelegt, in dem irgendwelche unterschiedlichen Contents drin sind.

Dann lasse ich mir diese mit _ArrayDisplay anzeigen. -> das Ergebnis ist korrekt

Ich schreibe einen der problematischen Texte in eine Textdatei. -> das Ergebnis ist korrekt

Bis dahin scheint mir klar, dass mit dem Inhalt des Arrays soweit passen dürfte.

Nun kommt es:

in der Datenbank steht dann folgendes:

Content

----------------------------------

???????? ??????? ??? ????? ???????

??????????

Loret ipsum äöüß

An der kleinen Schreib-Funktion von mir sollte es nicht liegen: Diese schreibt ansonsten alle meine Arrays zu meiner Zufriedenheit in meine Datenbanken

Also gibt es irgendwo ein Problem mit den verwendeten oder angenommenen Zeichensätzen.

UTF8 als Basis scheint mir geeignet um alle meine Anforderungen abzudecken. Deshalb hab ich schon an den Einstellungen der Datenbank herumgeschraubt. Ein Blick in die Einstellungen der Datenbank:

SHOW VARIABLES LIKE 'character_set\_%'

Wenn ich die Daten mit anderen Programmen (z.B. DBeaver oder aus PhpMyAdmin) in die Datenbank schreibe, dann klappt das alles.

Ergo:

Die Datenbank kann es.

Das Array/Autoit kann es auch (eigentlich)

->irgendwo ist ein Problem beim Übertragen als "UTF8"

Für alle Hinweise dankbar,

Gruß Robbytobi

"Griasd eich" aus dem schönen Bayern!

Nachdem ich beruflich als auch privat schon so einiges mit AutoIt machen konnte/durfte/musste, wird es auch für mich mal Zeit am Forenleben teilzunehmen. Bislang hatte ich nur als passiver Leser Wissen aus den deutsch- und englischsprachigen Foren ergattern und aneignen können. Aber nach mehreren Jahren der Anwendung in unterschiedlichen Bereichen ist an der einen oder anderen Stelle das Wissen dann doch mal etwas dünn ...und dann braucht es eben den Austausch mit anderen.