社区
网络编程
帖子详情
谁能告诉我如何使用ADSI添加组、用户、删除组和用户,使账户不可用等等
zhhmnch
2002-10-31 07:21:30
那位高手请帮帮忙!
热盼!
...全文
107
2
打赏
收藏
谁能告诉我如何使用ADSI添加组、用户、删除组和用户,使账户不可用等等
那位高手请帮帮忙! 热盼!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
wtoeb
2002-11-14
打赏
举报
回复
讨论ADSI如何对NT进行管理
使用ADSI对IIS进行管理需要OP4,而对NT要进行ADSI管理则需要NTLM
NTLM提供以下几个对象: Domain, Group, and User.
通过domain对象你可以增加groups和users.
警告:
以下的例子都将改变NT访问权限数据库;任意增加和改变NT用户的权限
使用前请仔细阅读,请只在测试的机器上运行这些程序,只到你掌握了NTLM
的工作原理为止。千万不要危害到真正主机的安全。
只有拥有Administrator或则Operator权限的人才能够在运行IIS机器上
更改NT的用户数据库。所以,使用Anonymous权限登录是没有权限的。
当然如果使用SSL的话也能够保证安全性。
例子如下:
新建一个用户:
可以在一个独立的服务器上,也可以在一个主域服务器上新增用户
<%
On Error Resume Next
strDomain="MACHINENAME"
strUser="jdoe"
Set oDomain = GetObject("WinNT://" & strDomain)
Set oUser = oDomain.Create ("user", strUser)
If (err.number = 0) Then
oUser.SetInfo
oUser.SetPassword "mypassword"
oUser.SetInfo
Set oUser=Nothing
End If
Set oDomain=Nothing
%>
新增加一个组:
<%
strDomain="MACHINENAME"
strGroup="Unidentified"
Set oDomain = GetObject("WinNT://" & strDomain)
Set oGroup = oDomain.Create ("group", strGroup)
oGroup.SetInfo
Set oDomain=Nothing
Set oGroup=Nothing
%>
把一个用户增加到一个组中.
<%
strDomain="MACHINENAME"
strUser="jdoe"
strGroup="Unidentified"
Set oDomain = GetObject("WinNT://" & strDomain)
Set oGroup = oDomain.GetObject("Group", strGroup)
oGroup.Add ("WinNT://" & strDomain & "/" & strUser)
Set oDomain=Nothing
Set oGroup=Nothing
%>
配置用户信息
<%
strDomain="MACHINENAME"
strUser="jdoe"
Set oUser = GetObject("WinNT://" & strDomain & "/" & strUser)
' Setting the Account Expiration to 30 days from today
dtExpirationDate=Now()
dtExpirationDate=DateAdd("d",30,dtExpirationDate)
oUser.AccountExpirationDate = dtExpirationDate
' Setting the Full Name of the User
oUser.FullName="Joe Doe"
oUser.SetInfo()
Set oUser=Nothing
%>
继承用户
<%
strDomain="MACHINENAME"
strGroup="Unidentified"
Set Group = GetObject("WinNT://" & strDomain & "/" & strGroup)
For Each Member in Group.Members
If (Member.Class="User") Then
' Here is where you would do
' something with the user
End If
Next
%>
gmc007
2002-11-01
打赏
举报
回复
MSDN2001.7版有例子!
2023中职
组
网络建设与运维-理论赛题答案
目录 模块一:网络理论测试 一、单选题 1.单选题1-50 2.单选题51-100 ...1.贵公司正在评估数据中心虚拟化技术,要求您解释第1类和第2类虚拟化管理程序之间的区别。以下哪项是第1类虚拟化管理程序的典型
2023年全国职业院校技能大赛网络建设与运维样题理论题答案
163.公司处在单域的环境中,你是域的管理员,公司有两个部门:销售部和市场部,每个部门在活动目录中有一个相应的OU(
组
织单位),分别是SALES和MARKET,有一个
用户
TOM要从市场部调动到销售部工作,TOM的
账户
原来存放在
组
织...
Exchange常见问题大全
如果你有类似的不清楚的问题,这里都是比较权威的回答了。 1.什么是邮件中继? 邮件中继是指将邮件转发到你所在域以外的域的能力。更具体地说,当
使用
与您的 SMTP 服务器的入站连接来向外部域发送电子邮件时,便...
2024年陕西省职业院校技能大赛中职
组
网络建设与运维样卷
城市=Beijing,
组
织=skills,
组
织单位=system,
使用
者可选名称=(1)为linux8
添加
4块硬盘,每块硬盘大小为5G,创建lvm卷,卷
组
名称为vg1,逻辑卷名称为lv1,容量为全部空间,格式化为ext4格式。RT2的RD值为2:2。
全国职业院校技能大赛 网络建设与运维 赛题(九)
请根据大赛所提供的竞赛环境,检查所列的硬件设备、软件清单、材料清单是否齐全,计算机设备是否能正常
使用
。 3.在进行任何操作之前,请阅读每个部分的所有任务。各任务之间可能存在一定关联。 4.操作过程中需要及时...
网络编程
1,502
社区成员
18,437
社区内容
发帖
与我相关
我的任务
网络编程
VB 网络编程
复制链接
扫一扫
分享
社区描述
VB 网络编程
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章