黑客技术word试题原文_word黑客技术视频

hacker|
174

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

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

怎样才能故意破坏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

怎么加密word文档

1、打开word文档,选择“文件”选项卡

2、找到“信息”-“文档保护”,选择“用密码进行加密”

3、输入密码后,即可对word文档进行加密

word文档加密后容易被破解吗

word文档在加密后是不容易被破解的。

一般来说,文件加密就可以了。如果你的文件重要到有人想破解的话,那我想要破解的人一定得是一个电脑黑客。当然,如果你还是不放心,可以下载个加密软件,把文件隐藏加密,但这样一旦丢失或是加密软件丢失那文件就永远也找不回来了。

在这里需要提醒您的是,文件加密后一定要记住密码,否则就打不开了,

黑客是如何远程窃取别人电脑里的word文档的?没有IP行不行?

如果想要黑你,肯定知道你的一些相关消息的,比如qq什么的,然后检测ip,再远程,ping telnet 之类的,不过现在基本上没有那么容易被入侵了,除非是大神找你系统漏洞,通过漏洞来提权之类的,现在多的是,通过邮箱发送带毒的图片或者跳黑链,远程qq发送给你带毒文件之类的,可以在你的电脑开辟一个后门,开启端口,通过动态域名,远程你

0条大神的评论

发表评论