如何在ADSI中查询用户属性?
时间:2010-06-17 12:53:00
如何在ADSI中查询用户属性?
看看下面这个返回用户可用属性的代码实例,基本上返回了大部分可用的用户属性:
<%
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
%>
标签:ADSI,查询
0
投稿
猜你喜欢
网页制作了解什么是CSS hack?
2007-10-21 08:52:00
access改mdb为asp所带来的灾难 附mdb防下载方法
2011-03-03 11:07:00
如何正确显示模式对话框showModalDialog中的中文?
2010-06-28 18:24:00
sql server数据库最大Id冲突问题解决方法之一
2012-01-05 19:28:42
SQL"不能为新插入的行确定标识"错误的解决方法
2011-04-07 11:05:00
细化解析:SQL Server 2000 的各种版本
2009-02-05 15:41:00
建立合理的索引提高SQL Server的性能
2009-01-23 14:44:00
使用XML技术上传文件的例子
2008-05-29 11:33:00
Web页面空间利用率的思考
2009-07-03 12:45:00
快速掌握ASP连接11种数据库的常用语法
2008-11-28 15:32:00
站长必须要了解的九条平面设计常识
2008-06-07 14:33:00
[翻译]标记语言和样式手册 Chapter 10 应用CSS
2008-02-02 18:44:00
mssql 大小写区分方法
2008-12-29 14:08:00
mysql 获取表有多少列
2010-10-14 13:44:00
数据库技巧——MySQL十大优化技巧
2011-01-31 16:44:00
连接无法用于执行此操作。在此上下文中它可能已被关闭或无效
2011-03-15 23:03:00
在ASP中使用SQL语句之1:SELECT 语句
2007-08-11 12:18:00
asp小偷程序原理和简单示例
2007-11-05 17:12:00
ORACLE 数据库RMAN备份恢复
2009-04-24 12:23:00
22个HTML5的初级技巧
2010-12-17 12:39:00