Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Интересно...? / 9 сообщений из 9, страница 1 из 1
10.06.2005, 03:39:11
    #33110774
CLilian
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
Возможно ли сделать так что бы программа написаное на ВБ6 которая канектица к SQL Server-у, если юзер не пользуетца программой через некоторое время праграмма прекратила связь с сервером т.е.
Код: plaintext
cn.close
ну типа как в виндоусе если ничего не делать через некоторое время включица screen saver.
Может ктото сделал подобное, поделитесь как. Спасибо!
...
Рейтинг: 0 / 0
10.06.2005, 09:19:59
    #33110934
nibbles
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
CLilianВозможно ли сделать так что бы программа написаное на ВБ6 которая канектица к SQL Server-у, если юзер не пользуетца программой через некоторое время праграмма прекратила связь с сервером т.е.
Код: plaintext
cn.close
ну типа как в виндоусе если ничего не делать через некоторое время включица screen saver.
Может ктото сделал подобное, поделитесь как. Спасибо!
Не понял, в чем проблема-то?
Таймер сделать - задача для студента второго курса.
...
Рейтинг: 0 / 0
10.06.2005, 17:22:38
    #33112520
CLilian
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
С таймером все понятно. Но как кантралировать если юзер пользетьца праграммой или нет. Веть праграма может проста так работать я имею в веду что допустим юзер ушол на обед а прогу забыл выключить штобы в это время никто посторонии не работал с данными, программа сама должна завершить свое действие через указаный интервал времени.
Пример:
Таймер = 5 минут
Если юзер работает то это время както должно остановица. Но как юзер вообше не работает т.е. никаких работ программа не делает таймер должен включитца. И тут надо учесть что форм в праграмме много.

Вопрос заключается в следуюшем:
Где разместить код по аквации таймера в форме или формам и как посмотреть работает юзер спрограммой или нет?
...
Рейтинг: 0 / 0
10.06.2005, 17:38:13
    #33112566
nibbles
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
CLilianС таймером все понятно. Но как кантралировать если юзер пользетьца праграммой или нет. Веть праграма может проста так работать я имею в веду что допустим юзер ушол на обед а прогу забыл выключить штобы в это время никто посторонии не работал с данными, программа сама должна завершить свое действие через указаный интервал времени.
Пример:
Таймер = 5 минут
Если юзер работает то это время както должно остановица. Но как юзер вообше не работает т.е. никаких работ программа не делает таймер должен включитца. И тут надо учесть что форм в праграмме много.

Вопрос заключается в следуюшем:
Где разместить код по аквации таймера в форме или формам и как посмотреть работает юзер спрограммой или нет?
Отслеживание щелчков и чейджей. Либо перехват нажатий мыши и клавиатуры через API (посмотрите про хуки и субклассинг в этом форуме) - смысл в том, чтобы перехватывать ЛЮБОЕ шевеление мыши или клавы
...
Рейтинг: 0 / 0
10.06.2005, 18:00:13
    #33112634
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
Гораздо проще объявить соединение с базой как withevents и повесить включение таймера на adoCn_ExecuteComplete
...
Рейтинг: 0 / 0
10.06.2005, 18:57:23
    #33112739
CLilian
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
AntonariyГораздо проще объявить соединение с базой как withevents и повесить включение таймера на adoCn_ExecuteComplete
А примерчик можно если не трудно?
...
Рейтинг: 0 / 0
12.06.2005, 00:33:09
    #33113426
CLilian
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
To Antonariy
Может сылку подскажеш где можно найти подобный пример?
...
Рейтинг: 0 / 0
14.06.2005, 11:00:31
    #33115102
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
Код: plaintext
1.
2.
3.
4.
Dim Withevents cn as ADODB.Connection

Private Sub cn_ExecuteComplete(ByVal RecordsAffected As Long, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pCommand As ADODB.Command, ByVal pRecordset As ADODB.Recordset, ByVal pConnection As ADODB.Connection)
    Timer1.Enabled = True
End Sub
...
Рейтинг: 0 / 0
14.06.2005, 13:34:14
    #33115570
CLilian
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Интересно...?
Спасибо щас попробую!
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Интересно...? / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]