第一種加密方式的破解(針對窗體保護)
加密方法：使用窗體保護方式
加密步驟：工具—〉保護文檔-〉編輯限制-〉選中「僅允許在文檔中進行此類編輯」-〉選擇「填寫窗體」-〉點擊按鈕「是，啟動強制保護」-〉填寫兩邊密碼-〉點擊「確定」-〉保存此文檔（Ctrl+S或者文件-保存）
加密效果：這種加密方式最為徹底了，無法進行拷貝和編輯。
破解方法：
打開Word文檔，文件->另存為->選擇HTML格式，存為一個HTML文檔，用記事本打開該HTML文件，搜索"＜w:UnprotectPassword＞"(實際＜＞為半形)，你會看到5BCECF7A的字樣（如果你的密碼是用的123的話）。接著我們用UltraEdit打開加密的Word文檔，將16進制的順序顛倒一下，變成7ACFCE5B，然後搜索，搜索到後，都用8個0來代替，存檔（注意：一般在00003540H行，其他行不是密碼位置）。此時的Word文檔的密碼就被清空了，你就可以自己取消文檔保護了。
第二種加密方式的破解(針對只讀加密)
加密方法：安全性加密
加密步驟：工具-〉選項-〉選擇「安全性」選項卡-〉選中「建立以只讀方式打開文檔」-〉在「修改文件時的密碼」輸入框中輸入密碼-〉點擊「確定」-〉再次輸入此密碼-〉保存此文檔（Ctrl+S或者文件-保存）
加密效果：只是以只讀的方式打開文檔，但是可以拷貝。
破解方法：
UltraEdit打開加密的Word文檔，找到00000200H行，倒數六位修改為
F8
52
BF
00
00
00就可以了！其實只是將5E修改為52，僅僅變動了一個位元組。
B. WORD文檔加密後如何打開
1、用簡單的方法：
首先創建一個word文檔，使用窗體保護的方式保護文檔，工具->保護文檔->Check「僅允許在文檔中進行此類編輯」->Choose「填寫窗體」，此時會彈出一個密碼框，輸入2次密碼（我這里選擇123作為word文件密碼），這樣，該文檔就已經被保護起來了。
然我們來破解它，打開剛才創建的word文檔，文件->另存為->選擇HTML格式，存為一個HTML文檔，用記事本打開該HTML文件，搜索"<w:UnprotectPassword>"，你會看到5BCECF7A的字樣（如果你的密碼是用的123的話）。
接著我們用UltraEdit或其他類似的工具打開最初受保護的Word文檔，搜索7ACFCE5B，搜索到後，都用8個0來代替，存檔。
此時的Word文檔的密碼就被清空了，你就可以自己取消文檔保護了，密碼就不用輸入了，按個回車了事。
2、用編程的方法：
下面來看一看程序的具體編制過程。程序採用VB編程實現，需要機器安裝有VB應用程序及Microsoft Office組件。打開VB，新建一個VB工程，取名Proc_Word，將啟動窗體命名為FrmMain，選擇「工程」菜單中的「引用」，在「引用」對話框中選擇 「Microsoft Word8.0 Object Library」（這一步很重要，你必須選擇這一ActiveX部件，否則代碼不能正確運行，順便說一句，如果安裝的是Office2000，那麼應該選擇「Microsoft Word9.0 Object Library」）。同時在「工程」菜單中「部件」對話框中選擇添加「Microsoft Windows common controls -2.5(sp2)」，以便在窗體設計中可以使用微調控制項。
好了，現在可以動手編製程序了。在剛才FrmMain窗體的左側添加一個框架控制項，並在此控制項內加入一個驅動器列表框、一個目錄列表框和一個文件列表框控制項。在FrmMain窗體的右下側添加兩個命令按鈕，在右上側添加三個標簽控制項、兩個文本框控制項和一個微調控制項，你可以參考附圖來設計。接著，將框架的Caption屬性設置成「請選擇需要破譯的Word文檔」；保持目錄列表框、驅動器列表框、文件列表框、文本框、微調控制項預設名稱不變；將文件列表框的Pattern屬性設置成「*.DOC」，目的是只顯示目錄下的 Word文件；將第一個標簽控制項Caption屬性設置成「該程序破譯八位以下純數字組合Word文檔密碼」，將第二個標簽Caption屬性設置成「解密進度」，將第三個標簽Caption屬性設置成「請選擇破譯密碼位數」；將第二個文本框的Text屬性設置成「4」，這是預設密碼位數；將微調按鈕的 BuddyControl屬性設置成Text2就能和第二個文本框關聯，BuddyProperty 改成Text，Max、Min屬性分別設置成「8」和「1」，表示最長密碼位數和最短密碼位數，將Wrap屬性設置成True，將Increment屬性設置成「1」，以便每單擊一次加1或減1；將兩個命令按鈕的名稱分別改成 「cmdopendoc」和「cmdquit」，Caption屬性分別設置成「文件打開」、「系統退出」。以上就把各控制項的屬性設置完了，接著編寫代碼也就不是什麼難事兒了。
下面就是全部的源程序，適當的注釋有助於大家理解程序。你還可以通過設置斷點來跟蹤密碼生成部分，看看程序編制的原理。
Private Sub cmdopendoc_Click()
Dim wd As New Word.Application
Dim strpath As String
Dim pass As String
Dim J, K, Pass_long As Integer
Dim Max_num, Min_num, I As Long
strpath = File1.Path & "\" & File1.FileName
On Error Resume Next
'程序開始
Pass_long = Val(Text2.Text)
Max_num = 10 ^ Val(Text2.Text)
Min_num = 10 ^ (Val(Text2.Text) - 1)
Flag = 0
For K = 0 To Pass_long - 1
Max_num = 10 ^ (Pass_long - K)
Min_num = 10 ^ (Pass_long - (K + 1))
For J = 0 To Pass_long - 1
cmdopendoc.MousePointer = 11
For I = IIf(Pass_long - K = 1, 0, Min_num) + J To Max_num Step Pass_long
Text1.Text = pass
Text1.Refresh
pass = String(K, "0") & I
Flag = wd.Documents.Open(FileName:=strpath, passworddocument:=pass)
'如果解密成功,打開文檔,顯示密碼,退出過程
If Flag <> 0 Then
Label1.Caption = "文檔密碼"
Label1.Refresh
Text1.Text = pass
wd.Visible = True
cmdopendoc.MousePointer = 0
Exit Sub
End If
Next I
Next J
Next K
MsgBox "密碼位數不對,請重新輸入"
End Sub
Private Sub cmdquit_Click()
End
End Sub
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub
Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub
Private Sub File1_DblClick()
Call cmdopendoc_Click
End Sub
幾點說明：
需要說明的是，窮舉法解密對系統資源的耗用是十分驚人的，在解密的過程中最好不要運行其他應用程序。針對其巨大的資源耗用量，我在程序中採用了一個小技巧，那就是用密碼位數作為循環的步長進行刺探。也就是說如果你的密碼是3位的話，那麼程序將依次嘗試100、103、106……997、 101、104……998、102、105……999結束，加快了查找密碼的速度（東漸: 其實大家可以動手算一算，到底是快了許多，還是快了一點，還是根本沒有提高速度^_^）。
。。。這個還能怎麼辦，只能破解密碼了，如果想要不破解就打開，那加密不等於白加了，上面這些是網上拉的別人破解的方法，或者去下個破解密碼的軟體，你都試試。
C. 如何打開加密的word的文檔
要打開加密受保護的文檔，方法和步驟如下：
1、依次單擊「文件→另存為」版，彈出「權另存為」對話窗口，在「保存類型」中選擇「WORD97—2000&6.0/95—RTF(*.doc)」， 再給文檔取個名字，單擊「保存」按鈕。
2、關閉文檔再次打開，然後再依次執行「工具→解除文檔保護」，這時就不會再提示輸入密碼了。
另外，在另存為時，也可將文件類型選擇為html，然後打開html文件，選擇其中的內容將其復制到新文檔中即可。
你也可以使用以下方法：啟動Word，然後依次單擊「插入→文檔」，彈出「插入文件」對話窗口，選擇那個有保護的文件，單擊「插入」按鈕，加密碼保護的文檔插入到新文檔中，文檔保護就自動被取消了。