一段病毒常用的vb script脚本

<script type="text/javascript"><!--google_ad_client = "pub-1671897149647319";google_ad_width = 200;google_ad_height = 200;google_ad_format = "200x200_as";google_ad_type = "image";//2006-12-02: testpicgoogle_ad_channel = "7089687085";//--></script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>

下面是一段创建快捷方式的脚本，好多病毒都在使用，把病毒添加到启动菜单里，以后就可以自动运行了。

Set ws=WScript.CreateObject("WScript.Shell")
smenu = ws.SpecialFolders("AllUsersStartup")
Set scut = ws.CreateShortcut(smenu & "/QQ.Lnk")
scut.TargetPath = "E:/tencent/QQ.exe"
scut.Save