Самый легкий вариант(на мой взгляд) запускай командную строку через ShellExecute или WinExec. В командной строке указываешь net use c параметрами.
ну что-то типа
| Код | WinExec("net use m: \\main_komp\test pasword /USER:main_komp\user1 /persistent:no", SW_HIDE)
|
с флагами в конце возможно напутал (писал на память, под рукой билдера нет), но думаю суть понятна.
Добавлено через 1 минуту и 45 секунд блин, напутал немного.... это команда открывает сетевую папку, как новый диск.... ссори
Добавлено через 10 минут и 59 секунд вот теперь нашел команду для расшаривания папок
| Код | WinExec("net share test=c:\test", SW_HIDE)
|
|