Rambler's Top100
Форум: MS ACCESSVBVBA MS OfficeMS SQL server
Новые сообщения: 0000

Форум: MS ACCESS

Вопросы связанные с MS ACCESS

Обновить визитку
Участники «Online»
Все участники

 
 

Доброго времени суток, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: возможно ли
 
 автор: час   (02.11.2010 в 17:28)   личное сообщение
 
 

наверное нет(не возможно) , но всё же спрошу:
Системное время на компе идёт себе идёт....
а возможно ли при смене его показания - изменение на 1 минуту, в тот же самый момент совершить своё злодияние(нужное действие).
Но не таймером, потому как таймером 1 раз в секунду проверять нужно будет.
А именно само событие смена времени - может ( api ) какая есть?

  Ответить  
 
 автор: snipe   (02.11.2010 в 18:57)   личное сообщение
 
 

видимо есть
каспер ведь возмущается на смену даты
(да и сам вы не так давно попадались на это)

как не знаю

  Ответить  
 
 автор: час   (02.11.2010 в 19:30)   личное сообщение
 
 

а я не в курсе!!!

  Ответить  
 
 автор: Explorer   (02.11.2010 в 20:03)   личное сообщение
 
 

это когда сидишь с отчетом, часы скок - и заполночь.

и вдруг...

а-а-а-а-а-а!!! все данные пропали!

  Ответить  
 
 автор: Дядя Федор   (03.11.2010 в 07:59)   личное сообщение
 
 

запустить фоном вторую программу типа опроса времени. она не будет тормозить первую. и как-нибудь генерить событие.

  Ответить  
 
 автор: snipe   (03.11.2010 в 08:19)   личное сообщение
 
 

Вот
нашел нашел
http://am.rusimport.ru/MsAccess/topic.aspx?ID=445

почитай про Элемент Syslnfo

  Ответить  
 
 автор: час   (03.11.2010 в 08:27)   личное сообщение
 
 

спасибо - читаю

SYSINFO.OCX
Событие TimeChanged Происходит при изменении системного времени.
============================================================================
одно слово в этой строке портит всё
если бы было написано

Происходит при смене системного времени.


было бы чудесно

  Ответить  
 
 автор: час   (03.11.2010 в 08:55)   личное сообщение
 
 

нашёл пример - на непонятном мне языке:



#Include <Date.au3>
#Include <GUIConstantsEx.au3>
#Include <WindowsConstants.au3>

Global $hForm = GUICreate('')

GUIRegisterMsg($WM_TIMECHANGE, 'WM_TIMECHANGE')

Do
Until GUIGetMsg() = -3

Func WM_TIMECHANGE($hWnd, $iMsg, $wParam, $lParam)
    Switch $hWnd
        Case $hForm
            $tTime = _Date_Time_GetLocalTime()
            ConsoleWrite(_Date_Time_SystemTimeToDateTimeStr($tTime) & @CR)
    EndSwitch
    Return $GUI_RUNDEFMSG
EndFunc   ;==>WM_TIMECHANGE



; НАЧАЛО

 GUICreate("")

 GUIRegisterMsg(0x1E,"TIMECHANGE")

 $TC=false

 While true
  if $TC then
   SplashTextOn("Внимание!","Изменилось системное время",300,50)
   Sleep(3000)
   SplashOff()
   $TC=false
  endif
  Sleep(100)
 Wend

 Func TIMECHANGE()
  $TC=true
  Return "GUI_RUNDEFMSG"
 EndFunc

; КОНЕЦ


может кто поможет перевести на VB или VBA

  Ответить  
 
 автор: osmor   (03.11.2010 в 09:13)   личное сообщение
 
 

Если вопрос о прерке триального периода, то IMHO подход в корне неверный.
время на компе может сбиться, у мня на домашенм в случае нажатия кнопки ресет, напрочь сбрасывается БИОС, причем даже винты теряет, не то что уже время.
Есть сисемная команда Net time с ее помощью можно попробовать получить время с тайм сервера
Можно просто самому каждую минуту считывать системное время и если вдруг новое сичтанное стало меньше чем считанное ранее бальше разрешенной нами дельты (например 5 минут) , нас пытаются поиметь

  Ответить  
 
 автор: kot_k_k   (03.11.2010 в 09:35)   личное сообщение
 
 

час не знаю как этом клятом виндофсе но раньше было прерывание таймера - оно срабатываете 18 раз у секунду.

былое еще 21-е прерывание на него можно было повесить разные полезные/неполезные (нужное подчеркнуть) штуки.

так вот его вызывало прерывание таймера, оно было пустое.

возьми Абеля и перечитай

п.с. конечно вчера дали копоти, но кажись цифири я помню правильно

  Ответить  
 
 автор: час   (03.11.2010 в 10:53)   личное сообщение
 
 

я каждые 15-20 секунд - конечно сравниваю показания времени, но это с помощью таймера......
Хотел выбросить таймер.
Событие в винде происходит, вот тока как его отловить.
Каждую минуту системное время - скок и на минуту сменилось. Вот научится бы ловить этот скок.
=================================================
http://forum.codenet.ru/archive/index.php/t-38782.html - ответ не верный.......

  Ответить  
 
 автор: kot_k_k   (03.11.2010 в 14:34)   личное сообщение
 
 

нет тацмер системный - непутай с таймером формы.....
он происходит не зависимо от тебя - на нем часый и проч вист(я таки думаю)
при загрузке финды нужно будет вставлять кусок который перепрограммирует (бля еле написал) таймер

  Ответить  
 
 автор: kot_k_k   (03.11.2010 в 14:35)   личное сообщение
 
 


Каждую минуту системное время - скок и на минуту сменилось. Вот научится бы ловить этот скок.



ассемблер

  Ответить  
 
 автор: час   (03.11.2010 в 17:10)   личное сообщение
 
 

  Ответить  
 
 автор: Lukas   (04.11.2010 в 00:25)   личное сообщение
 
 


...Каждую минуту системное время - скок...


Значительно чаще.

  Ответить  
HiProg.com - Технологии программирования
Rambler's Top100 TopList