Advertisement

11.30.2008 at 10:29PM PST, ID: 23945950
[x]
Attachment Details
[x]
The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

  • The Grade of the Solution
  • The Zone Rank of the Expert Providing the Solution
  • The Number of Author and Expert Comments
  • The Number of Experts Contributing
  • The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!
7.1

Creating computer accounts in Active Directory and setting the permissions to join the computer to the domain using System.DirectoryServices

Asked by bryanpilger in Microsoft Visual Basic.Net, Lightweight Directory Access Protocol (LDAP), Active Directory

Tags: ,

I am using a VB.NET application to create computer accounts in Active Directory using System.DirectoryServices. It creates the computer accounts just fine. My problem is when trying to add the computers to the domain, it gives 'access denied'. Is there some sort of flag or other object i can use to change the permissions of the group allowed to add the computer to the domain? By default I noticed that it is set to Domain Admins. I need to change this field to 'Users'.  I have given the code I am currently using to create the computer accounts. All it does is look through all the items in a listview and create each computer account in Active Directory. So basically i just want to find the code to change the permissions on who can add the computer to the domain.Start Free Trial 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:

Dim Entry As New DirectoryEntry("LDAP://" & ActiveDirectoryTree.SelectedNode.Name, strDomain & "\" & strUser, strPass, AuthenticationTypes.Secure)
            Dim ComputerName As String = Nothing
            Dim CompSystem As String = Nothing
            Dim ComputerCount As Integer = ComputerList.Items.Count
            Dim i As Integer = 0
            For i = 0 To ComputerCount - 1
                CompSystem = ComputerList.Items(i).Text
                Dim ComputerEntry As DirectoryEntry = Entry.Children.Add("CN=" & CompSystem & "", "Computer")
                ComputerEntry.Properties("sAMAccountName").Value = "" & CompSystem & ""
                ComputerEntry.CommitChanges()
                Dim exp As Integer = CInt(ComputerEntry.Properties("UserAccountControl").Value)
                ComputerEntry.Properties("UserAccountControl").Value = exp Or &H1
                ComputerEntry.CommitChanges()
                Dim val As Integer = CInt(ComputerEntry.Properties("UserAccountControl").Value)
                ComputerEntry.Properties("UserAccountControl").Value = val And Not &H2
                ComputerEntry.CommitChanges()
                ComputersCreated.Text = ComputersCreated.Text & CompSystem & vbCrLf
                ComputerEntry.Close()
                ComputerEntry.Dispose()
            Next
            ComputersCreated.Text = ComputersCreated.Text & "------------------------------" & vbCrLf
            Entry.Close()
            Entry.Dispose()
[+][-]11.30.2008 at 11:52PM PST, ID: 23066736

View this solution now by starting your 7-day free trial. Setting up your free trial is quick, easy, and secure. We will return you to this solution, unlocked, when you're done.

 

About this solution

Zones: Microsoft Visual Basic.Net, Lightweight Directory Access Protocol (LDAP), Active Directory
Tags: VB.NET, Visual Studio 2005, .NET framework 2.0, Microsoft Windows XP SP2
Sign Up Now!
Solution Provided By: sundra_k
Participating Experts: 1
Solution Grade: B
 
 
 
Loading Advertisement...
20080924-EE-VQP-38 - Hierarchy / EE_QW_2_20070628