vbs的一个小疑点。

vbs的一个小问题。。
先说明，我是菜鸟，不要笑我。。刚学习脚本不久。，，

我最新发现一个问题。。
开机出现Document and setting\users\开始 菜单\程序\启动\1.vbs，

这里里面出现vbs启动项。。。。地址是c:\1.vbs 

搞不懂这个vbs是如何加进去的。。。。杀毒没有任何报警。。。

很好奇，，那位朋友告诉我下。代码如何实现的。。。

声明。。自己研究学习用。。。非恶意用途。。

[解决办法]
代码如何实现的？
re:
实现怎么x.vbs加到启动中
[解决办法]
C:\Documents and Settings\用户名\「开始」菜单\程序\启动
[解决办法]
移动到启动下就是了，又不是病毒，所以不会报警，只不过开机优化能弄掉
[解决办法]
直接移动的话杀毒软件应该会报的吧.

VBScript code

Set oFSO = CreateObject("Scripting.FileSystemObject")Set oShell = CreateObject("WScript.Shell")    sStartupPath = oShell.SpecialFolders("Startup")    oFSO.MoveFile WScript.ScriptFullName,sStartupPath & "\1.vbs"
[解决办法]
VBScript code
Set oShell = CreateObject("WScript.Shell")With  oShell    sStartDir       = .SpecialFolders("Startup") & "\"    Set oShellLink  = .CreateShortcut(sStartDir & "abc.lnk")    With oShellLink        .TargetPath     = "c:\1.vbs"        .WindowStyle    = 1        .Description    = "vbs程序"        .Save    End With    Set oShellLink  = NothingEnd With