Database Search

match allmatch any Look in all areasLook in current areas Check all datesPrevious dayPrevious 3 daysPrevious weekPrevious fortnightPrevious monthPrevious 2 monthsPrevious 3 monthsPrevious half-yearPrevious year

TechHome

• !!DISCLAIMER!!
• AD Syncronization
• Add Computer to an Active Directory Group
• ADSI COM Find Primary Group
• ADSI COM List Groups
• ADSI Create Group
• ADSI Extender Security Descriptor Sample
• ADSI Get OU Properties
• ADSI Get Subgroups of Group
• ADSI List Group Names and Email Property
• ADSI Primer
• ADSI Query String Creator
• Create a Mail Enabled Contact
• Create Enable and Disable User Account
• Create Exchange 2000 User Account
• Create IIS Virtual Directory
• Create User in AD with CSV file
• Delete Computer Account
• Determine if a WS and a server are in the same AD Site
• Determine LastLogin
• DsGetDcName
• Figure out User Account Attributes
• Get a list of users and write out to CSV file
• Get all Domain printers
• Get Date User Account was Created
• Get Nested User Groups
• Get TCP IP Configuration From Each Domain Controller
• Get User Information From Another Domain
• Getting E-Mail Address for all users in OU
• Group Exist
• Hierarchically Adding Users to Groups
• JoinDomain
• List ADSI Paths of Groups and their Members
• List All Servers in the Current Domain
• List Users
• OLE COM dsGetMemGrps Alternative
• Recursive DsGetMemGrp Example
• REmove User from Printer Object
• Set Home Directory for User
• Translate NT Name to LDAP Path
• Traverse OU and Generate a Report of Objects
• Useful ADSI Site server functions

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

ADSI Primer

---

This is a little ditty that i cooked up, as i couldnt figure out what properties were associated with user objects, nor what there values should be. it also helped shed some light on what the proper format of things like HomeMDB, HomeMTA and other things that need to be set for exchange mailboxes. either way it will get the attributes for the specified user. i hope this might help any newcomers to ADSI scripting.

AddExtender("wwads34i.dll")
; samAccountName of user of interest
MyUser = "brendan"
MANDATORY  = 1
OPTIONAL   = 2
MANANDOPT  = 3

ServerDn=dsGetProperty("LDAP://rootDSE", "serverName")
ServerName=ItemExtract(1, ServerDn, ",")
ServerName=ItemExtract(2, ServerName, "=")
ServerDn=dsGetProperty("LDAP://rootDSE", "defaultNamingContext")
ServerPath="LDAP://%ServerName%/%ServerDN%"
UserPath=dsFindPath(ServerPath, "(&(objectCategory=person)(sAMAccountName=%MyUser%))")

file=FileOpen("c:\ADSI %MyUser%.csv","WRITE")
; Get mandatory properties of object.
sList = dsGetPropName(UserPath,MANDATORY)
if sList != ""
   count=ItemCount(sList,@TAB)
   FileWrite(file,"Mandatory Property Value(s)")
   for i = 1 to count
      name=ItemExtract(i,sList,@TAB)
      ErrorMode(@OFF)
      props=dsGetProperty(UserPath,name)
      StrReplace(props,@TAB,",")
      ErrorMode(@CANCEL)
      FileWrite(file,StrCat(name,",",props))
   next
endif 

FileWrite(file,"")
count=""

; Get optional properties of object.
sList = dsGetPropName(UserPath, OPTIONAL)
if sList != ""
   count=ItemCount(sList,@TAB)
   FileWrite(file,"Optional Property Value(s)")
   for i = 1 to count
      name=ItemExtract(i,sList,@TAB)
      ErrorMode(@OFF)
      props=dsGetProperty(UserPath,name)
      StrReplace(props,@TAB,",")
      ErrorMode(@CANCEL)
      FileWrite(file,StrCat(name,",",props))
      next
endif  
FileClose(file)
Run("c:\ADSI %MyUser%.csv","")

---

Article ID:   W15823

File Created: 2004:03:30:15:41:00

Last Updated: 2004:03:30:15:41:00