中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-03 22:53
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 批处理高手请进 查看 770 回复 4
楼 主 批处理高手请进 发表于 2007-03-29 23:35 ·  中国 广东 深圳 电信
新手上路
积分 19
发帖 7
注册 2007-03-29 11:08
19年会员
UID 83292
性别 男
状态 离线
批处理如何实现电脑入域
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 发表于 2007-03-30 05:08 ·  中国 四川 成都 教育网
中级用户
★★
积分 346
发帖 103
注册 2004-04-06 00:00
22年会员
UID 21852
性别 男
状态 离线
网络管理WMI做拿手了,干吗要用p处理?
3 发表于 2007-03-30 05:10 ·  中国 北京 联通
银牌会员
★★★
努力做坏人
积分 1,185
发帖 438
注册 2006-08-28 12:00
19年会员
UID 61449
来自 北京
状态 离线
多此一举还不说,根本就没有多大的意义...........
我今后在论坛的目标就是做个超级坏人!!!
4 发表于 2007-04-05 10:57 ·  中国 广东 深圳 电信
新手上路
积分 19
发帖 7
注册 2007-03-29 11:08
19年会员
UID 83292
性别 男
状态 离线
Originally posted by 9527 at 2007-3-29 04:10 PM:
多此一举还不说,根本就没有多大的意义...........

知道了,谢谢了,呵呵~~只是看看批处理是否可以实现~
5 发表于 2007-04-05 12:24 ·  中国 福建 泉州 石狮市 电信
银牌会员
★★★
积分 1,276
发帖 469
注册 2002-12-23 13:00
23年会员
UID 586
性别 男
来自 福建泉州
状态 离线
先收藏下这段代码先.

批处理可能需要用到外部工具.
我之前是使用NETDOM或NETSET进行添加的.
QQ:366840202
http://chenall.net
论坛跳转: