CodeXchange Thursday, March 28, 2024
Home
What's it?
Download
Register
My Snippets
Add Snippet
Search
Faq
Contact Us
Sponsors

Website hosted by


Code Snippet Preview

Review the code snippet before inserting it on your project.

Snippet Metadata
Summary: Bind to Active Directory and create a new user
Language: VB.NET
Author: J.Marc Piulachs
Author snippets RSS:
Culture: en-US
Bytes: 1482
Visual Studio 2005 Snippet:

Snippet Stats
Downloads: 16
Overall rating : 0
Average rating : Snippet rating

Snippet Preview
Code:
Imports System.DirectoryServices
Imports ActiveDs
Module Module1
    Sub Main()
        ' connect to my Active Directory
        Dim root As New DirectoryEntry("LDAP://MyDomainControllerServer/dc=digeratisoftware,dc=local")
        Try
            ' create a new user object whose RDN is John Brennan
            Dim user As DirectoryEntry = root.Children.Add("CN=John Brennan", "user")
            ' set properties on the user
            user.Properties("givenName").Value = "John"
            user.Properties("sn").Value = "Brennan"
            user.Properties("mail").Value = "john@somemailaddress.com"
            user.Properties("description").Value = "new test user"
            user.Properties("sAMAccountName").Value = "John.Brennan"            
            ' userPrincipalName. This property is domain specific
            user.Properties("description").Value = "John.Brennan@digeratsoftware.local"             
            ' enable the user account and set their password to never expire
            user.Properties("userAccountControl").Value = ADS_USER_FLAG.ADS_UF_NORMAL_ACCOUNT Or ADS_USER_FLAG.ADS_UF_PASSWD_NOTREQD Or ADS_USER_FLAG.ADS_UF_DONT_EXPIRE_PASSWD
            ' commit the object from memory to the directory store
            user.CommitChanges()
            ' next set the user's password
            user.Invoke("SetPassword", New Object() {"mypassword"})
        Catch ex As Exception
            Throw
        End Try
    End Sub
End Module

Snippet Comments
Comments:
No comments for this snippet

Other snippets that may interest you..
Related Snippets
TDT - GridPage - Page_Init (C#)
CustomValitaor (C#)
(C#)
Get the file extension from a file path or file name (VB.NET)
grab record from db and subtracts it from variable (VB.NET)



Copyright ©2009-2024 CodeXchange. Server version 1.0.3720.32855 Client Version 0.9.0.0

With from Barcelona

Most Helpful members
These are the members who have received the most points for their helpful samples
Zepho Zep
Robert Wagner
Galen Taylor

All time 'Hall of fame'
Formating a file size and adding the B, KB, MB and GB extension appropriately with string.Format (C#)
INI File Access (VB.NET)
Read XML from string into DataSet (C#)
Create Manifest File for your Application (VB.NET)
Round function to avoid banker's rounding (VB.NET)
Get Short and Long Path Names (VB.NET)
Sending Mail through authenticated SMTP server (C#)
One Way Hash for strings (C#)
Formating a file size and adding the B, KB, MB and GB extension appropriately with string.Format (C#)
How do I load an image from a URI address? (VB.NET)
Use our easy to use Visual Studio.NET addin client and start sharing code snippets with the CodeXchange community!
Refreshed: Thursday, March 28, 2024