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

	CDO
	Samples from Users

• 1129 OleInitiate Initiate Failed Using an LDAP Path
• Add Domain User to Local Group
• ADSI COM Example - Check User Logons
• ADSI COM Example - Delete a Computer
• ADSI COM Example - Delete a User
• ADSI COM Example - Get User Properties
• ADSI COM Example - List Connected Sessions
• ADSI COM Example - Upload a Photo
• ADSI Create Groups and Users Example
• ADSystemInfo Interface
• CDO Exchange 2000 Requirements
• CDO Collections and Global Address Book
• CDO Collections and Personal Address Book
• CDO Exchange Mailbox size
• CDO IMailBoxStore Interface
• Converting Active Directory Thumbnailphotos to File
• Create an AD User and an Exchange 2k Mailbox
• Create Exchange Distribution List Using CDO
• Create Mailbox - Exchange 2000 - CDO - ADSI
• Get a user certificate
• List Groups a User Belongs To
• List of AD Domains
• List User Paths on Default Domain
• Search Exchange-Outlook Infostores with CDO

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

ADSystemInfo Interface

---

The IADsADSystemInfo interface gets data about the local computer if it is a Windows 2000/XP computer in a Windows 2000/XP domain. For example, you can get the domain, site, and distinguished name of the local computer.

;Requires Windows XP or Windows 2000 Professional.
adSys = ObjectOpen("ADSystemInfo")
;Retrieves the Active Directory distinguished name of the current user, which is the logged-on user 
;or the user impersonated by the calling thread. 
userName = adSys.UserName
Message("Username",userName)
;Retrieves the distinguished name of the local computer. 
Computername = adSys.Computername
Message("Computername",Computername)
;Retrieves the DNS name of the local computer's domain, for example "example.fabrikam.com". 
DomainDNSName = adSys.DomainDNSName
Message("DomainDNSName",DomainDNSName)
;Retrieves the short name of the local computer's domain, for example "myDom". 
DomainShortName = adSys.DomainShortName
Message("DomainShortName",DomainShortName)
;Retrieves the DNS name of the local computer's forest. 
ForestDNSName = adSys.ForestDNSName
Message("ForestDNSName",ForestDNSName)
;Determines whether the local computer's domain is in native or mixed mode. 
IsNativeMode = adSys.IsNativeMode
Message("IsNativeMode",IsNativeMode)
;Retrieves the distinguished name of the NTDS-DSA object for the DC that owns the 
;primary domain controller role in the local computer's domain. 
PDCRoleOwner = adSys.PDCRoleOwner
Message("PDCRoleOwner",PDCRoleOwner)
;Retrieves the distinguished name of the NTDS-DSA object for the DC that owns the schema role in the local computer's forest. 
SchemaRoleOwner = adSys.SchemaRoleOwner
Message("SchemaRoleOwner",SchemaRoleOwner)
;Retrieves the site name of the local computer. 
SiteName = adSys.SiteName
Message("SiteName",SiteName)
ObjectClose(adSys)

---

Article ID:   W16087

File Created: 2004:03:30:15:42:46

Last Updated: 2004:03:30:15:42:46