kimiraikkonen
Mon May 12 04:50:30 CDT 2008
On May 12, 8:04 am, v-l...@online.microsoft.com (Linda Liu[MSFT])
wrote:
> Thanks AZ for your reply!
>
> Hi Simeon,
>
> As AZ has suggested, we can get the DirectorySecurity object by calling
> DirectoryInfo.GetAccessControl method first and then get the owner by
> calling the DirectorySecurity.GetOwner method passing NTAccount as the
> parameter.
>
> The following is a sample:
>
> Imports System.IO
> Imports System.Security.AccessControl
> Imports System.Security.Principal
>
> Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
> System.EventArgs) Handles MyBase.Load
> Dim di As New DirectoryInfo("directoryname")
> Dim ds As DirectorySecurity =3D di.GetAccessControl()
> Dim owner As NTAccount =3D CType(ds.GetOwner(GetType(NTAccount)),
> NTAccount)
> End Sub
>
> Hope this helps.
> If you have any question, please feel free to let me know.
>
> Sincerely,
> Linda Liu
> Microsoft Online Community Support
>
> Delighting our customers is our #1 priority. We welcome your comments and
> suggestions about how we can improve the support we provide to you. Please=
> feel free to let my manager know what you think of the level of service
> provided. You can send feedback directly to my manager at:
> msd...@microsoft.com.
>
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D
> Get notification to my posts through email? Please refer to
http://msdn.mic=
rosoft.com/subscriptions/managednewsgroups/default.asp...
> ications.
>
> Note: The MSDN Managed Newsgroup support offering is for non-urgent issues=
> where an initial response from the community or a Microsoft Support
> Engineer within 1 business day is acceptable. Please note that each follow=
> up response may take approximately 2 business days as the support
> professional working with you may need further investigation to reach the
> most efficient resolution. The offering is not appropriate for situations
> that require urgent, real-time or phone-based interactions or complex
> project analysis and dump analysis issues. Issues of this nature are best
> handled working with a dedicated Microsoft Support Engineer by contacting
> Microsoft Customer Support Services (CSS) at
http://msdn.microsoft.com/subs=
criptions/support/default.aspx.
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D
> This posting is provided "AS IS" with no warranties, and confers no rights=
.
Hi,
To make syntax shorter, "my" namespace can also be used:
Dim owner As NTAccount =3D _ My.Computer.FileSystem.GetDirectoryInfo("c:
\resized").GetAccessControl.GetOwner(GetType(NTAccount))
Thanks,
Onur G=FCzel