网易首页 > 网易科技 > 网易学院 > 编程开发系 > 正文

知己知彼 了解VB编写病毒的大体方法

0
分享至
  相信电脑界的每个人都痛恨计算机病毒,她给我们带来了很多麻烦和损失,可你知道编写病毒的方法和过程吗?在此我仅以VB编写为例,揭开她的面纱。

用VB编写病毒需要考虑到如下几点:

感染主机

首先染毒文件运行后先要判断主机是否以感染病毒,也就是判断病毒主体文件是否存在,如果不存在则将病毒主体拷贝到指定位置(如:

将病毒文件拷贝到c:\\windows\\system\\),可用filecopy语句实现;如果病毒已感染主机则结束判断。

例如,判断C:\\windows\\system\\Killer.exe是否存在,如果有则退出判断,如果没有则证明本机未感染病毒,立即拷入病毒文件。

病毒源文件名为game.exe。

声明部分:

""定义 FileExists% 函数 public success% Function FileExists%(fname$) On Local Error Resume Next Dim ff% ff% = FreeFile Open fname$ For Input As ff% If Err Then FileExists% = False Else FileExists% = True End If Close ff% End Function

代码部分:

""判断文件是否存在 success% = FileExists%("C:\\windows\\system\\Killer.exe") If success% = False Then ""病毒不存在则拷贝病毒到计算机 FileCopy "game.exe", "C:\\windows\\system\\Killer.exe" ... ""修改注册表,将其加入RUN中。(省略若干代码) End If

开机启动病毒

在病毒感染主机的同时,将自身加入注册表的开机运行中,这与向主机拷入病毒是同时进行的,主机感染后不再修改注册表。可通过编程

和调用API函数对WIN注册表进行操作来实现,这样在每次启动计算机时病毒自动启动。

任务管理器

在任务管理器列表中禁止病毒本身被列出,可以通过编程来实现。

用代码 App.TaskVisible = false 就可以实现;再有就是通过调用Win API函数来实现,这里就不作介绍了。

病毒发作条件

可用Day(Date)来判断今天是几号,再与确定好的日期作比较,相同则表现出病毒主体的破坏性,否则不发作。也可用Time、Date或其它方

法作为病毒发作条件的判断。

例:

if day(date)=16 then ""16是发作日期,取值为1-31的整数 ... ... ""kill ******* 当日期相符时运行的破坏性代码(格式化、删除指定的文件类型、发送数据包 杜塞网路等,省略若干代码) end if

病毒的破坏性

编写的此部分代码决定了病毒威力的强弱。轻的可以使系统资源迅速减少直至死机(需要你懂得一点蠕虫的原理),也就是实现开机即死的

效果;也可以加入硬盘炸弹代码、系统后台删文件等。重的可以使计算机彻底瘫痪。

病毒的繁殖

原理很简单,就是将其自身与其它可执行文件合并,也就是两个文件并成一个文件。也可通过E-Mail传播,方法是病毒读取被感染主机的

邮件列表,将带有病毒附件的E-Mail发给列表中的每一个人(这需要你懂得VB网络编程)。

读完本文章相信您已对病毒的编写思路有了初步的了解,如果你是个VB爱好者,你已经可以编写一个很简单的病毒了,但你要是精通VB的话,请不要有编写后传播她的想法,因为传播她造成很大的影响将改变你的命运。

学习更多知识与技巧 请点击 网易学院

相关推荐
热点推荐
周淑怡被质疑跟“岛国女演员”神似!随后愤怒自证!

周淑怡被质疑跟“岛国女演员”神似!随后愤怒自证!

娱乐搬运
2022-01-19 02:04:44
梅西没给莱万投票被夸张!去年梅西投莱万,但莱万却没有投梅西!

梅西没给莱万投票被夸张!去年梅西投莱万,但莱万却没有投梅西!

氧气是个地铁
2022-01-19 11:56:50
5年了,达摩院当初的愿望都实现了吗?

5年了,达摩院当初的愿望都实现了吗?

电商报
2022-01-19 09:34:16
微软花687亿买下暴雪一具空壳

微软花687亿买下暴雪一具空壳

零态
2022-01-19 09:49:07
看到妈妈以前的照片,真的很漂亮,网友:你妈那时候就有苹果了?

看到妈妈以前的照片,真的很漂亮,网友:你妈那时候就有苹果了?

二哥好好笑
2022-01-19 10:12:50
“美女摘下口罩的那一刻,注定成为我心中的阴影。”

“美女摘下口罩的那一刻,注定成为我心中的阴影。”

相声精选杂货店
2022-01-19 08:35:39
贾浅浅,高考250多分,照样读985?而学生要考600多分

贾浅浅,高考250多分,照样读985?而学生要考600多分

孤影影娱
2022-01-18 19:29:16
寻亲男孩刘学州生母谈拉黑隐情:想平静生活

寻亲男孩刘学州生母谈拉黑隐情:想平静生活

新京报
2022-01-19 09:51:10
太悲惨了了!女子抱着婴儿跳湖双亡,孩子才2个月

太悲惨了了!女子抱着婴儿跳湖双亡,孩子才2个月

金宝每日说法
2022-01-18 23:59:55
林志玲下乡旧照被翻出,穿搭普通素颜朝天,网友:以为是村民

林志玲下乡旧照被翻出,穿搭普通素颜朝天,网友:以为是村民

娱乐圈的阿三
2022-01-17 20:32:14
啊?洗屁股这事居然有南北差异?

啊?洗屁股这事居然有南北差异?

家庭医生在线网
2022-01-18 12:35:20
“为什么吕布一生没有斩杀过名将,却被称为三国第一猛将?”哇哈哈哈~

“为什么吕布一生没有斩杀过名将,却被称为三国第一猛将?”哇哈哈哈~

相声段子超市
2022-01-19 02:23:12
BBC按照梅根要求向她道歉后,网友:感谢BBC让我想起她有多可笑!

BBC按照梅根要求向她道歉后,网友:感谢BBC让我想起她有多可笑!

土豆你个西红柿plus
2022-01-19 10:24:51
CCTV5直播!辽宁VS新疆冲击11连胜,杨鸣调整阵容,斗法阿的江

CCTV5直播!辽宁VS新疆冲击11连胜,杨鸣调整阵容,斗法阿的江

体坛瞎白话
2022-01-19 10:37:07
不知战争已结束,6名亚军士兵仍在打游击,被俄军发现后护送离开

不知战争已结束,6名亚军士兵仍在打游击,被俄军发现后护送离开

凌小的七色花
2022-01-19 09:46:13
2022年上海春节补贴通知下发,哪些人可以领取?

2022年上海春节补贴通知下发,哪些人可以领取?

定州晶妹
2022-01-19 10:47:27
大范围雨雪天气来袭!未来五天陕晋冀豫鲁有大雪局地暴雪

大范围雨雪天气来袭!未来五天陕晋冀豫鲁有大雪局地暴雪

澎湃新闻
2022-01-19 12:05:24
CCTV5直播!中国女足神了,亚洲杯首战冲3纪录,陈戌源未设赢球奖

CCTV5直播!中国女足神了,亚洲杯首战冲3纪录,陈戌源未设赢球奖

侃球熊弟
2022-01-18 08:54:22
时隔4天!韩德君伤势确认没那么简单,杜锋这回摊上事了

时隔4天!韩德君伤势确认没那么简单,杜锋这回摊上事了

篮球资讯老司机
2022-01-19 10:01:30
陈亚男离婚后买新车,视察公司似“女强人”,真把自己当总裁了?

陈亚男离婚后买新车,视察公司似“女强人”,真把自己当总裁了?

天天娱乐基地
2022-01-18 10:17:11
2022-01-19 15:08:49

科技要闻

我,微软,700亿美金买暴雪怎么了?

头条要闻

女子用1100元假钞骗走残疾老人半扇猪肉 后续来了

头条要闻

女子用1100元假钞骗走残疾老人半扇猪肉 后续来了

体育要闻

FIFA第132名3-2绝杀 送夺冠热门出局

娱乐要闻

章子怡汪峰相继被强制执行近300万

财经要闻

汽车要闻

为碳中和愿景添砖加瓦 雷克萨斯两款新车首发

态度原创

艺术
房产
旅游
教育
公开课

艺术要闻

《捕鱼图》,2个人1条船,专家估价超过2个亿

房产要闻

第六批近半项目触发积分,年后置业的机会在这里!

旅游要闻

广州最后的孤岛,出岛只能靠船

教育要闻

“高中永远不会结束”为什么是真的?

公开课

冲绳美军基地:全球新冠感染率最高

进入关怀模式
×