Active Directory/Connect

From Rosetta Code
Revision as of 14:47, 11 May 2009 by rosettacode>Dkf
Task
Active Directory/Connect
You are encouraged to solve this task according to the task description, using any language you may know.

VBScript

Creating the normal connection to AD

Set objConn = CreateObject("ADODB.Connection")
Set objCmd = CreateObject("ADODB.Command")
objConn.Provider = "ADsDSOObject"
objConn.Open