黑客文档_word黑客技术视频演示

hacker|
163

黑客盗取我电脑中WORD文档,会不会连已经删除了的文档也能盗走?

不一定。就算你删除WORD文档也清空了回收站,原来记录你文档的硬盘地址的内容也不会改变(就是那些十六进制的数),删除文档只是将原来的指向那个文件的指针删除,也就是说这些内容可以被覆盖。操作系统在分配硬盘空间时是随机的。如果你在新建文件时随机分配的地址指向原来word文档的地址空间,那么删除的文档就不能被盗走,这也是那些数据恢复技术的原理。不过现在一些软件的文件粉碎删除功能在删除文档的同时会消去硬盘上记录的数据,这些文档就不可还原。。。

怎样才能故意破坏WORD文档?

1、把后缀改成dll或rmvb之类的然后用记事本打开,看到乱码,删几个字符,保存,再把后缀改回去。

2、如果懂编程,用Word的宏代码来故意损坏一个文件。将如下VBA代码复制到宏代码编辑器中,按F5执行即可。

Sub CorruptFiles( )

Const Sh As String = "rundll32 url.dll,FileProtocolHandler ""#"""

Dim sFile As String, StartPos As Long

Dim Buff() As Byte

OpenAgain:

sFile = InputBox("请指定待破坏的文件(请勿非法他用):", "消息", "c:\Test\待破坏的测试文件.doc")

If Dir(sFile) = "" Then

Rc = MsgBox("你指定的文件不存在,请重新指定!", vbCritical + VbRetrCancel, "消息")

If Rc = vbRetry Then GoTo OpenAgain

Exit Sub

End If

Open sFile For Binary Access Read As #11

Flen = LOF(11)

StartPos = Int(Flen * 0.1) '将文件头的10%内容删除掉,只保留文件内容的后面90%的内容,文件头不存在被破坏了,文件也就被破坏了

ReDim Buff(1 To Flen - StartPos)

Seek #11, StartPos + 1

Get #11, , Buff

Close #11

Pos=InstrRev(sFile,".")

sFile=Left(sFile,Pos-1)+"_被破坏的文件" +mid(sFile,Pos)

Open sFile For Binary Access Write As #11  ' *** 被人为破坏的文件

On Error Resume Next

Put #11, , Buff

Close #11

Rc = MsgBox("损坏文件已 *** 完毕!要测试打开被破坏的文件吗?", vbInformation + vbYesNo, "消息")

If Rc = vbYes Then Shell Replace(Sh, "#", sFile)

End Sub

国二OFFICE中WORD有一个题目是(文档除目录页外均显示页码,正文开始为之一页,奇数页码显示文档底部靠右

目录后面要插入分节符(下一页),正文地方页面设置奇偶页不同,然后再奇数页,即之一页不设置页眉,在右侧插入页码,编码从1开始,然后在偶数页,即第二页插入页眉,在左侧插入页码。还有疑问私信我,我告诉你信箱。

0条大神的评论

发表评论