Search results for query: *

I'm a VB.NET newbie but have worked with VB5 & 6 moons ago, and I'm finally giving in to .NET from vbscripting... The following vbs code was in a script used to create users. It takes into account any hyphens, apostrophes in either the first or last names, as well as corrects for Mc and Mac...

When I try to add a duplicate name, the script kicks out this error: Error: The object already exists Code: 80071392 Source: (null) The error is generated when I try to perform the objUser.SetInfo and the sAMAccountName already exists. Is there any way to perform error handling using this...

I have a script for creating a new user object, but I need to be able to check for any pre-existing sAMAccountName in my Active Directory. Id ther a simple way to query my entire AD domain to check for any existing occurrences or do I have to query each possible specific OU? Cheers?

Phenomenal, completely changes how I can deal with strings containing patterns! No, if I can just get a handle on the pattern syntax...found this site: [link ]http://www.regular-expressions.info/reference.html[/url] Seems to be quite good for explaining patterns, as well as the other syntax...

thanks, strongm. Now I just have to try to figure out how to use regexp to capture Mc and Mac (ie: McDuff and MacDonald)....

Thanks to you both, each solution works really well. strongm, that's really interesting, it's my first encounter with regexp, seems like lots of useful opportunites, but how do I actually replace strLastName with the .replace results, rather than just display them in a message box? Cheers to...

Thanks, Geates, works great! Just to make it a little more challenging, how can I change it to detect more than one apostrophe in a hyphenated name (ie: O'Reilly-O'Shea)?

I have a script for creating user accounts which makes the first letter of a name uppercase and the rest lowercase: intLastName = Len(strLastName) strFirstLetter = UCase(Left(strLastName, 1)) strRemainingLetters = LCase(Right(strLastName, intLastName - 1)) strLastName = strFirstLetter &...

Thanks, JPJ, omitting UserPrincipleName would have been a serious oversight! Much appreciated, Doug

My Bad...sAMAccountName IS the donain logon name account. "Jimmy Hoffa" is the DistinguishedName...Answered my own question...

After creating a user object with a Distinguished Name ie: Set objOU = GetObject("LDAP://OU=Company Users,dc=domain,dc=com") Set objUser = objOU.Create("User", "cn=Jimmy Hoffa") objUser.Put "sAMAccountName", "Jimmy Hoffa") objUser.SetInfo How do I set his Account domain Logon Name (ie...

I guess what I'm really after is a VBS alternative to the PS Command "Enable-Mailbox john@contoso.com -Database Sales"

I'm trying to create a script to create / add a mailbox to a specific mailbox DB on Exchange 2010 for a user object which I created from a script, but I have no idea where to begin. Can someone point me in the right direction? All assistance will be supremely appreciated! Cheers

OK... So this is where I am now: I have the follwing code: [strLDAP is already valid and defined in the code several lines above this segment] Set objUser = GetObject(strLDAP) intPrimaryGroupID = objUser.Get("primaryGroupID") arrMemberOf = objUser.GetEx("memberOf") For Each Group...

Geates, I might have stumbled onto something. Apparently, the MemberOf attribute is a backlink attribute and therefore readonly. [link]http://directory.toxz.net/topic/2/21/08-re-setinfo-causes-80072035[/url] You can't modify memberOf because it is a backlink attribute and they are calculated...

I also see that this error can be caused by attempting to delete the user's Primary Group (which in this case is Domain Users - that's why I wanted to make an exception for that group).

It does and it is valid as I'm using the same LDAP string for some successful code that executes just ahead of this segment.

I've seen where this error occurs on a SetInfo with the same error code and supposedly the problem is that I'm trying to enable or 'set' a user account. The problem is that the account must have a password and none is provided. The supposed solution is to add a set password instruction to the...

Thanks, Geates. Unfortunately, it spits an error message when trying to setinfo: "The server is unwilling to process the request" error code: 80072035. I also tried splitting the process in 2 parts, the first part removing the user object from all AD security groups and the 2nd part to...

Thanks, Geates! That's a great site, it also resolves another issue I was having with removing a user object from all groups. I used this: set objOU = getobject("LDAP://ou=newOU,dc=wisesoft,dc=co,dc=uk") objOU.MoveHere "LDAP://cn=user1,cn=users,dc=wisesoft,dc=co,dc=uk",vbNullString It worked...