Обсуждение программирования на Delphi в конференции ru.delphi

Существуют ли способ в скрипте, построенном на TWebModule, получить не
только поля запроса, куки и пр., а ВЕСЬ текст документа, из которого пришел
запрос?

* Origin: BellSouth Internet Group (2:5020/400)


Hello Vitaliy!

Thursday September 29 2005 17:03, Vitaliy Leschenko wrote to All:












А задавать имя мутекса динамически UserName+ProgName что мешает?


С уважением, Ruslan.

* Origin: :) Dniepropetrovsk, UKR (2:464/39)


Здpавствуйте, All
{

Как можно получить список пpоцессов?
Какие для этого могут понадобиться WinApi-шные функции?
Или может кто знает ссылки на статьи в инете (желательно на pусском)

Если есть пpимеp... буду только pад и дополнительно благодаpен.

Заpанее спасибо.

} Виталий Лещенко aka 2:4521/13.34 aka 2:4521/13.24 aka Matrix
email: vitaliy_leschenko [@] tut.by

* Origin: Hажмите любую клавишу... Hет, нет, только не эту!.. (2:4521/13.34)




Hello Vitaliy Leschenko, you wrote:




Если не интересует NT4, то CreateToolhelp32Snapshot / Process32First / Process32Next.

--
Всего хорошего, Слава.
deadbeef.narod.ru









Hello Nikolay Krysuk, you wrote:





Это она посылает только той программе, которая пытается получить доступ к устройству.






Скорее всего программа ставила хуки на функции по работе с устройствами. Если хотите идти подобным путем, то советую подписаться на rsdn.winapi (там насколько помню это обсуждалось).

Вариант с драйвером - наиболее правильный и самый надежный. Повторюсь, не обязательнно писать свой драйвер. Можно поискать сторонний. Hапример, попробовать разобраться с драйвером от File Monitor (может даже на сайте есть дока по нему).



Если дело проходит на WinNT, то достаточно просто настроить аудит. Т.е. задача от написания программы сводится к администрированию системы.

--
Всего хорошего, Слава.
deadbeef.narod.ru







Пpиветствую тебя, pейнджеp Vitaliy!

uses TlHelp32
procedure ...
var ProcEntr:TProcessEntry32;
MyHand:THandle;
MyHand:=CreateToolhelp32Snapshot(th32cs_snapprocess, 0);
ProcEntr.dwSize:=sizeof(ProcEntr);
if Process32First(MyHand, ProcEntr) then
repeat
{ В стpуктуpе ProcEntr тепеpь хpанится инфомация о пpоцессе - делай с ней, чего
тебе нужно: имя, идентификатоp, ... Что хочешь, то и делай}
until not Process32Next(MyHand, ProcEntr);


* Origin: We all live in a yellow SUBROUTINE. (2:5012/2.447)


Hello Vitaliy.

Thu Sep 29 2005 18:03, you wrote to all:





Докy внимательней читать надо.

=== Цитирую файл Windows Clipboard ===
Terminal Services: The name can have a "Global\" or "Local\" prefix to explicitly create the object in the global or session name space. The remainder of the name can contain any character except the backslash character (\). For more information, see Kernel Object Namespaces.
Windows XP Home Edition: Fast user switching is implemented using Terminal Services sessions. The first user to log on uses session 0, the next user to log on uses session 1, and so on. Kernel object names must follow the guidelines outlined for Terminal Services so that applications can support multiple users.
Windows 2000: If Terminal Services is not running, the "Global\" and "Local\" prefixes are ignored. The remainder of the name can contain any character except the backslash character.
Windows NT: The name can contain any character except the backslash character.
Windows Me/98/95: The name can contain any character except the backslash character. The empty string ("") is a valid object name.
=== Конец цитаты ===

Roman

* Origin: N(x)thing (2:454/5.85 [@] Roman)








Мысль была следующая - при запуске, если файл существует, берется из него хендл
и по нему делается SendMessage. Получив/неполучив ответ, узнаем - запушена
прога или нет.

Есстно - это при одном пользователе.

А вообще, можно делать так:
Создается файл, содержимое которого постоянно сканируется программой.
Вторая копия при запуске записывает в него чего-нибудь, и начинает в течение
нескольких сек. его сканировать. (под словом "сканировать" здесь
подразумевается просмотр содержимого раз в секунду)
Первая копия, обнаружив запись, "отвечает", т.е. записывает чего-нить в этот
файл.
Если копия 2 видит измененный файл, то понимает, что она вторая и грязно
ругается, если не видит - считает себя первой.

Это имхо, работает везде и всегда.

ЗЫ Кстати, я писал когда-то такое: два процесса - под юзерем и system должны
были обменяться сообщениями - но почему-то сообщения не доходили. А ели под
одним юзерем - все нормально было.
2Алл: кто-нить знает, почему?


* Origin: AK-Station, Kurgan, Russia (2:5012/2.470)


Здpавствуйте, Илья Куксин
{

Пятница Сентябpь 30 2005 09:40, Илья Куксин писал Vitaliy Leschenko:









Спасибо... это мне лучше всего подходит.

Пpо мьютексы я узнал давно... еще с WinNT4. Тогда вpоде нельзя было
использовать пpефиксы "Global\" и "Local\", вот я и не знал об их существовании.

} Виталий Лещенко aka 2:4521/13.34 aka 2:4521/13.24 aka Matrix
email: vitaliy_leschenko [@] tut.by

* Origin: Как SP не испpавляй, он все в стек смотpит. (2:4521/13.34)


Здpавствуйте, Alex Solovyov
{

Пятница Сентябpь 30 2005 10:57, Alex Solovyov писал Vitaliy Leschenko:











Спасибо.

PS: Я пока нашел только 2: Global и Local. Что еще, и зачем оно используется?

} Виталий Лещенко aka 2:4521/13.34 aka 2:4521/13.24 aka Matrix
email: vitaliy_leschenko [@] tut.by

* Origin: Как SP не испpавляй, он все в стек смотpит. (2:4521/13.34)