Vbscript and Coldfusion

i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.

The easiest way would be to write a VB COM object that does the talking to the Active Directory and get CF to talk to a Method that returns a list or something like... HTH i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.   _____  

Try CFEXECUTE. John Burns i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain  WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.

why not use CFLDAP against your AD?   Doug i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.   _____  

do u have an example? why not use CFLDAP against your AD?   Doug i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.   _____   _____  

nope, it was just a thought.  Perhpas someone around here has done this.  If its in the AD, and teh LDAP stuff is 'on' of course, you should be able to query it.   Here is an example of query user data <cfldap action="QUERY"     name="empl"     attributes="     employeeID,     mail,     memberOf,     st,     name,     sn,     initials,     mobile,     givenName,     displayName,     userPrincipalName,     department,     streetAddress,     facsimileTelephoneNumber,     countryCode,     mailNickname,     l,     distinguishedName,     manager,     sAMAccountName,     extensionAttribute1"     start=" dc=fooey, dc=gooey     sort="sn ASC"     server="foo.goo.com"     port="389"     filter="sn=johnson"               > Check out the LDAP browser from http://www.ldapbrowser.com/ it rawks and should help you build your query.  For example, in our AD I see CN=Computers listing all teh computers participating in the AD.   Note, if your AD admin has not turned on anonymous reads, you will need a UID/PWD. HTH Doug do u have an example? why not use CFLDAP against your AD?   Doug i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.   _____   _____   _____  

thank you!!! this site  <http://www.ldapbrowser.com/>; http://www.ldapbrowser.com/ helped alot.  thanks for the reference nope, it was just a thought.  Perhpas someone around here has done this.  If its in the AD, and teh LDAP stuff is 'on' of course, you should be able to query it.   Here is an example of query user data <cfldap action="QUERY"     name="empl"     attributes="     employeeID,     mail,     memberOf,     st,     name,     sn,     initials,     mobile,     givenName,     displayName,     userPrincipalName,     department,     streetAddress,     facsimileTelephoneNumber,     countryCode,     mailNickname,     l,     distinguishedName,     manager,     sAMAccountName,     extensionAttribute1"     start=" dc=fooey, dc=gooey     sort="sn ASC"     server="foo.goo.com"     port="389"     filter="sn=johnson"               > Check out the LDAP browser from http://www.ldapbrowser.com/ it rawks and should help you build your query.  For example, in our AD I see CN=Computers listing all teh computers participating in the AD.   Note, if your AD admin has not turned on anonymous reads, you will need a UID/PWD. HTH Doug do u have an example? why not use CFLDAP against your AD?   Doug i have this vbscript that gets me all the computer names in active directory. is there a way i can incorporate this in cf and output the results to a select drop down box?? thanks for your help! bec. sDomain  = "ms" Set oDomain  = GetObject("WinNT://" & sDomain) oDomain.Filter  = Array("Computer") For Each oADobject In oDomain WScript.Echo oADobject.Name Next ************************************************* This e-mail, including any attachments, is intended for the receipt and use by the intended addressee(s), and may contain confidential and privileged information. If you are not an intended recipient of this e-mail, you are hereby notified that any unauthorized use or distribution of this e-mail is strictly prohibited.   _____   _____   _____   _____