怎樣破壞游戲文件
發布時間: 2023-08-27 07:54:09
Ⅰ 怎樣損壞一個文件
如果懂編程,用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
Ⅱ 怎樣破壞一個文件讓其打不開或者打開出錯
一樓的不行吧?我覺得可以用txt打開,然後把其中某個位置的字元改掉,具體的,太麻煩了。你自己查吧。
然後別人開不了,你用的時候可以把相對位置上的改回來。
Ⅲ 怎樣破壞一個文件夾,讓它打不開
隱藏了,自己要看的時候按如下操作:雙擊我的電腦——
工具(窗口右上方
)——文件夾選項——查看——顯示所有的文件夾和文件——確定,然後你就可以看到了
熱點內容