Hi,
I have written an ASP.NET 2.0 application that uses Active Directory or ADAM
to manage account users - the site has a page that allows people to create an
account (much like any site). The page populates the AD with all the
information and the user account but I am unable to enable the account.
Microsoft has information on how to do that here -->
http://msdn.microsoft.com/library/de...ing_a_user.asp
(the sample is for Visual Basic) - and I am unable to complete the bottom
portion of the script. Can some one point me in the right direction - or can
you tell me how I can add a snippet of VBscript code to an ASP.NET page.
I am using the Active DS Type library - not sure why there are multiple ones
(System.DirectoryServices) but it is rather confusing - I seem to accomplish
one thing with one and another with the other (they did have trouble
co-existing however). Anyway my script works very well but I am not able to
access the properties required to enable the account.
Here is a simple version (no error checking) of the code
Sub BTSub_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim objUsers As ActiveDs.IADsContainer
Dim objNewUser As ActiveDs.IADsUser
objUsers = GetObject("LDAP://OU=Pickupfootball,DC=systemfix,DC=ca")
objNewUser = objUsers.Create("user", "CN=" & txtFName.Text &
txtLName.Text)
objNewUser.Put("sAMAccountName", txtFName.Text & txtLName.Text)
objNewUser.Put("givenName", txtFName.Text)
objNewUser.Put("sn", txtLName.Text)
objNewUser.Put("streetAddress", txtEADDR.Text)
objNewUser.Put("mail", txtEADDR.Text)
objNewUser.Put("title", txtOCC.Text)
objNewUser.Put("displayName", txtFName.Text & "." & txtLName.Text)
objNewUser.Put("description", GNDList.Text & ";" & txtAge.Text)
objNewUser.SetInfo()
objNewUser.ChangePassword("", "j1r1mi1")
End Sub
Thanks
Jeremie Legault
jl******@systemfix.ca
