OpenOffice.info

OK, jetzt habe ich es verstanden
vielen Dank für deine Bemühungen

Gruss Markus

Es kommt auf die Datenbank an - und wie diese Deine "Zeit" akzetiert.


Sprich:


übergibst Du [b][color=#0040FF]01.02.2008[/color][/b] an die DB für eine als [i]timestamp [/i]definierte Spalte, dann kann die [i]engine[/i]:

a) das akzpetieren, und die Stunden, Minuten, Sekunden und Hundertstel-/Tausendstelstellen mit Null auffüllen, oder
b) einen Fehler schmeissen, dass nicht das erwartete Zeitformat bedient wurde, weil Du eben schreiben musst: [color=#008000]01.02.2008 00:00:00[/color] oder [color=#008000]01.02.2008 00:00:00,00000[/color]

So akzeptiert MySQL über Webmin bei mir (SuSE 10.1 !) gefüllt bspw.

[color=#0040FF]01.02.2008
01.02.2008 01:02:03[/color]

aber nicht

[color=#FF4000]01.02.2008 01:02:03,000000[/color]

(obwohl die Zeitstempel im letzteren Format angezeigt werden)

[quote] [b]komma4 hat geschrieben:[/b]
(:= welche Zeichenkette als gültiges Datum akzeptiert wird.
[/quote]

Verstehe ich das richtig, dass es noch darauf ankommt, wie die entsprechende Spalte neben "timestamp" sonst noch formatiert ist?
z.B. TT.MM.JJ HH:MM:SS geht nicht
aber TT.MM.JJJJ... geht (Jahr zwei oder vierstellig)?

[quote="Jensemann"]etwas ähnliches hatte ich auch mit [code].getString()[/code][/quote]

Bedeutet?
Was für ein Problem war es - wie hast Du es gelöst?

[quote="hema"][code]Sub versendenEintragen ()
mydb = "mitglieder"
heute = "(now())"
.....
....
sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & heute [/code]

Vielleicht kann mir mal jemand den Unterschied erklären...
Gruss Markus[/quote]

Damit übergibst Du eine Zeichenkette an die Datenbank-[i]engine[/i].

Im anderen Fall wird durch BASIC die Funktion [color=#008000]NOW()[/color] ausgeführt - und eben deren Rückgabewert übergeben.

Das zunächst probierte Beispiel stammt aus einem erfolgreichen Versuch mit einer PostgreSQL-DB.
Ob es funktioniert oder nicht liegt an der engine (:= welche Zeichenkette als gültiges Datum akzeptiert wird.

.getString()

Hallo,

etwas ähnliches hatte ich auch mit [code].getString()[/code]

Grüße

Jensemann

Sub versendenEintragen ()
mydb = "mitglieder"
heute = "(now())"
.....
....
sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & heute 

End Sub

Konnte mein Problem lösen.
Wenn ich die now()-Funktion direkt in SQL ausführen lasse, kommt die Fehlermeldung, die ich schon früher gemeldet habe.
Wenn ich "now()" vorher definiere (weiss nicht, ob dies der richtige Ausdruck ist), funktionierts.

[code]Sub versendenEintragen ()
mydb = "mitglieder"
heute = "(now())"
.....
....
sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & heute

End Sub
[/code]

Vielleicht kann mir mal jemand den Unterschied erklären...
Gruss Markus

Habe zur Kontrolle den SQL-Befehl über Extras -> SQL ausführen lassen.

UPDATE "tbl_Daten" SET "Karte" = now()

Hier wird der Befehl problemlos ausgeführt. Es kann also nicht daran liegen, dass eine Tabelle oder Spalte nicht vorhanden ist.

sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & now() 
oStatement.executeUpdate( sSQL )

Hallo komma4,
vielen Dank für den Tip, hat aber leider eine Fehlermeldung ausgelöst.
Habe die Reihenfolge geändert auf
[code]sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & now()
oStatement.executeUpdate( sSQL )[/code]

Nun erhalte ich allerdings eine Fehlermeldung:

BASIC-Laufzeitfehler.
Es ist eine Exception aufgetreten
Type: com.sun.star.sdbc.SQLException
Message: Table not found in Statement [UPTDATE "tbl_Daten"].

Die Tabelle "tbl_Daten" und die Spalte "Karte" existieren beide.

wie weiter? :?:

Arbeite mit OOo 2.4 unter Linux und OO0 Portable 2.3.1 ab USB-Stick im Geschäft, da ich hier nichts installieren kann.
Die Fehlermeldung erscheint auf beiden Systemen.

Du solltest die [color=#008000]sSQL[/color]-Zeile mit dem Befehl VOR die [color=#008000].execute[/color]-Zeile setzen .... dann sollte das klappen, oder?

Sub versendenEintragen ()
mydb = "mitglieder"
Dim oDataBaseContext as Object
Dim oDataSource as Object
Dim oConnection as Object
Dim oStatement as Object

oDatenbankKontext = CreateUnoService ( "com.sun.star.sdb.DatabaseContext" )
' Datenquelle auswählen
oDatenquelle = oDatenbankKontext.getByName( mydb )
' Verbindung zur DB herstellen
oVerbindung = oDatenquelle.getConnection( "" , "" )
' Statement erzeugen
oStatement = oVerbindung.createStatement
' Abfrage absetzen
oStatement.executeUpdate( sSQL )


sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & now() 

End Sub

Hallo zusammen,
habe folgendes Problem:
Ich versende Rechnungen an die Mitlieder.
Diese bezahlen und ich trage dies in der Verwaltung ein.
Einmal pro Woche drucke ich die MItgliederkarten aus und versende sie.
Dann trage ich bei den Mitgliedern das Datum des Versenden ein, falls Fragen kommen...
Bin nun an einem Makro, bei welchem ich das Datum des Versenden bei allen auf einmal eintragen kann, so dass ich nicht 10, 20 oder mehr Datensätze von Hand nachtragen muss.
Dabei habe ich unter anderem auf diesen Eintrag im Forum aufgebaut: [url]http://de.openoffice.info/viewtopic.php?f=1&t=15602&p=63899&hilit=ssql#p63899[/url].

Mein bisheriger Code:

[code]Sub versendenEintragen ()
mydb = "mitglieder"
Dim oDataBaseContext as Object
Dim oDataSource as Object
Dim oConnection as Object
Dim oStatement as Object

oDatenbankKontext = CreateUnoService ( "com.sun.star.sdb.DatabaseContext" )
' Datenquelle auswählen
oDatenquelle = oDatenbankKontext.getByName( mydb )
' Verbindung zur DB herstellen
oVerbindung = oDatenquelle.getConnection( "" , "" )
' Statement erzeugen
oStatement = oVerbindung.createStatement
' Abfrage absetzen
oStatement.executeUpdate( sSQL )


sSQL = "UPDATE ""tbl_Daten ""SET ""Karte ""= " & now()

End Sub
[/code]
Nach einigen Fehlermeldungen (wie üblich bei mir durch Hochkomma-Fehler usw.) habe ich die Fehlermeldungen weg.
Aber nun passiert folgendes: Nämlich gar nichts.
Wenn ich das Makro ablaufen lasse, kommt keine Fehlermeldung mehr, aber es werden auch keine Einträge gemacht.
Die Spalte "Karte" ist als timestamp definiert.

Kann mir jemand sagen, wo ich den Fehler finden kann.

Ein hoffnungsvolles Danke im Voraus