<% 'This script lets you set any user attribute stored in _ 'an LDAP directory through a Web-based form by entering _ 'a user's CN, the attribute's name, and the attribute's value. strUserCN = request.form("cn") strUserProp = request.form("property") strPropNewValue = request.form("newvalue") response.write "CN= " & strUserCN if strUserCN="" then response.write "Update Form" response.write "

Web Update Form

" response.write "


" response.write "" response.write "" response.write "" response.write "" response.write "
CN:
Property Name:
New Value:
" response.end else 'BEGIN CALLOUT A obj.Put strUserProp, strPropNewValue 'END CALLOUT A 'BEGIN CALLOUT B obj.SetInfo 'END CALLOUT B response.write "Results

Update Results




" response.write strUserProp & "for user: " & strUserCN & " was successfully updated with the new value: " & strPropNewValue response.end end if %>