Hallo,
für meine Datenbank bekomme ich Kalenderdaten in der Form "11.2.2004" als
String.
Diese werden zunächst in eine Listbox importiert, beim Import wird TotalSeconds
berechent und in eine eigene Spalte geschrieben:
dim tmpTotalSeconds as Double
'aus der String-Form des Datums werden die einzelnen Teile herausgefiltert
d2.Day = val(NthField(KalenderdatenFenster.Grid.Cell(i,1),".",1))
d2.Month = val(NthField(KalenderdatenFenster.Grid.Cell(i,1),".",2))
d2.Year = val(NthField(KalenderdatenFenster.Grid.Cell(i,1),".",3))
d2.Hour = 0
d2.Minute = 0
d2.Second = 0
KalenderdatenFenster.Grid.Cell(i,5) = str(d2.TotalSeconds)
In der Spalte steht nun ein String: 3.159302e+9
Berechne ich nun aus diesem Wert wiederum das Datum, bekomme ich: 10.02.2004,
23:53:20
Und das kann ich natürlich nicht brauchen.
Was kann ich besser machen?
beste Grüße, Christian Hahn.
