![]() |
Модераторы: korob2001, ginnie |
![]() ![]() ![]() |
|
Mikhail0s |
|
|||
Новичок Профиль Группа: Участник Сообщений: 6 Регистрация: 15.7.2005 Репутация: нет Всего: нет |
Как работать с правами под виндой не вызывая виндовых утилит? Нужно получать/назначать права.
|
|||
|
||||
chaos |
|
|||
![]() Серийный программист ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 2979 Регистрация: 7.7.2004 Где: Екатеринбург Репутация: 6 Всего: 44 |
никак!!!!!!!!!!
|
|||
|
||||
sharq |
|
|||
![]() Perl Liker ![]() ![]() Профиль Группа: Участник Сообщений: 841 Регистрация: 13.12.2004 Где: Ростов-на-Дону Репутация: 23 Всего: 28 |
Mikhail0s к сожалению, функция chmod, позволяющая назначать права доступа, работает только для *nix-подобных систем. Для WindowsNT пока еще нет реализации...
Есть модуль File::Find::Rule::Permissions, но он только для *nix-подобных систем. Для Windows есть модуль Win32::File, с помощью которого можно назначать традиционные DOS-атрибуты файлам. Этот модуль входит в стандартную комплектацию perl и содержит два метода: GetAttributes и SetAttributes. Возможные атрибуты: ARCHIVE - The file has been modified since it was last archived. DIRECTORY - The file is a directory. HIDDEN - The file is hidden (that is, it won't normally appear in directory listings). NORMAL - The file is a normal (read/write) file. READONLY - The file is read-only. SYSTEM - The file is a system file (among other things, it can't be deleted without first changing the attributes). COMPRESSED OFFLINE TEMPORARY Если ты используешь файловую систему NTFS, то для установки прав необходимо использовать модуль Win32::FileSecurity или утилиту Windows NT cacls.exe . Также можешь посмотреть в сторону таких модулей, как Win32::NetAdmin и Win32API::Net. ![]() Это сообщение отредактировал(а) sharq - 19.8.2005, 17:20 -------------------- [color=gray]There's More Than One Way To Do It[/color] |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Perl" | |
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |