有人能解释一下这个Excel 2010或更早版本的密码保护器是如何工作的吗

有人能解释一下这是如何工作的吗？为什么我需要65到66的计数，哪里有12个计数，所有的CHR变量都给出了什么

我并没有试图编写代码，但当有人在忘记密码后询问如何解锁他们的工作表时，我在网上找到了这个。我想知道到底发生了什么

Sub PasswordBreaker()

    Dim i As Integer, j As Integer, k As Integer
    Dim l As Integer, m As Integer, n As Integer
    Dim i1 As Integer, i2 As Integer, i3 As Integer
    Dim i4 As Integer, i5 As Integer, i6 As Integer
    On Error Resume Next
    For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
    For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
    ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
        Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
        Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
    If ActiveSheet.ProtectContents = False Then
        MsgBox "One usable password is " & Chr(i) & Chr(j) & _
            Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
            Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
        Exit Sub
    End If
    Next: Next: Next: Next: Next: Next
    Next: Next: Next: Next: Next: Next
End Sub

---

谢谢

这将生成多个12字符长的密码，如aaaaaaaaaaaaaa或aaaaaaaa ba等，并尝试解除工作表的保护

Chr65为您提供了ASCII代码65的字符，即A。因此，实际上，循环为前11个字符生成A和B的所有排列，最后一个循环为前12个字符生成更多的字符ᵗʰ密码的字符

因为旧的Excel版本使用不安全的哈希函数来存储密码，所以有多个密码来生成相同的哈希。因此，这只是一种寻找有效密码的廉价方法

---

有关更多详细信息，请参见：

这将生成多个12个字符长的密码，如aaaaaaaaaaaaaa或aaaaaaaa ba等，并尝试解除工作表的保护

Chr65为您提供了ASCII代码65的字符，即A。因此，实际上，循环为前11个字符生成A和B的所有排列，最后一个循环为前12个字符生成更多的字符ᵗʰ密码的字符

因为旧的Excel版本使用不安全的哈希函数来存储密码，所以有多个密码来生成相同的哈希。因此，这只是一种寻找有效密码的廉价方法

---

有关更多详细信息，请参阅：

感谢您的解释，非常有帮助谢谢您的解释，非常有帮助