ohne Deinen Code getestet zu haben, vermute ich den Fehler hier:
Code: Alles auswählen
Dim date As Date
...
todayDate = date()
https://wiki.openoffice.org/wiki/Docume ... Library%29
Ich muss mich schon schwer irren, oder?
Gruß
Gerd
Moderator: Moderatoren
Code: Alles auswählen
Dim date As Date
...
todayDate = date()
Code: Alles auswählen
'2015-09-14'
Code: Alles auswählen
todayDate = YEAR(date())&"-"&MONTH(date())&"-"&DAY(date())
Code: Alles auswählen
todayDate = YEAR(date())&"-"&RIGHT("0"&MONTH(date()),2)&"-"&RIGHT("0"&DAY(date()),2)
Code: Alles auswählen
Statement.executeUpdate("INSERT INTO ""SHEET_1"" (NAME, VERSION, DATUM, F8) VALUES ('"+derName+"','"+version+"','"+todayDate+"',"+F8+")")
Code: Alles auswählen
"Text " + F8
Code: Alles auswählen
Statement.executeUpdate("INSERT INTO ""SHEET_1"" (NAME, VERSION, DATUM, F8) VALUES ('"+SaveName+"','"+version+"','"+currentDate()+"',"+Str(F8)+" )")