文件怎样可以弄成破损文件
发布时间: 2023-08-17 03:23:46
‘壹’ 怎么样才能使电脑文件破损打不开,有什么简单的步骤
1、打开“记事本”
2、使用记事本打开该文件
3、打开的时间的长短取决于文件大小和电脑配置
4、在文件中随便插入字符
5、保存文件
这是在手头上没有高级删除软件时,
对照片文件进行修改后删除的办法
可以保证文件被删除后,无法正常恢复的常规方法
‘贰’ 怎样损坏一个文件
如果懂编程,用Word或者Excel的宏代码来故意损坏一个文件!将如下VBA代码复制到宏代码编辑器中,按F5执行即可。
SubCorruptFiles()
ConstShAsString="rundll32url.dll,FileProtocolHandler""#"""
DimsFileAsString,StartPosAsLong
DimBuff()AsByte
OpenAgain:
sFile=InputBox("请指定待破坏的文件(请勿非法他用):","消息","c:Test待破坏的测试文件.doc")
IfDir(sFile)=""Then
Rc=MsgBox("你指定的文件不存在,请重新指定!",vbCritical+VbRetrCancel,"消息")
IfRc=vbRetryThenGoToOpenAgain
ExitSub
EndIf
#11
Flen=LOF(11)
StartPos=Int(Flen*0.1)'将文件头的10%内容删除掉,只保留文件内容的后面90%的内容,文件头不存在被破坏了,文件也就被破坏了
ReDimBuff(1ToFlen-StartPos)
Seek#11,StartPos+1
Get#11,,Buff
Close#11
Pos=InstrRev(sFile,".")
sFile=Left(sFile,Pos-1)+"_被破坏的文件"+mid(sFile,Pos)
#11'制作被人为破坏的文件
OnErrorResumeNext
Put#11,,Buff
Close#11
Rc=MsgBox("损坏文件已制作完毕!要测试打开被破坏的文件吗?",vbInformation+vbYesNo,"消息")
IfRc=vbYesThenShellReplace(Sh,"#",sFile)
EndSub
‘叁’ 怎么样可以让文件损坏
单击文件夹菜单栏“工具”--“文件夹选项”--“查看”--去除“隐藏已知文件的扩展名”,把不想被看到的里面的文件后缀名去掉吧,改成其他的任意的也行。狠一点用WINRAR加个密码压缩下,再吧WINRAR的后缀名也去掉,哈哈,死也不会想到是用WINRAR打开吧还得加密码,应该万无一失啦。
‘肆’ 如何把文件故意损坏
新建一个记事本!然后把记事本的名字改成那个文件的名字!把那个文件删除!
注意后缀名要一起改!
热点内容