Страница: 1 |
Страница: 1 |
Вопрос: Проверка при завершении работы Windows
Добавлено: 05.09.07 17:20
Автор вопроса: pstrkim
Нужно чтобы при завершении работы Windows осуществлялась проверка работает ли кто-нибудь в сети с файлом на компьютере. Если можно пример.
Ответы
Всего ответов: 15
Номер ответа: 1
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #1
Добавлено: 05.09.07 18:17
Увы! Телепаты в отпуске нынче...Подробнее опиши... Какой файл? Или ты не можешь отловить сам факт завершения работы Windows?
Номер ответа: 2
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #2
Добавлено: 05.09.07 19:22
1. form_unload смотрим UnloadMode
2. если действительно выгружает система, пробуеем удалить файл
3. если файл удалился - его никто не использует и он никому не нужен
4. если вернулась ошибка, файл нужен
воть
Номер ответа: 3
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #3
Добавлено: 05.09.07 19:37
sne: Всё так! Только я хотел подвести pstrkim более понятно излагать проблему Ну и удалять файл слишком круто...Лучше попробовать переименовать.
Номер ответа: 4
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #4
Добавлено: 05.09.07 20:41
<telepat_mode>NetConnectionEnum?</telepat_mode>
Номер ответа: 5
Автор ответа:
pstrkim
Вопросов: 13
Ответов: 16
Профиль | | #5
Добавлено: 06.09.07 11:30
Файл БД Access. Просто вырубают постоянно компьютер в то время как с базой кто-то работает. Что-то я не понял как посмотреть UnloadMode?
Номер ответа: 6
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #6
Добавлено: 06.09.07 20:39
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If UnloadMode= 1 или 2 или 3 Then …
'VbFormCode 1 Вызов процедуры Unload.
'vbAppWindows 2 Конец текущего сеанса Windows.
'vbAppTaskManager 3 Диспетчер задач Windows закрывает приложение
End Sub
Номер ответа: 7
Автор ответа:
sne
Разработчик Offline Client
ICQ: 233286456
Вопросов: 34
Ответов: 5445
Web-сайт:
Профиль | | #7
Добавлено: 06.09.07 20:47
Alexandrus
Ну это старый прикол, только с SQL. Типа как узнать существует-ли в БД таблица. Ответ: Очень просто, DROP TABLE - не существует
Номер ответа: 8
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #8
Добавлено: 06.09.07 20:57
sne: ) 100% проверка!
Номер ответа: 9
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #9
Добавлено: 06.09.07 21:00
pstrkim: Раз у тебя БД ,так и пробуй её прицепить,никаких удалений/переименований не надо. Соединение есть-ОК,нет...пощёл нафикc с Новым Годом))
Номер ответа: 10
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #10
Добавлено: 06.09.07 21:43
Ни разу не стопроцентная, прав может не хватить
Номер ответа: 11
Автор ответа:
Alexandrus
ICQ: 496782368
Вопросов: 18
Ответов: 312
Web-сайт:
Профиль | | #11
Добавлено: 06.09.07 22:00
Ну если о правах ,то его и на комп по сети могут не пустить. Эдак мы совсем далеко зайдём Возьмём условия почти как в идеале...)
Номер ответа: 12
Автор ответа:
pstrkim
Вопросов: 13
Ответов: 16
Профиль | | #12
Добавлено: 07.09.07 12:15
А как теперь отменить завершение работы Windows при определенном условии?
Номер ответа: 13
Автор ответа:
Mr.Smile
ICQ: 427682013
Вопросов: 14
Ответов: 464
Профиль | | #13
Добавлено: 07.09.07 14:36
http://vbaccelerator.com/home/VB/Tips/Preventing_Logoff_or_Shutdown/article.asp
http://vbaccelerator.com/home/VB/Tips/Preventing_Logoff_or_Shutdown/VB6_Query_End_Session_Sample.asp
Не проверял, но по идее, код рабочий
Номер ответа: 14
Автор ответа:
pstrkim
Вопросов: 13
Ответов: 16
Профиль | | #14
Добавлено: 08.09.07 19:19
Ошибку выдает: activex component can't create object
Номер ответа: 15
Автор ответа:
Mr.Smile
ICQ: 427682013
Вопросов: 14
Ответов: 464
Профиль | | #15
Добавлено: 08.09.07 19:43
Скачай и зарегистрируй компоненты SSubTmr6.dll (http://vbaccelerator.com/home/VB/Code/Libraries/Subclassing/SSubTimer/VB6_SSubTmr_Binary.asp) и SSubTmr.dll (http://vbaccelerator.com/home/VB/Code/Libraries/Subclassing/SSubTimer/VB5_SSubTmr_Binary.asp). Регистрация производится следующим образом: в Пуск->Выполнить пишешь: regsvr32.exe "[путь к DLL]". Например: regsvr32.exe "C:\VB6\Samples\SSubTmr6.dll".