supervueloman <supervuelo...@...> writes:

 
Hallo zusammen
> 
> Sieht so aus als ob du dich intensiv mit Base Makros beschäftigst.
> >> Sub setFechaImporte
> >>     Dim oForm, oDate
> >>     oForm = ThisComponent.DrawPage.Forms.getByName("FormZahlen")
> >>     oDate = oForm.getByName("datDatum").Date
> >>     If oDate=0 Then
> >>         oForm.getByName("datDatum").Date = CDateToIso(date())
> >>        
> >>      Else
> >>          MsgBox (oDate )
> >>      end if


Wie soll das gehen eine getProperty-Methode zum Schreiben eines Wertes
einzusetzen? Dat ganze Datumswesen ist eh ziemlich undurchsichtig. ICh bin etwa
so zurecht gekommen:

Dim dat as new "com.sun.star.util.Date"

dat = odatControl.Boundfield.getDate()
dat.day=day(date())
dat.month=month(date())
dat.year=year(date())
odatControl.BoundField.updateDate(dat)

Gruß HW
Hans W. Hofmann



---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]

Antwort per Email an