[VB 6.0][MySQL] Probleme beim Konvertieren von Zahlen

[MultiStorm]

Hallo Alle zusammen ..

Ich habe folgendes Problem,
ich möchte eine UPDATE Anweisung an eine MySQL DB Schicken ..
Soweit kein Problem.

nun ist eins der Felder ein decimal(8,2)
bei der update anweisung steht nun "Set Feld = 22,23"
das gefällt MySQL natürlich nicht da es eine Zahl in diesem Format erwartet: "22.23"

nun dachte ich mir nutze ich fie VB eigene Format Function ...
meine Lödung sieht wie folgt aus:

Public Function cNuM(ByVal dNumber As Double) As String
If SHOW_ERROR = True Then
   On Error GoTo Fehler
End If

If dNumber <> 0 Then
    cNuM = Format(dNumber, "#####0.00")
Else
    cNuM = "0"
End If

Exit Function
Fehler:
cNuM = "0"
ERROR_SYSTEM Err.Number, Err.Description, "MOD_Functionen", _
"cNuM", "dNumber: " & dNumber, _
"", ""
End Function

Das wirklich eigenartige daran ist das ergebis ist trotzdem "22,23"
VB scheint das immer wieder umzuwandeln ...
Aber warum und wie löse ich das Problem ?

Hilfe wäre Klasse

 

[ronaldh]

Wenn Du die VB-eigenen String/Zahlen-Konvertierungen nutzt, sollte das eigentlich tun, da sowohl die Datenbank als auch VB sich dann an die Windows-Einstellungen für Zahlenformate handeln.

Also z.B.

    cNuM = Str(dNumber)

sollte in jedem Fall ausreichen.

Grüsse
ronaldh