Has anyone had luck adding OU selection to the CM2012 Bitlocker FrontEnd HTA? I have been trying for some time now without luck.
I have a drop down with multiple selections which link to this code below to pass the variable over. I also add options in my apply network settings which is show in the attached image.
I have this:
If ADOU.value = "1" Then oTSEnvironment("swn_ADOU") = "Administrative" 'msgbox("LDAP://OU=Administrative,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' ElseIf ADOU.value = "2" Then oTSEnvironment("swn_ADOU") = "Developement" 'msgbox("LDAP://OU=Development,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' ElseIf ADOU.value = "3" Then oTSEnvironment("swn_ADOU") = "External" 'msgbox("LDAP://OU=External,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' ElseIf ADOU.value = "4" Then oTSEnvironment("swn_ADOU") = "IT" 'msgbox("LDAP://OU=IT,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' ElseIf ADOU.value = "5" Then oTSEnvironment("swn_ADOU") = "Restricted" 'msgbox("LDAP://OU=Restricted,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' ElseIf ADOU.value = "5" Then oTSEnvironment("swn_ADOU") = "Sales" 'msgbox("LDAP://OU=Sales,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' ElseIf ADOU.value = "5" Then oTSEnvironment("swn_ADOU") = "Service Computers" 'msgbox("LDAP://OU=Service_Computers,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))' End If
We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.
Has anyone had luck adding OU selection to the CM2012 Bitlocker FrontEnd HTA? I have been trying for some time now without luck.
I have a drop down with multiple selections which link to this code below to pass the variable over. I also add options in my apply network settings which is show in the attached image.
I have this:
If ADOU.value = "1" Then
oTSEnvironment("swn_ADOU") = "Administrative"
'msgbox("LDAP://OU=Administrative,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
ElseIf ADOU.value = "2" Then
oTSEnvironment("swn_ADOU") = "Developement"
'msgbox("LDAP://OU=Development,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
ElseIf ADOU.value = "3" Then
oTSEnvironment("swn_ADOU") = "External"
'msgbox("LDAP://OU=External,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
ElseIf ADOU.value = "4" Then
oTSEnvironment("swn_ADOU") = "IT"
'msgbox("LDAP://OU=IT,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
ElseIf ADOU.value = "5" Then
oTSEnvironment("swn_ADOU") = "Restricted"
'msgbox("LDAP://OU=Restricted,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
ElseIf ADOU.value = "5" Then
oTSEnvironment("swn_ADOU") = "Sales"
'msgbox("LDAP://OU=Sales,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
ElseIf ADOU.value = "5" Then
oTSEnvironment("swn_ADOU") = "Service Computers"
'msgbox("LDAP://OU=Service_Computers,OU=Workstations,DC=online,DC=com: " & oTSEnvironment("swn_ADOU"))'
End If
Share this post
Link to post
Share on other sites