信息安全实验五 之 计算机病毒与黑客实验脚本【恶意网页病毒演示&病毒制作&木马捆绑】


叮嘟!这里是小啊呜的学习课程资料整理。好记性不如烂笔头,今天也是努力进步的一天。一起加油进阶吧!
在这里插入图片描述

一、脚本及恶意网页病毒演示实验

查看“脚本及恶意网页病毒.rar”中的脚本代码,将txt修改为html文件、测试,部分代码有瑕疵、需要修改完成,主要是“拷贝.txt”和“删除.txt”,当目标文件夹不存在时要先创建目标文件夹,请自己用VBScript脚本代码创建目前文件夹。将修改后的所有代码(4个html文件)以及相应的具有代表性的截图文件。

实验解析,四个脚本代码的操作步骤大致相同。

共同的前提是选择一个浏览器(此处小啊呜选择了IE浏览器),
找到相关安全设置将其安全程度调到最低。

之后再进行相关操作。

在这里插入图片描述

1、创建文件

创建.html

<HTML>
<HEAD>
<TITLE>创建文件c:\TEST.HTM</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
Dim fso, f1
Set fso = CreateObject("Scripting.FileSystemObject")
Set f1 = fso.CreateTextFile("c:\TEST.HTM", True)
-->
</SCRIPT>
</HEAD>
<BODY>

选择选定浏览器打开创建.html,允许阻止的内容。

在这里插入图片描述
允许交互。

在这里插入图片描述

检查成果啦!
成功创建文件。

在这里插入图片描述

2、拷贝文件

注意mu_sFilePath为自己桌面的路径。

拷贝.html

<HTML>
<HEAD>
<TITLE>复制c:\TEST.HTM文件到桌面</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
   Dim mu_sFilePath,mu_sFileName
   mu_sFilePath = "C:\Users\Floret\Desktop\"   '注意此处为自己桌面的路径
   mu_sFileName = mu_sFilePath & "TEST.HTM"
   
   Dim fso, tf
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set tf = fso.GetFile("c:\TEST.HTM")
   
   if(fso.FolderExists(mu_sFilePath)) Then                     '检测文件夹是否存在
    MsgBox "文件夹已存在"
    MsgBox "文件拷贝成功!"
	tf.Copy ("C:\Users\Floret\Desktop\TEST.HTM")
else
    MsgBox "文件夹不存在"
    fso.CreateFolder(mu_sFilePath)	'创建文件夹
	tf.Copy ("C:\Users\Floret\Desktop\TEST.HTM")
end if

-->
</SCRIPT>
</HEAD>
<BODY>

在这里插入图片描述

拷贝成功啦!

在这里插入图片描述

3、删除文件

删除.html:
<HTML>
<HEAD>
<TITLE>删除桌面上的TEST.HTM</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
   Dim fso, tf
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set tf = fso.GetFile("C:\Users\Floret\Desktop\TEST.HTM")
   tf.Delete
   MsgBox "文件已删除!"
-->
</SCRIPT>
</HEAD>
<BODY>

在这里插入图片描述

4、修改文件

修改.html:
<HTML>
<HEAD>
<TITLE>修改文件内容c:\TEST.HTM</TITLE>
<SCRIPT LANGUAGE="VBScript">
<!--
   Dim fso, tf
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set tf = fso.CreateTextFile("c:\TEST.HTM", True)
   ' 写一行,并带有一个换行字符。
   tf.WriteLine("<html><body>由网页脚本的方式修改已存在文件内容成功</body></html>") 
   '  向文件写三个换行字符。      
   tf.WriteBlankLines(3) 
   ' 写一行。
   tf.Write ("This is a test.") 
   tf.Close
-->
</SCRIPT>
</HEAD>
<BODY>

验收成果啦!
成功修改目标文件。

在这里插入图片描述

二、病毒详解及批处理病毒制作

查阅文件“病毒详解及批处理病毒制作:自启动、修改密码、定时关机、蓝屏、进程关闭.mhtml”,选取其中至少2个项目,进行实践操作并截图:

关机bat脚本

在这里插入图片描述

最简单的蓝屏炸弹文件

在这里插入图片描述

扩展名病毒

在这里插入图片描述

三、木马捆绑模拟实验

在这里插入图片描述

过程小记详见博文:

https://blog.csdn.net/qq_43543789/article/details/108742518

Ending!
更多课程知识学习记录随后再来吧!

就酱,嘎啦!

在这里插入图片描述

注:
人生在勤,不索何获。

猜你喜欢

转载自blog.csdn.net/qq_43543789/article/details/108755877