OpenOffice.info

Super Danke!

myValue = Replace(myValue,",",".")

	oDatabaseContext = CreateUNOService("com.sun.star.sdb.DatabaseContext")
	oDatabase = oDatabaseContext.getByName("xy")
	oConnection = oDatabase.getConnection("","")
	
	oPreparedStatement = oConnection.prepareStatement("UPDATE ""meineTabelle"" SET ""meineSpalte"" = ? WHERE ""ID"" = 0")
	oPreparedStatement.setDouble(1,myValue)	
	oPreparedStatement.executeUpdate

[quote="Karolus"]Nach [u]deinem[/u] Makrocode steckt in der Variablen v ein Fliesskommawert, der lediglich in der msgbox durch deine deutsche Lokalisierung mit Komma dargestellt wird.[/quote]
Leider wird der Wert über den DatabaseContext auch mit einem Komma an die Datenbank weitergegeben und verursacht dadurch selbstverständlich einen Fehler. Traurig, aber OOo-Alltag.
Schliesslich muss man seinen Fliesskommawert ja in einen (SQL-)String packen, der an die Datenbank durchgereicht wird, dabei wird durch die implizite Typkonvertierung (Double->String) ebenso wie in der MsgBox das Komma als Dezimaltrennzeichen verwendet.

[quote="MikeRo"]Das bringt mich auf den richtigen Weg, aber dann habe ich darudch, das in der Zelle eigentlich 0,621 steht den Wert 0.621 denn kann ich aber nicht mit 100 Multiplizieren[/quote]
Tatsächlich, hatte ich gar nicht dran gedacht.
Dann schieb nach der Multiplikation mal noch die Zeile
[code]myValue = Replace(myValue,",",".")[/code]
ein, so funktioniert es zumindest bei mir problemlos.

Nachtrag:
Mit preparedStatements werden auch unformatierte Fliesskommawerte problemlos übernommen
[code] oDatabaseContext = CreateUNOService("com.sun.star.sdb.DatabaseContext")
oDatabase = oDatabaseContext.getByName("xy")
oConnection = oDatabase.getConnection("","")

oPreparedStatement = oConnection.prepareStatement("UPDATE ""meineTabelle"" SET ""meineSpalte"" = ? WHERE ""ID"" = 0")
oPreparedStatement.setDouble(1,myValue)
oPreparedStatement.executeUpdate[/code]

[quote="Karolus"]Hallo
Nach [u]deinem[/u] Makrocode steckt in der Variablen v ein Fliesskommawert, der lediglich in der msgbox durch deine deutsche Lokalisierung mit Komma dargestellt wird.

Gruß Karo[/quote]

Hmm, ich programmiere mal weiter und gucke ob die DB Abfrage es nimmt.

[quote="DPunch"]Aloha

Versuch mal
[code]myValue = mycell.Formula'In der Zelle ist der Wert. 0,621[/code]
statt
[code]myValue = mycell.Value 'In der Zelle ist der Wert. 0,6210[/code][/quote]

Das bringt mich auf den richtigen Weg, aber dann habe ich darudch, das in der Zelle eigentlich 0,621 steht den Wert 0.621 denn kann ich aber nicht mit 100 Multiplizieren

Hallo
Nach [u]deinem[/u] Makrocode steckt in der Variablen v ein Fliesskommawert, der lediglich in der msgbox durch deine deutsche Lokalisierung mit Komma dargestellt wird.

Gruß Karo

myValue = mycell.Formula'In der Zelle ist der Wert. 0,621

myValue = mycell.Value 'In der Zelle ist der Wert. 0,6210

Aloha

Versuch mal
[code]myValue = mycell.Formula'In der Zelle ist der Wert. 0,621[/code]
statt
[code]myValue = mycell.Value 'In der Zelle ist der Wert. 0,6210[/code]

For i = 1 to AnzahlRabatte
    myCell = oSheet.getCellByPosition(LetzteSpalte+i,10)
    myValue = mycell.Value 'In der Zelle ist der Wert. 0,6210
    v = MyValue*100 'Ergibt dann natürlich 62,1
    aPercentage = v
    MsgBox aPercentage 'Spuckt 62,1 aus
Next

Hallo, ich google schon etwas länger aber ich finde einfach keine Lösung für das Problem.

[code]
For i = 1 to AnzahlRabatte
myCell = oSheet.getCellByPosition(LetzteSpalte+i,10)
myValue = mycell.Value 'In der Zelle ist der Wert. 0,6210
v = MyValue*100 'Ergibt dann natürlich 62,1
aPercentage = v
MsgBox aPercentage 'Spuckt 62,1 aus
Next
[/code]

Mein Problem ist aber, das ich den Wert "aPercentage" in eine Datenbankabfrage einfüge. Da die Datenbank eine PostGreSQL Datenbank ist muss aber der Wert 62.1 an die Abfrage übergeben werden, mit 62,1 gibt es einen Fehler.