16,551
社区成员
发帖
与我相关
我的任务
分享想写个word的密码破解软件，我的一个文档密码不记得了。
如题，各位大虾能否给点提示，大概的思路！！
我的文档是个7位的电话号码，现在记不起来了。所以写个暴力破解穷举出来应该是可行的吧。
但是没有思路。也不清楚word的存档格式！！
大家给点提议。大概怎么做！不需要算法！大概的点拨以下就可以
我的文档是个7位的电话号码，现在记不起来了。所以写个暴力破解穷举出来应该是可行的吧。
但是没有思路。也不清楚word的存档格式！！
大家给点提议。大概怎么做！不需要算法！大概的点拨以下就可以
...全文
请发表友善的回复…
发表回复
chenjunge 2005-05-31
- 打赏
- 举报
是啊，用已有的工具，很方便的
Igj1012 2005-05-31
- 打赏
- 举报
Advanced Office 2000 Password Recovery
Advanced Office XP Password Recovery
Advanced Office XP Password Recovery
lanmao98 2005-05-31
- 打赏
- 举报
sorry,,刚试了下另存不行
lanmao98 2005-05-31
- 打赏
- 举报
写段代码另存就可以了。
Dim DocWord As Word.Document
Dim ConWord As New Word.Application
Dim FilePath As String
FilePath = "file.doc"
Set DocWord = ConWord.Documents.Open(FilePath)
ConWord.ActiveDocument.SaveAs ".\file2.doc"
ConWord.Quit (False)
Dim DocWord As Word.Document
Dim ConWord As New Word.Application
Dim FilePath As String
FilePath = "file.doc"
Set DocWord = ConWord.Documents.Open(FilePath)
ConWord.ActiveDocument.SaveAs ".\file2.doc"
ConWord.Quit (False)
luolovegui 2005-05-24
- 打赏
- 举报
暴力破如果是7位还是要一点时间的。 我想你还是问一下吧。最起码知道一个数字就要快十倍了。
bobob 2005-05-24
- 打赏
- 举报
doc文档格式是保密的,所以只能暴力破
jinge0304 2005-05-24
- 打赏
- 举报
是我以前上大学的时候的女朋友的电话号码！！
现在不记得了
也不敢去问她！！
非技术回答不要再说了。
现在不记得了
也不敢去问她！！
非技术回答不要再说了。
surstar 2005-05-24
- 打赏
- 举报
不清楚，~
电话号码？ 难道你会有很多 电话号码？
再仔细想一下~
电话号码？ 难道你会有很多 电话号码？
再仔细想一下~
