/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Basic/VBA

Выпуск № 734
от 21.03.2008, 12:35

Вопрос № 127.430

Здравствуйте, уважаемые эксперты. 1. Возникла необходимость проверять, какие приложения активны в данный момент времени на машине пользователя. Из VB6 каким способом можно реализовать? 2. Возможность отследить активность пользователя (движение мыши и нажатие клавиш). Буду благодарен за любые подсказки.

Отправлен: 15.03.2008, 13:18 Вопрос задал: Вильгоненко Станислав Викторович (статус: 2-ой класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Тесленко Евгений Алексеевич Здравствуйте, Вильгоненко Станислав Викторович! 1. Код в приложении сообщит Вам о всех запущенных процессах. Евгений. Приложение: Sub listProcesses() ' VB Dim s Set WshShell = CreateObject("WScript.Shell") On Error Resume Next Set WMI = GetObject("winMgmts:") If Err.Number <> 0 Then WshShell.Popup "Ошибка соединения WMI", 0, "Закрытие программы " , 16 Exit Sub ' VB 'WScript.Quit() 'VBS End If Squery = "Select * From Win32_Process" ' Where Name=" & "Условие отбора" Set Processes = WMI.ExecQuery(Squery) For Each Process In Processes s = s & Process.Name & vbCrLf Next WshShell.Popup s, 0, "Процессы в системе ", 64 End Sub ' VB

Ответ отправил: Тесленко Евгений Алексеевич (статус: Студент) Ответ отправлен: 20.03.2008, 00:50 Оценка за ответ: 5 Комментарий оценки: Огромное спасибо! Правда я хотел скорее получать заголовки активных окон! И по активности мышы и клавиатуры что-нибудь?

Вопрос № 127.483

Уважаемые эксперты! Подскажите есть ли в access возможность работы сбуфером обмена напрямую. В частности интересует анализ содержания буфера с преобразованием части его в записи access.

Отправлен: 15.03.2008, 21:19 Вопрос задал: VADIM_gIM (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Тесленко Евгений Алексеевич Здравствуйте, VADIM_gIM! В VBA MS Access есть возможность "работы сбуфером обмена". Получить строчные данные из буфера обмена можно с помощью подобной функции (в приложении). А "...анализ ... с преобразованием части его в записи access..." (очевидно сохранение в таблице базы данных MS Access?), зависит от того, что с полученной строкой Вы хотите сделать. Евгений. Приложение: Function readClipboard() As String On Error Resume Next readClipboard = Clipboard.GetText(vbCFText) End Sub

Ответ отправил: Тесленко Евгений Алексеевич (статус: Студент) Ответ отправлен: 18.03.2008, 21:22

Вопрос № 127.504

Здравствуйте! Мой язык программирования: VB. Я работаю в редакторе VB6. Я хочу сделать так, чтобы моя программа выполнила команду, которая задается в командной строке. Например, я хочу, чтобы когда я запустил программу, то она сама выполнила команду, которую нужно вводить в командную строку: regedit. Как я понимаю, здесь надо как-то вызвать командную строку и ввести туда эту команду. ВОПРОС: как это сделать ? Буду очень благодарен, если Вы напишите пример кода такой программы. Большое спасибо!

Отправлен: 16.03.2008, 00:22 Вопрос задал: Красильников И.П. (статус: 10-ый класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 12)

Отвечает: Павленко Александр Геннадьевич Здравствуйте, Красильников И.П.! эмуляция командной строки производится опертором Shell("_команда_")

Ответ отправил: Павленко Александр Геннадьевич (статус: 1-ый класс) Ответ отправлен: 16.03.2008, 08:34 Оценка за ответ: 5 Комментарий оценки: Благодарю за ответ! Все отлично работает!

© 2001-2008, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале Версия системы: 4.72.5 от 17.03.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru