Khóa VBA với mật khẩu mở

Liên hệ QC
Tôi tuân thủ nội quy khi đăng bài

YêuCN

Thành viên thường trực
Tham gia
17/7/19
Bài viết
378
Được thích
141
Đây là chương trình nhỏ mình đang nghiên cứu cho bảo mật code VBA thông qua mật khẩu mở tập tin Excel. Các bạn có quan tâm cho mình ý kiến, xin đừng ném đá.
*Lưu ý:
-Tập tin Trusted_Backup.reg dùng phục hồi đường dẫn tin cậy trong Excel.
-Khi file chứa mật khẩu được mở macro bên ngoài sẽ bị tắt. Dùng ResetVBA.exe để bật lại macro !

 

File đính kèm

  • KHOAVBA.rar
    1.6 MB · Đọc: 62
Lần chỉnh sửa cuối:
Tôi cũng dùng cách cập nhật ứng dụng qua internet mà lại tại sao không không nghĩ ra việc lưu luôn các thông tin bản quyền trên đây nhỉ """:::":\

Cấp bản quyền từ xa thì anh cần một server thật ổn định, đảm bảo kết nối an toàn và bảo mật, liên tục và đủ đáp ứng số lượng truy vấn.
 
Upvote 0
Giải pháp bảo mật của tôi là:
1. Viết dll bằng VB6.
2. Ghi Mã máy và Mã kích hoạt của người dùng lên Registry.
3. Mã hóa Mã máy + giải mã Mã kích hoạt ở bước 2.
4. So khớp 2 kết quả ở bước 3:
- Nếu khớp: User đã có bản quyền -> tiếp tục dùng.
- Không khớp: Ghi số lần dùng code lên đâu đó ở Registry
+ Cảnh báo số lần còn được dùng (nếu còn)
+ Xóa file nếu cố dùng tiếp đến mức quá số lần quy định.

Tất nhiên là giải pháp không hoàn hảo vì nếu người dùng tìm ra được khóa Registry thì có thể đặt lại số lần dùng về 0, nhưng liệu người dùng có tìm ra đúng chỗ trong rừng khóa Registry kia? Còn với dll thì chỉ dịch ngược để xem (nếu dịch được) chứ không thể sửa dll để vô hiệu hóa code phòng thủ trong đó.
Tôi nghĩ bạn cứ VB6 mà viết DLL đi cho lành còn chuyện Crack thì Ms còn dính đấy chứ ta

trừ khi ứng dụng của bạn quá nổi tiếng mà nhu cầu cần lắm lắm thì sẽ dính thôi ... còn ít không ai quan tâm đâu vì chi phí crack nó mất nhiều thời gian ngồi căng mắt ra mà dò

dò dược hay không còn phụ thuộc vào cách thức bạn code trong DLL nữa

chỉ kẹt là VB6 chỉ hổ trợ 32 bít nếu muốn dùng cho 64 bit thì chuyển qua Exe cũng ok nhưng cái ruột vẫn 32 bit và khi đó sẽ dính khá nhiều virus giả

chuyện virus giả hay thật do chính bạn viết thôi .. khi qua Exe viết kỹ lại chút là hết còn DLL viết tào lao vẫn không báo Virus

khi viết trên 1 nền tảng khác ngoài VBA chuyện dính virus giả là bình thường nhưng khoãng 5 em trở xuống và không bị chặn và xóa là ok

còn bị chặn và xóa thì giá trị của nó nằm trong thùng RÁC không cần lý do biện minh
 
Upvote 0
Thôi toi rồi, em thường xuyên gặp cái này, cứ gặp là cho defender tạm thời nghỉ ngơi real-time, restore lại. Sau thì bật lại. Liệu có sao không bác?
Bạn hãy nghĩ như sau

1/ khi viết nó bán Or cho ai đó dùng cũng bị vậy thì sao không lẽ keo họ tắt trình diệt virus đi = quá tào lao

2/ virus hay không do chính bạn code ... chịu khó viết lại là hết

3/ Virus do bạn dùng Tools Pack nó thì dính là đương nhiên

4/ Nên viết không cần Pack là hết mục số 3 VD viết trên Delphi , VB6, C# ++++++++++++ nhưng kẹt viết C# họ xem hết vậy phải Pack thui :p

5/ đâu đó có siêu tào lao rồi đấy xúi người ta tắt trình diệt virus đi
 
Upvote 0
Giải pháp bảo mật của tôi là:
1. Viết dll bằng VB6.
2. Ghi Mã máy và Mã kích hoạt của người dùng lên Registry.
3. Mã hóa Mã máy + giải mã Mã kích hoạt ở bước 2.
4. So khớp 2 kết quả ở bước 3:
- Nếu khớp: User đã có bản quyền -> tiếp tục dùng.
- Không khớp: Ghi số lần dùng code lên đâu đó ở Registry
+ Cảnh báo số lần còn được dùng (nếu còn)
+ Xóa file nếu cố dùng tiếp đến mức quá số lần quy định.

Tất nhiên là giải pháp không hoàn hảo vì nếu người dùng tìm ra được khóa Registry thì có thể đặt lại số lần dùng về 0, nhưng liệu người dùng có tìm ra đúng chỗ trong rừng khóa Registry kia? Còn với dll thì chỉ dịch ngược để xem (nếu dịch được) chứ không thể sửa dll để vô hiệu hóa code phòng thủ trong đó.
Cách này của mình dành cho những bạn không biết các ngôn ngữ khác như vb6, delphi….vì nếu bạn đã biết các ngôn ngữ đó thì chỉ cần viết code trực tiếp vào dll và gọi các hàm từ trong excel, cũng không cần khoá gì !
Bài đã được tự động gộp:

Tôi nghĩ bạn cứ VB6 mà viết DLL đi cho lành còn chuyện Crack thì Ms còn dính đấy chứ ta

trừ khi ứng dụng của bạn quá nổi tiếng mà nhu cầu cần lắm lắm thì sẽ dính thôi ... còn ít không ai quan tâm đâu vì chi phí crack nó mất nhiều thời gian ngồi căng mắt ra mà dò

dò dược hay không còn phụ thuộc vào cách thức bạn code trong DLL nữa

chỉ kẹt là VB6 chỉ hổ trợ 32 bít nếu muốn dùng cho 64 bit thì chuyển qua Exe cũng ok nhưng cái ruột vẫn 32 bit và khi đó sẽ dính khá nhiều virus giả

chuyện virus giả hay thật do chính bạn viết thôi .. khi qua Exe viết kỹ lại chút là hết còn DLL viết tào lao vẫn không báo Virus

khi viết trên 1 nền tảng khác ngoài VBA chuyện dính virus giả là bình thường nhưng khoãng 5 em trở xuống và không bị chặn và xóa là ok

còn bị chặn và xóa thì giá trị của nó nằm trong thùng RÁC không cần lý do biện minh
Cái này bạn nói đúng khi vì khi viết code vào file thực thi exe,xll … rất dễ bị diệt bởi các phần mềm diệt virut. Còn viết vào dll thậm chí pack lại bởi một số phần mềm vẫn không bị xoá hay báo !
Bài đã được tự động gộp:

Sắp tới tôi sẽ ra phiên bản dll chỉ cảnh báo 1 em be bé xinh xinh !
Bài đã được tự động gộp:

Cái này có vẻ giống việc kiểm tra phiên bản ứng dụng rồi tự động cập nhật phải không befaint?
Cách đăng ki key online đơn giản nhất mình từng làm là qua google sheet!
 
Lần chỉnh sửa cuối:
Upvote 0
Cách này của mình dành cho những bạn không biết các ngôn ngữ khác như vb6, delphi….vì nếu bạn đã biết các ngôn ngữ đó thì chỉ cần viết code trực tiếp vào dll và gọi các hàm từ trong excel, cũng không cần khoá gì !
Bài đã được tự động gộp:


Cái này bạn nói đúng khi vì khi viết code vào file thực thi exe,xll … rất dễ bị diệt bởi các phần mềm diệt virut. Còn viết vào dll thậm chí pack lại bởi một số phần mềm vẫn không bị xoá hay báo !
Bài đã được tự động gộp:

Sắp tới tôi sẽ ra phiên bản dll chỉ cảnh báo 1 em be bé xinh xinh !
Bài đã được tự động gộp:


Cách đăng ki key online đơn giản nhất mình từng làm là qua google sheet!
1/ chốt lại có virus hay virus giả do chính trình độ và cách viết code của bạn tạo ra vì viết chưa đạt tiêu chuẩn xx mà ra cả

còn trong chừng mực nào đó báo giả do 1 phần chính các trình diệt virus đó chưa cập nhật nhưng rất ít thôi và không đến mức chuyển nó vào thùng RÁC

2/ @Maika8008 keo Con ChatGPT nó phụng sự bạn và cứ yên tâm mà viết trên VB6 các hàm độc quyền đi không tây nào nào nó dịch lấy hết ra code thật được đâu ... còn Crack là khác

cứ vậy mà chơi còn ứng dụng của bạn tôi phán là cũng không nổi tiếng và phân phối bao trùm rộng đâu nên tây nó cũng không dòm căng mắt ra mà dò Crack

3/ đâu đó họ đổ thừa cho sử dụng các hàm API của Ms nên báo virus giả và xúi tắt diệt virus đi = siêu ngáo từ và siêu tào lao
 
Upvote 0
2/ @Maika8008 keo Con ChatGPT nó phụng sự bạn và cứ yên tâm mà viết trên VB6 các hàm độc quyền đi không tây nào nào nó dịch lấy hết ra code thật được đâu ... còn Crack là khác

cứ vậy mà chơi còn ứng dụng của bạn tôi phán là cũng không nổi tiếng và phân phối bao trùm rộng đâu nên tây nó cũng không dòm căng mắt ra mà dò Crack
Hihi. Tôi chỉ sợ rằng người ta banh code tôi ra để mà chê thôi chứ sợ gì crack :)
 
Upvote 0
Sắp tới tôi sẽ ra một phiên bản mới sạch !
 
Upvote 0
Sắp tới tôi sẽ ra một phiên bản mới sạch !
cố giắng lên ... cứ xanh sạch đẹp như hình sau là ok ... còn lại nói như thánh tào lao mà file bị xóa là thua

1683980863895.png

Theo kinh nghiệm của tôi khi thêm 1 Unit viết code Mới xong là kiểm tra 1 cái còn biết lối mà dò dính Virus

xong cứ vậy là trình code két sẽ lên tay thôi ... Pack dính Virus là đương nhiên ... còn không pack dính Virus là thua

Còn viết trên VBA mà dính Virus đến mức xóa hay tắt trình diệt virus đi thì ..............cho vào thùng RÁC
 
Upvote 0
cố giắng lên ... cứ xanh sạch đẹp như hình sau là ok ... còn lại nói như thánh tào lao mà file bị xóa là thua

View attachment 290127

Theo kinh nghiệm của tôi khi thêm 1 Unit viết code Mới xong là kiểm tra 1 cái còn biết lối mà dò dính Virus

xong cứ vậy là trình code két sẽ lên tay thôi ... Pack dính Virus là đương nhiên ... còn không pack dính Virus là thua

Còn viết trên VBA mà dính Virus đến mức xóa hay tắt trình diệt virus đi thì ..............cho vào thùng RÁC
hii cố còn tầm 2 em bé !
 
Upvote 0
Cập nhật lỗi bị windows defender diệt ở một số máy
Mật khẩu giải nén 1 nhằm cho phép tải mà không vấn đề(phòng ngừa)
Sử dụng:
-Chạy file hotro.exe nhấn register để đăng kí dll
-Chay file runme.xlam để mở file được bảo vệ VBA
-Báo cáo duyệt virut cho file rar
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom