邮件服务器-邮件系统-邮件技术论坛(BBS)

 找回密码
 会员注册
查看: 3306|回复: 5
打印 上一主题 下一主题

怎么知道我的服务器是不是GC啊??

[复制链接]
跳转到指定楼层
顶楼
发表于 2006-6-1 09:52:56 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
请教高手,怎么知道我的服务器是不是GC啊??
沙发
发表于 2006-6-1 10:08:40 | 只看该作者

re:打开(管理工具-AD的站点和服务-Sit...

打开(管理工具-AD的站点和服务-Sites-Default First Site Name-Servers-YourServerName-右击NTDS Settings属性)-看看“全局编录”有没有打上勾
藤椅
发表于 2006-6-1 15:54:14 | 只看该作者

re:我写了一个脚本。在精华里有你可以...

我写了一个脚本。<br>
在精华里有<br>
你可以看看的<br>
<br>
板凳
发表于 2006-6-1 17:47:40 | 只看该作者

re:Set objRootDSE = Get...

Set objRootDSE = GetObject("LDAP://rootDSE")<br>
<br>
Dim text<br>
<br>
' Schema Master<br>
Set objSchema = GetObject("LDAP://" & objRootDSE.Get("schemaNamingContext"))<br>
strSchemaMaster = objSchema.Get("fSMORoleOwner")<br>
Set objNtds = GetObject("LDAP://" & strSchemaMaster)<br>
Set objComputer = GetObject(objNtds.Parent)<br>
text="Forest-wide Schema Master FSMO: " & objComputer.Name & vbCrLf <br>
<br>
Set objNtds = Nothing<br>
Set objComputer = Nothing<br>
<br>
' Domain Naming Master<br>
Set objPartitions = GetObject("LDAP://CN=Partitions," & _<br>
objRootDSE.Get("configurationNamingContext"))<br>
strDomainNamingMaster = objPartitions.Get("fSMORoleOwner")<br>
Set objNtds = GetObject("LDAP://" & strDomainNamingMaster)<br>
Set objComputer = GetObject(objNtds.Parent)<br>
text=text&"Forest-wide Domain Naming Master FSMO: " & objComputer.Name & vbCrLf <br>
<br>
Set objNtds = Nothing<br>
Set objComputer = Nothing<br>
<br>
' PDC Emulator<br>
Set objDomain = GetObject("LDAP://" & objRootDSE.Get("defaultNamingContext"))<br>
strPdcEmulator = objDomain.Get("fSMORoleOwner")<br>
Set objNtds = GetObject("LDAP://" & strPdcEmulator)<br>
Set objComputer = GetObject(objNtds.Parent)<br>
text=text&"Domain's PDC Emulator FSMO: " & objComputer.Name & vbCrLf <br>
<br>
Set objNtds = Nothing<br>
Set objComputer = Nothing<br>
<br>
' RID Master<br>
Set objRidManager = GetObject("LDAP://CN=RID Manager$,CN=System," & _<br>
objRootDSE.Get("defaultNamingContext"))<br>
strRidMaster = objRidManager.Get("fSMORoleOwner")<br>
Set objNtds = GetObject("LDAP://" & strRidMaster)<br>
Set objComputer = GetObject(objNtds.Parent)<br>
text=text&"Domain's RID Master FSMO: " & objComputer.Name & vbCrLf <br>
<br>
<br>
Set objNtds = Nothing<br>
Set objComputer = Nothing<br>
<br>
' Infrastructure Master<br>
Set objInfrastructure = GetObject("LDAP://CN=Infrastructure," & _<br>
objRootDSE.Get("defaultNamingContext"))<br>
strInfrastructureMaster = objInfrastructure.Get("fSMORoleOwner")<br>
Set objNtds = GetObject("LDAP://" & strInfrastructureMaster)<br>
Set objComputer = GetObject(objNtds.Parent)<br>
text=text&"Domain's Infrastructure Master FSMO: " & objComputer.Name & vbCrLf <br>
<br>
text=text & vbCrLf &" Design by coolnetboy(coolnetboy@hotmail.com)"<br>
WScript.Echo text<br>
<br>
报纸
发表于 2006-6-1 17:48:16 | 只看该作者

re:打开写字板,存成vbs格式,点击就知道了

打开写字板,存成vbs格式,点击就知道了
地板
发表于 2006-6-1 20:54:55 | 只看该作者

re:3,4,5楼说的没错,但如果LZ实际操作...

3,4,5楼说的没错,但如果LZ实际操作在哪还不知道这岂不是没有学到,所以本人还是建议LZ还是先知道其实际操作,赞同2楼。
您需要登录后才可以回帖 登录 | 会员注册

本版积分规则

小黑屋|手机版|Archiver|邮件技术资讯网

GMT+8, 2026-8-5 07:24

Powered by Discuz! X3.2

© 2001-2016 Comsenz Inc.

本论坛为非盈利中立机构,所有言论属发表者个人意见,不代表本论坛立场。内容所涉及版权和法律相关事宜请参考各自所有者的条款。
如认定侵犯了您权利,请联系我们。本论坛原创内容请联系后再行转载并务必保留我站信息。此声明修改不另行通知,保留最终解释权。
*本论坛会员专属QQ群:邮件技术资讯网会员QQ群
*本论坛会员备用QQ群:邮件技术资讯网备用群

快速回复 返回顶部 返回列表