Alterando as permissões em pastas através do Delphi

Delphi

28/06/2013

Bom dia.

Estou com algumas dúvidas.

Gostaría de saber se é possível alterar as permissões em pastas do Windows através de usuários de um domínio.

Por exemplo, tenho um storage com pastas dentro de um domínio.

Crio uma nova pasta chamada Pasta1, localizada em C:\Pasta1.
Com o botão direito no Windows, clico em propriedades, vou até a aba segurança e lá registro quais usuários do domínio poderão ter acesso a esta pasta, lembrando que para que estas alterações possam ser realizadas, eu preciso ser administrador do domínio.
Lá dou a permissão para os seguintes usuários, por exemplo:
1) TI (Grupo);
2) Admins. do domínio;

Via Windows é bem fácil fazer isso, porém gostaria de saber como pode ser feito isso via Delphi.
Fábio Sela

Fábio Sela

Curtidas 0

Respostas

Jonathan Schmitt

Jonathan Schmitt

28/06/2013

Up. Possuo a mesma dúvida.
GOSTEI 0
Jonathan Schmitt

Jonathan Schmitt

28/06/2013

Abra uma prompt de comando (Iniciar > Executar > Digite cmd e Pressione ENTER)…

Para Exibir as Permissões dos Arquivos utilize o comando:

cacls “nomedoarquivo” (ou pasta)

Será exibido as permissões dadas a esse arquivo. Sendo:

R Ler
W Gravar
C Alterar (gravar)
F Controle total

e os parametros.

/E – Edita as permissões

/G – Concede direitos ao usuário especificado utiliza-se cacls “nomearquivo” /E /G usuario:Permissão(R,W,C,F)

/P – Substitui os direitos ao usuário especificado utiliza-se cacls “nomearquivo” /E /P usuario:Permissão(R,W,C,F)

/R – Revoga os direitos do usuário especificado utiliza-se calcs “nomearquivo” /E /R usuario

/D – Nega Acesso ao usuário especificado utiliza-se calcs “nomearquivo” /E /D usuario

Para Editar permissões :

cacls “nomedoarquivo”(ou pasta) /E /P (ou G) “nomedousuario:Permissão a ser concedida

ex: cacls pci.txt /E /P User:F – Nesse caso foi concedida permissão total(F) ao usuario “User” para o Arquivo “pci.txt”

Para Remover permissões

cacls “nomedoarquivo” /E /D usuario

ou

cacls “nomedoarquivo” /E /R usuario

O retorno da execução correta do comando é : arquivo processado:”Unidade\Nomearquivo”

Mais Informações digita CACLS na prompt ou:

http://support.microsoft.com/kb/162786/pt-br

CACLS + BATs

http://support.microsoft.com/kb/135268

em Ingles

http://www.netadmintools.com/art18.html


Referências: http://www.remontti.com.br/blog/archives/471
GOSTEI 0
Jonathan Schmitt

Jonathan Schmitt

28/06/2013

Olá!

Desta forma funcionou para mim:

ICACLS NomeOuDiretórioDoArquivo /GRANT NomeDoUsuárioOuGrupoDeUsuários:F

Mais informações: https://technet.microsoft.com/pt-br/library/cc753525(v=ws.10).aspx

Abraço!
GOSTEI 0
POSTAR