当前位置：首页 > 资讯 > 技术文档

如何在ADSI中查询用户属性？

时间：2021-09-03 20:01 编辑：来源：阅读：
扫一扫，手机访问

摘要：如何在ADSI中查询用户属性？

[h2]如何在ADSI中查询用户属性？ [/h2] <% Dim x On error resume next 'Set x = GetObject("WinNT://kenfilszwin2k/allen") strLDAP="LDAP://kenfilszwin2k/CN=Allen He,OU=kenfilsz,dc=kenfilsz,dc=com" set x=getobject(strLDAP) Response.Write "Object Name: " & x.Name & "<br>" Response.Write "Object Class: " & x.Class & "<br>" Set cls = GetObject(x.Schema) For Each op In cls.MandatoryProperties

' 返回用户对象必须设置的属性 v = x.Get(op) Response.Write "必须设置:"& op & "=" &v & "<br>" Next For Each op In cls.OptionalProperties

' 返回用户对象可选的属性 v = x.Get(op) Response.Write "可选:"& op & "=" &v & "<br>" Next set cls=nothing set x=nothing response.end %>

全部评论(0)

上一篇：如何编写TOP 10之类的排行榜？
下一篇：图像图表

资讯排行榜
更多>>