Trang 1/4 1 2 3 4 cuốicuối
Hiển thị kết quả tìm kiếm từ 1 đến 10 trên tổng số: 31

Ðề tài: Code Crack Pass Sheet

  1. #1
    Tham gia ngày
    12 2006
    Nơi Cư Ngụ
    Cần Thơ
    Bài gởi
    154
    Cảm ơn
    21
    Được cảm ơn 2,088 lần trong 85 bài viết

    Code Crack Pass Sheet

    Các bạn có thể phá pass của 1 Sheet bị Protect với đoạn code sau :

    PHP Code:
    Sub PasswordBreaker()

    Dim i As IntegerAs IntegerAs Integer
    Dim l 
    As IntegerAs IntegerAs Integer
    Dim i1 
    As Integeri2 As Integeri3 As Integer
    Dim i4 
    As Integeri5 As Integeri6 As Integer
    On Error Resume Next
    For 65 To 66: For 65 To 66:         For 65 To 66
     
    For 65 To 66: For 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 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

             ActiveWorkbook
    .Sheets(1).Select
             Range
    (“a1”).FormulaR1C1 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
    NextNextNextNextNextNext
    Next
    NextNextNextNextNext

    End Sub 
    (Code sưu tầm trên Echip )

    Cách sử dụng : Các bạn chọn Sheet bị Protect , bấm phải chuột, chọn View Code, hoặc bấm phím tắt Alt + F11
    Paste đoạn code trên vào và RUn. Chờ khoảng 1-2 phút là xong. Pass đã bị phá bạn có thể nhập liệu bình thường

    Chúc các bạn thành công .
    Thân

  2. Có 8 thành viên cảm ơn lachinhan về bài viết này:


  3. #2
    Tham gia ngày
    07 2007
    Nơi Cư Ngụ
    Dalat
    Bài gởi
    4,901
    Cảm ơn
    4,387
    Được cảm ơn 21,048 lần trong 3,973 bài viết
    Bài này, xin phép được nói đôi lời cùng các thành viên. Có thể các bạn nói rằng, đây là "bày cách để phá password", vậy nó có phạm luật không ? Xin thưa là không.

    Nếu các bạn đưa một file Excel lên diễn đàn, nhờ người khác phá password dùm, hoặc các bạn nói: "Gửi file cho tôi đi, tôi sẽ bẻ khóa cho", thì đó là phạm luật, bởi điều đó có thể liên quan đến bản quyền. Không ai có thể kiểm tra được file này là của chính bạn hay là của người khác. Hoặc, bạn cung cấp serial number, cung cấp cách crack một sản phẩm thương mại, phổ biến một sản phẩm đã bị crack, thì đó là phạm luật.

    Nhưng, bàn về thuật toán để giải mã một password, mà cụ thể là bài này, thì lại là chuyện khác. Vì nó không nói đến cụ thể một file Excel nào. Đây chỉ là bàn về thuật toán, về phương pháp sử dụng VBA để giải mã một password.

    Nói như thế nào để các bạn hiểu nhỉ. Giống như vầy: Bạn hack một website, thì bạn phạm luật. Nhưng việc đào tạo ra một hacker, thì hợp pháp. Các trung tâm bảo mật vẫn làm chuyện đó một cách công khai đấy thôi. Bản thân một hành động, một vấn đề, tự nó không có gì xấu (nhân chi sơ tính bản thiện!), xấu hay tốt là do cách chúng ta làm, cách chúng ta xử lý vấn đề đó.

    Thêm một ví dụ nữa, đời thường hơn: Phá khóa nhà người ta thì bị bắt, là vi phạm luật pháp; nhưng đi học cách sửa một cái ổ khóa, học cách mở một cái ổ khóa đã bị mất chìa, thì hợp pháp, hoặc bàn về phương pháp tìm ra cách cấu tạo của một cái chìa khóa, thì cũng là hợp pháp.

    Việc làm gì, cũng có mặt trái mặt phải, mặt tốt mặt xấu của nó. Bài này đưa ra cách thức vận dụng VBA để giải mã, là không có gì sai cả. Còn vận dụng nó như thế nào thì tốt, như thế nào thì không tốt, là tùy vào cách làm, tùy vào động cơ, mục đích của việc làm. Các bạn có thể áp dụng nó để tìm ra các password của chính các bạn, mà các bạn đã quên, đó là một điều chính đáng.

    Vả lại, thường người ta chỉ đặt password cho Sheet để bảo vệ cấu trúc của nó, để tránh bị sửa chữa, thay đổi công thức cũng như định dạng, mà có thể làm cho bảng tính không còn chính xác. Chứ nếu thật sự cần thiết phải bảo mật tuyệt đối, thì không ai làm như vậy. Mà, ví dụ thôi nhé, đặt password cho từng Sheet, rồi đặt password mở file, rồi nén lại, thêm một cái password giải nén nữa... Nhiêu đó thôi, thì có cái bài này trong tay, cũng chẳng làm được gì. Ý tôi muốn nói, các bạn hoàn toàn có thể sử dụng đoạn code trong bài này cho mục đích cá nhân, và bản thân nó không vi phạm luật lệ gì hết.

    Thân.
    thay đổi nội dung bởi: BNTT, 18-10-08 lúc 10:24 AM

  4. Có 9 thành viên cảm ơn BNTT về bài viết này:


  5. #3
    Tham gia ngày
    06 2006
    Nơi Cư Ngụ
    ĐT: 04-2242 5829
    Bài gởi
    1,139
    Cảm ơn
    725
    Được cảm ơn 2,441 lần trong 920 bài viết
    Luật là thế này:
    - Tài liệu, code, v.v... hướng dẫn tìm hiểu về bảo mật là điều không vi phạm luật bản quyền. Tìm hiểu về bảo mật để làm bảo mật cho tốt hơn. Giống như các chuyên gia bảo mật phát hiện các lỗ hổng bảo mật để các HĐH ngày càng được hoàn thiện. Với đoạn code ở trên, chúng ta đã chứng minh là pws của sheet là không hề có tính bảo mật cao.

    - Nếu trao đổi về cr*ck 1 SP, phá pws của 1 file nào đó cụ thể thì mới là phạm luật.

    Như vậy bài trên không phạm luật bản quyền, không vi phạm nội quy của diễn đàn
    thay đổi nội dung bởi: hai2hai, 18-10-08 lúc 10:06 AM

  6. Có 4 thành viên cảm ơn hai2hai về bài viết này:


  7. #4
    Tham gia ngày
    07 2007
    Nơi Cư Ngụ
    Dalat
    Bài gởi
    4,901
    Cảm ơn
    4,387
    Được cảm ơn 21,048 lần trong 3,973 bài viết
    Trích Nguyên văn bởi lachinhan View Post
    Cách sử dụng : Các bạn chọn Sheet bị Protect , bấm phải chuột, chọn View Code, hoặc bấm phím tắt Alt + F11
    Paste đoạn code trên vào và RUn. Chờ khoảng 1-2 phút là xong. Pass đã bị phá bạn có thể nhập liệu bình thường

    Chúc các bạn thành công .
    Thân
    Không có 1-2 phút đâu! Đó chỉ là lý thuyết thôi.
    Không tin, các bạn thử tạo một password chừng 15 ký tự, sao cho không theo một quy tắc nào cả, rồi bảo nó dò đi, xem mất bao lâu thì xong...

  8. #5
    Tham gia ngày
    05 2007
    Nơi Cư Ngụ
    SAPA
    Bài gởi
    4,123
    Cảm ơn
    9,509
    Được cảm ơn 10,805 lần trong 3,725 bài viết
    Trích Nguyên văn bởi BNTT View Post
    Không có 1-2 phút đâu! Đó chỉ là lý thuyết thôi.
    Không tin, các bạn thử tạo một password chừng 15 ký tự, sao cho không theo một quy tắc nào cả, rồi bảo nó dò đi, xem mất bao lâu thì xong...
    Cần gì 15 ký tự chứ, em đặt password là: "Ý" thôi! Code này còn bó tay nữa là! (Đặt Pass Có dấu bằng UniCode) ! Hehe

  9. Thành viên sau cảm ơn cadafi về bài viết này:


  10. #6
    Tham gia ngày
    12 2006
    Nơi Cư Ngụ
    Cần Thơ
    Bài gởi
    154
    Cảm ơn
    21
    Được cảm ơn 2,088 lần trong 85 bài viết
    He he .... Code này đưa lên ko phải để đi phá hoại mà để các bạn biết mà bảo mật. Như vậy các bạn đã biết làm thế nào để Sheet mình được an toàn rồi phải ko ?? Đừng nhìn mọi việc chỉ theo 1 hướng tiêu cực .....

  11. Thành viên sau cảm ơn lachinhan về bài viết này:


  12. #7
    Tham gia ngày
    12 2007
    Nơi Cư Ngụ
    Q. Bình Thạnh - TPHCM
    Bài gởi
    1,857
    Cảm ơn
    2,823
    Được cảm ơn 4,849 lần trong 1,471 bài viết
    Mình bàn về thuật toán một tí.

    Trong Unprotect sheet thì pass : AAAAABAAABBn <=> danh
    Và pass luôn có 12 ký tự, 11 ký tự đầu là A hoặc B, ký tự thứ 12 là các ký tự thông thường trên bàn phím. Vậy bác nào biết về cách mã hóa này xin hướng dẫn dùm ạ.

    Cách dò pass này không theo quy luật là càng nhiều ký tự dò tìm càng lâu.
    VD pass là "danh" thì t=30s, là "c" thì t=260s

  13. Thành viên sau cảm ơn hoangdanh282vn về bài viết này:


  14. #8

    Thumbs up

    Giả sử biết trước pass của bạn gồm có 3 con số lấy từ 2 ký tự khác nhau là 1,2
    Để tìm ra được một pass thì cần thử lần lượt từng trường hợp trong số 8 (=2^3) trường hợp dưới đây:

    a(1) = "111"
    a(2) = "112"
    a(3) = "122"
    a(4) = "121"
    a(5) = "222"
    a(6) = "221"
    a(7) = "211"
    a(8) = "212"

    Để dò tìm pass, ta đi một vòng lặp cho để kiểm tra từng giá trị trong mảng a

    Code:
    For i = 1 To 8
        If MyWorksheet.Unprotect(a(i)) = True Then
            Exit For
        End If
    Next i
    Trên là một ví dụ tôi đã giả định:
    + Biết trước mật khẩu gồm có 2 ký tự 1 và 2
    + Số ký tự trong mật khẩu là 3

    Bài toán thực tế ta không biết trước điều này, vì vậy cần phải kiểm tra tất cả các trường hợp. Cần xác định:

    + Số ký tự có thể có trong mật khẩu từ 1 đến 128 (hoặc cao hơn)
    + Các ký tự khác nhau có thể tham gia là 255

    Gọi K là số ký tự trong mật khẩu
    Gọi N là số ký tự khác nhau trong mật khẩu
    Công thức để xác đinh số lượng mật khẩu cần thử (M) được xác định bằng cách lấy chỉnh hợp lặp chập K của N phần tử.

    M = N^K

    Ví dụ ta kiểm tra mật khẩu với số ký tự trong mật khẩu là 4 (K=4), số ký tự có thể có trong mật khẩu là 255 (N=255).
    Số trường hợp cần phải kiểm tra là M = N^K = 255^4 = 4 228 250 625

    Những việc khó khăn như sau:
    1) Các bạn hãy thử đặt phép tính với số ký tự trong mật khẩu >4
    2) Các bạn hãy làm một hàm tạo ra mảng (a) chứa các mật (số mật khẩu là M lấy từ N ký tự khác nhau).
    3) Khi đã làm thành công 1) và 2), hãy thực hiện một vòng lặp For I = 1 To M để tìm mật khẩu đúng. Hãy để ý thời gian tính toán xem mất bao nhiêu ngày .

    Các phần mềm phá mật khẩu thường có bộ định nghĩa, thực ra bản chất là cho phép người dùng giả định về loại ký tự tham gia (A-Z, 0-9,...) và số ký tự của mật khẩu nếu có thể dự đoán trước để nhằm giảm bới số phép thử-->Tìm nhanh.

    Có một giải pháp là phá mật khẩu (chứ không phải tìm). Nó tìm đến vùng dữ liệu của file mà nơi đó chứa cấu trúc của mật khẩu, sau đó nó delete luôn chứ không cần biết mật khẩu là gì. Các bạn có thể thấy điều này với các phần mềm c-r-a-c-k trong VBA chỉ mất không đến 1 giây.


    Phân tích sơ qua như vậy chúng ta có thể thấy để viết một chương trình tìm mật khẩu rất rất ít người làm được.

  15. Có 6 thành viên cảm ơn Nguyễn Duy Tuân về bài viết này:


  16. #9
    Tham gia ngày
    04 2008
    Nơi Cư Ngụ
    #VALUE!
    Bài gởi
    2,210
    Cảm ơn
    2,435
    Được cảm ơn 3,632 lần trong 1,736 bài viết
    Vậy theo bác! Cuối cùng của vấn đề nằm ở chỗ!
    Mật khẩu đó giấu ở đâu?
    Và nó được mã hóa như thế nào?
    Tức là làm cho các phần mềm Cr*** kia không tìm được để xóa chúng đi hoặc chép đè lên đúng không?
    Vậy bác có thể can thiệp sâu vào trong file dữ liệu của Excel: Để thực hiện việc thay đổi cấu trúc của file Excel đó nhằm không cho thằng kia tìm thấy và xóa chúng đi được không?
    Bù lại bác phải thêm 1 thao tác gì đó để trả chúng về hình dáng cũ trước khi mở file đó ra. Kiểu như *.rar hoặc *.zip nhưng tự động được không?
    Thân.

  17. Thành viên sau cảm ơn Po_Pikachu về bài viết này:


  18. #10
    Tham gia ngày
    08 2006
    Bài gởi
    3,267
    Cảm ơn
    1,733
    Được cảm ơn 3,733 lần trong 1,764 bài viết
    Trích Nguyên văn bởi lachinhan View Post
    He he .... Code này đưa lên ko phải để đi phá hoại mà để các bạn biết mà bảo mật. Như vậy các bạn đã biết làm thế nào để Sheet mình được an toàn rồi phải ko ?? Đừng nhìn mọi việc chỉ theo 1 hướng tiêu cực .....
    Chào mừng ông bạn đã trở lại, dạo này Ngân Hàng ít việc nên Giám đốc cũng rảnh rỗi đây.
    Bắt đầu của ông bạn bao giờ cũng liên quan đến các vấn đề bảo mật!! Híc

    Rất mong ông tiếp tục những phần tương tự.

    To bác Tuân: Dạo này cũng sư phạm phết nhỉ ?? Cứ vậy phát huy bác ạ.

    Phân tích sơ qua như vậy chúng ta có thể thấy để viết một chương trình tìm mật khẩu rất rất ít người làm được.
    Đúng đấy, việc bác Tuân nói như trên đó mới chỉ là thuật toán và lý thuyết, muốn mở được khóa thì anh trộm phải biết và hiểu rõ đó là loại khóa gì ??? dùng cho nhà hay cho hầm hay cho két sắt . . .
    Cũng như vậy, người viết chương trình phải hiểu rõ về chương trình, về phần mềm mà mình đang định hack nó.

    Vì vậy chúng ta cũng chỉ dừng lại ở mức học tập và ứng dụng thôi.

    Thân!
    -----------------------------------------------------------------------------------
    Một ngày mới bắt đầu bằng ÁNH MẮT - NỤ CƯỜI !!!!

    -------------------------------------------------------------------------
    TanPhu Investment Co.,ltd
    http://skstanphu.com
    tronghieu@skstanphu.com

  19. Có 2 thành viên cảm ơn Mr Okebab về bài viết này:


Trang 1/4 1 2 3 4 cuốicuối

Thông tin về chủ đề này

Users Browsing this Thread

Hiện có 1 người đang xem đề tài này. (0 thành viên và 1 khách)

Đề tài tương tự

  1. Code lưu lại tên đăng nhập và pass
    Viết bởi hongtruong101186 trong chuyên mục Trung tâm giải thích code.
    Trả lời: 5
    Bài mới gởi: 16-03-10, 10:56 AM
  2. Giúp tạo pass cho code
    Viết bởi aiquocxp trong chuyên mục Trung tâm giải thích code.
    Trả lời: 3
    Bài mới gởi: 15-01-10, 12:34 PM
  3. cách tạo pass để bảo vệ code
    Viết bởi phuongpuong trong chuyên mục Các hàm tự tạo cho worksheet
    Trả lời: 3
    Bài mới gởi: 05-12-09, 02:36 PM

Bookmarks

Bookmarks

Quyền Sử Dụng Ở Diễn Ðàn

  • Bạn không thể đăng đề tài mới
  • Bạn không thể đăng trả lời
  • Bạn không thể đăng file đính kèm.
  • Bạn không thể sửa bài viết.
  •  

Mudim v0.8 Tắt VNI Telex Viqr Tổng hợp
Chính tả Bỏ dấu kiểu mới  [Bật/Tắt (F9)]