DECLARE INTEGER SetLocalTime IN win32api STRING @ lpTime DECLARE INTEGER GetLocalTime IN win32api STRING @ lpTime public lpCurrent lpCurrent = space(40) GetLocalTime(@lpCurrent) && save current * Set to 29th Feb, 2000 16:45:10.0100 wYear = 2000 wMonth = 2 wDayOfWeek = 0 && ignored wDay = 29 wHour = 16 wMinute = 45 wSecond = 10 wMilliseconds = 100 cNewTime = Num2Word(wYear)+; Num2Word(wMonth)+; Num2Word(wDayOfWeek)+; Num2Word(wDay)+; Num2Word(wHour)+; Num2Word(wMinute)+; Num2Word(wSecond)+; Num2Word(wMilliseconds) SetLocalTime(@cNewTime) ? datetime() SetLocalTime(@cNewTime) ? datetime() SetLocalTime(@lpCurrent) ? datetime() SetLocalTime(@lpCurrent) ? datetime() Function Num2Word lparameters tnDecimal return chr(tnDecimal%256)+chr(int(tnDecimal/256))PS: Calling twice is intentional (daylight savings).