批处理高手请进 - 中国DOS联盟论坛 - 中国DOS联盟之联合DOS论坛

批处理如何实现电脑入域
VBS可以实现，脚本如下，咨询下可以实现批处理么？
Const JOIN_DOMAIN = 1
Const ACCT_CREATE = 2
Const ACCT_DELETE = 4
Const WIN9X_UPGRADE = 16
Const DOMAIN_JOIN_IF_JOINED = 32
Const JOIN_UNSECURE = 64
Const MACHINE_PASSWORD_PASSED = 128
Const DEFERRED_SPN_SET = 256
Const INSTALL_INVOCATION = 262144

strDomain = "域地址"
strPassword = "管理员密码"
strUser = "管理员用户"

Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerName

Set objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\" & _
strComputer & "\root\cimv2:Win32_ComputerSystem.Name='" & _
strComputer & "'")

ReturnValue = objComputer.JoinDomainOrWorkGroup(strDomain, _
strPassword, strDomain & "\" & strUser, NULL, _
JOIN_DOMAIN + ACCT_CREATE)
wscript.echo "The command completed successfully."
wscript.echo "Pls. Reset Your Computer!"

第1楼　prison0803	发表于 2007-03-29 23:35
新手上路　发帖 7　积分 19
批处理高手请进批处理如何实现电脑入域 VBS可以实现，脚本如下，咨询下可以实现批处理么？ Const JOIN_DOMAIN = 1 Const ACCT_CREATE = 2 Const ACCT_DELETE = 4 Const WIN9X_UPGRADE = 16 Const DOMAIN_JOIN_IF_JOINED = 32 Const JOIN_UNSECURE = 64 Const MACHINE_PASSWORD_PASSED = 128 Const DEFERRED_SPN_SET = 256 Const INSTALL_INVOCATION = 262144 strDomain = "域地址" strPassword = "管理员密码" strUser = "管理员用户" Set objNetwork = CreateObject("WScript.Network") strComputer = objNetwork.ComputerName Set objComputer = GetObject("winmgmts:{impersonationLevel=Impersonate}!\\" & _ strComputer & "\root\cimv2:Win32_ComputerSystem.Name='" & _ strComputer & "'") ReturnValue = objComputer.JoinDomainOrWorkGroup(strDomain, _ strPassword, strDomain & "\" & strUser, NULL, _ JOIN_DOMAIN + ACCT_CREATE) wscript.echo "The command completed successfully." wscript.echo "Pls. Reset Your Computer!"

第2楼　estar	发表于 2007-03-30 05:08
中级用户　发帖 103　积分 346
网络管理WMI做拿手了，干吗要用p处理？

第3楼　9527	发表于 2007-03-30 05:10
银牌会员　发帖 438　积分 1,185　来自北京
多此一举还不说，根本就没有多大的意义...........

第4楼　prison0803	发表于 2007-04-05 10:57
新手上路　发帖 7　积分 19
Originally posted by 9527 at 2007-3-29 04:10 PM: 多此一举还不说，根本就没有多大的意义........... 知道了，谢谢了，呵呵~~只是看看批处理是否可以实现~

第5楼　chenall	发表于 2007-04-05 12:24
银牌会员　发帖 469　积分 1,276　来自福建泉州
先收藏下这段代码先. 批处理可能需要用到外部工具. 我之前是使用NETDOM或NETSET进行添加的.