Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как программно открыть/закрыть доступ к диску (папке)?

HelpMy © (2002-09-17 07:11:00)
Помогите уважаемые знатоки!
Как программно открыть доступ к папке на своем компьютере?

Shadok (2002-09-29 16:07:00) [1]
Используй function NetShareAdd(const pszServer: PChar;
sLevel: SmallInt;
pbBuffer: Pointer;
cbBuffer: Word): DWORD;
stdcall; external "svrapi.dll";

Pumpkin (2002-09-20 10:43:00) [2]
Тебе нужен интерфейс к SvrApi.dll.
Можешь найти его например в LanManager.zip на delphi-jedi.org

Akella (2002-09-19 08:27:00) [3]
WNetAddConnection(NetResourse,Password,LocalName:PChar):longint;

HelpMy (2002-09-17 08:58:00) [4]
NET SHARE отсутствует у Win98. Обидно..

Akella (2002-09-17 08:45:00) [5]
маленькое уточнение

команда
NET SHARE TEST=c:\tmp

расшарила локальный ресурс а не подключила сетевой. ПРОВЕРЕНО!
причем без перезагрузки!

HelpMy (2002-09-17 08:41:00) [6]
Спасибо попробую поискать.

Akella (2002-09-17 08:23:00) [7]
Мне тут посоветовали как обновить реестр:
Нужно послать сообщение что были внесены изменения в реестр. Вот только что за сообщение никто не помнит. Если у тебя есть доки - можешь поискать

HelpMy (2002-09-17 08:05:00) [8]
Спасибо Akella.
Это я уже пробовал, но нужно именно без перезагрузки.
Винда же не просит перезагрузится после установки/снятия доступа.
Может кто побил такую проблему.
По NET SHARE подключается чужойресурс, а нужно предоставлять или закрывать свой.

Akella (2002-09-17 07:59:00) [9]
под Win9Х это все хранится в:
HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Network\LanMan\FOR_AND_FREE

но надо будет перегрузиться
------------------------------
под NT я нашел кучу ключней но так и не смог зашарить.
можно попробовать запустить программу NET с командной строкой

NET share имя ресурса=диск:путь

Подробности по
NET SHARE ?

HelpMy (2002-09-17 07:56:00) [10]
Под Win98

Akella (2002-09-17 07:50:00) [11]
Под какими виндами?

Наверх

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