>Is there a way for change the system time using an Active X control ?
>Or maybe a way using code that probe to be is usefull ?
>
>
> Thanks for your answers ...

I don't know ActiveX for it but you could do with API :

DECLARE INTEGER SetSystemTime IN win32api STRING @ lpTime
DECLARE INTEGER GetSystemTime IN win32api STRING @ lpTime

lpCurrent = space(40)
GetSystemTime(@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)

SetSystemTime(@cNewTime)

? 'After setsystem time :',datetime()
SetSystemTime(@lpCurrent)
? 'Reset back to current :',datetime()

Function Num2Word
lparameters tnDecimal
return chr(tnDecimal%256)+chr(int(tnDecimal/256))

Cetin