Саня, не заводись

может я не внятно рассказала, или может ему решение с таймером не нравится

может у меня неправильные месаджбоксы, или я не умею их "готовить",
но на них как минимум кнопка ОК , т,е пока на кнопку не нажмёшь, программа дальше не идёт, а я хочу через 5 (например) минут что-то сделать, а не ждать пока его величество юзер на кнопку нажмёт

даже и в мыслях не было обижаться, так что рыдания отменяются
даже наоборот, очень приятно что моя идея кому-то поможет и уважаемая общественность не освистала

эту процедуру я написала давно, когда и апп-я и данные были на Аксесе

2Если MsgBox из Form_Timer вызывается (прямо или через какие-нибудь функции) - тады да, будет тормозить
я как раз из Form_Timer эту формочку- предупреждение вызываю

таймер у меня один на всё приложение
в той же процедурке ещё сидит проверка -если юзер больше 30 минут ничего не делает, то аппликация закрывается автомат-ки

2У меня ADP+MS SQL

а у меня АксесХР +линкованные таблички SQL , увы
переход на ADP не светит

Private Sub Form_Timer()
'/////////
Static LastFormName As Variant
Static LastControlName As Variant
Static IdleTime As Variant
Dim N As Integer
Dim ActiveFormName As Variant
Dim ActiveControlName As Variant

On Error Resume Next
N = 30
'n- kol-vo minut cherez kotoroe zakrivaetsa applikazia , esli polzovatel ne rabotaet
ActiveFormName = Screen.ActiveForm.Name
ActiveControlName = Screen.ActiveControl.Name

On Error GoTo 0

If LastFormName <> ActiveFormName Then
LastFormName = ActiveFormName
IdleTime = 0
End If

If LastControlName <> ActiveControlName Then
LastControlName = ActiveControlName
IdleTime = 0
End If

IdleTime = IdleTime + Me.TimerInterval / 1000

If IdleTime = 60 * N Then
IdleTime = 0
DoCmd.CLOSE acForm, "ActiveFormName", acSaveYes
DoCmd.Quit
End If


End Sub

Time Interval=1000, повесить на главную форму, на событие Timer

вариант рабочий, так и должно быть с кавычками

промахнулась
да, кавычки лишние, но с ними тоже работает

кажется рано обрадовалась, начали раздаваться свистки.... ну хоть помидорами не забрасывай
кавычки действительно лишние
а вот строчку выбрасывать не надо