Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Доступ к ресурсу по паролю [WinXP]


Алекс2 ©   (2003-10-04 15:34:00) 

Существует ли возможность отследить попытку подключения с расшаренному ресурсу, запросить пароль, и, при необходимости, разорвать соединение? Есть проги, но глючат, есть стандартные средства, с помощью которых этого сделать не удается, подключение в качестве гостя не устраивает, пароль надо ставить только на одну папку... Как быть?


Алекс2   (2003-10-04 19:50:00) [1]

Жаль, не совсем то что хотелось бы..


1234567890   (2003-10-04 19:24:00) [2]

Подключаемся:

var
NetResource: TNetResource;
begin
NetResource.dwType := RESOURCETYPE_ANY;
NetResource.lpLocalName := nil;
NetResource.lpRemoteName := "Путь к расшаренному ресурсу";
NetResource.lpProvider := nil;
if WNetAddConnection2(NetResource,"Пароль","Логин", CONNECT_TEMPORARY)<>NO_ERROR then
begin
если подключились, то делаем все что нужно
end;


Отключаемся:

WNetCancelConnection2("Путь к расшаренному ресурсу",0,TRUE);


Наверх

Титульная страница Поиск, карта сайта Написать письмо