OpenOffice.info

sub zeigedatum
oDoc = thiscomponent

oTxtFelder = oDoc.getTextFields().createEnumeration()

do while oTxtFelder.hasmoreElements()

oFeld = oTxtFelder.nextElement
 if ofeld.IsDate=true then
   msgbox ofeld.DateTimeValue.day
   msgbox ofeld.DateTimeValue.Hours
   msgbox ofeld.DateTimeValue.HundredthSeconds
   msgbox ofeld.DateTimeValue.Minutes
   msgbox ofeld.DateTimeValue.Month
   msgbox ofeld.DateTimeValue.Seconds 
   msgbox ofeld.DateTimeValue.Year
end if
loop
end sub

Hallo,

blöderweise hat das Datumsfeld keinen eigenen Namen über den man darauf zugreifen kann. Es geht aber über eine Schleife über alle Felder.
Das Datum ist dann, wie richtig erkannt, in dem Sruct DateTimeValue abgelegt.
Aus diesem Struct muß man sich dann wieder das Datum für die Datenbank zusammen setzen.

[code]
sub zeigedatum
oDoc = thiscomponent

oTxtFelder = oDoc.getTextFields().createEnumeration()

do while oTxtFelder.hasmoreElements()

oFeld = oTxtFelder.nextElement
if ofeld.IsDate=true then
msgbox ofeld.DateTimeValue.day
msgbox ofeld.DateTimeValue.Hours
msgbox ofeld.DateTimeValue.HundredthSeconds
msgbox ofeld.DateTimeValue.Minutes
msgbox ofeld.DateTimeValue.Month
msgbox ofeld.DateTimeValue.Seconds
msgbox ofeld.DateTimeValue.Year
end if
loop
end sub
[/code]


mfg
Michael

hiho,

wie die überschrift schon verlauten lässt, stehe ich vor einem problem.
ich möchte eines mittels feldbefehl/datum angelegtes datumsfeld via starbasic auslesen lassen, um dieses später einer datenbank zuordnen zu können.

irgendwie fehlt mir der nötige feinschliff und die starbasic dokumentation macht es einem anfänger wirklich nicht einfach.

bin auf folgendes gestoßen
com.sun.star.text.TextField.DateTime stellt datum und uhrzeit dar.

schick...
mit der eigenschaft DateTimeValue (Struct) kann man den aktuellen wert des feldes wohl auslesen...

nur, wie mach ich das? ;)

kann mir bitte jmd auf die sprünge helfen?

1000 dank

[ grobkorn ]