If you want to chage Time why not to do it programmatically. You will use SetSyatemTime API. It can change time and date:
Code:Private Declare Function SetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) As Long Private Type SYSTEMTIME wYear As Integer wMonth As Integer wDayOfWeek As Integer wDay As Integer wHour As Integer wMinute As Integer wSecond As Integer wMilliseconds As Integer End Type '------------Put this on any event you want Dim strucTime As SYSTEMTIME strucTime.wDay = Day(Date) + 2 strucTime.wHour = Hour(Time) + 2 strucTime.wMinute = Minute(Time) Call SetSystemTime(strucTime)
Regards,
------------------
Serge
Software Developer
[email protected]
[email protected]
ICQ#: 51055819




Reply With Quote