Chủ đề: Mã hóa trong Access !
-
08-01-2010, 04:52 AM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Mã hóa trong Access !
Cơ sở dữ liệu của em dùng trong mạng LAN và để đề phòng trường hợp khi chuyển file Back End sang vị trí khác không phải ngồi link lại cho từng máy, nên em đã thiết kế ra 1 cái file Link để lưu giữ đường dẫn của BACK END.
Làm thế nào để bảo vệ cái Back End chỉ có 1 người biết vị trí luôn là nỗi trăn trở của em. Và vấn đề là phải giấu cái link BACK END trong file Link đi.
Và trong một ngày vật vờ trên mạng em vô tình vớ được cái bảng mã Ascii. Mừng như vớ được con cá mập, nhớ lại trước đây ông thầy từng mã hóa trong SQL em cũng tí tởn tìm cách mã hóa cái đường dẫn của BACK END trong file Link này. Và sau 2 ngày ngâm cứu em thiết kế ra đoạn code sau ,mong mọi người cho em ý kiến góp ý xem nó có vấn đề ở đâu không nhé .
:roile:
Mã:Function Encode(linkencode As String) As String 'Ma hoa duong dan cua file CSDL On Error GoTo Err_Encode Dim n As Integer Dim t As Integer Dim b As Integer Dim char As String Dim charencode As String Dim rep As String n = Len(linkencode) t = 1 While t <= n char = Mid(linkencode, t, 1) b = Asc(char) - 4 charencode = Chr(b) rep = Replace(linkencode, char, charencode, t, 1) linkencode = Left(linkencode, t - 1) & rep t = t + 1 Wend Encode = linkencode Exit_Encode: Exit Function Err_Encode: MsgBox Err.Description & Err.Number End Function
View more random threads:
- Chèn dòng trong Form Access
- Nút OfficeLink bị disable
- Em không biết lấy giá trị lớn nhất
- cần giúp đở gấp ( liên kết 2 máy trong mạng LAN)
- Một số câu hỏi trắc nghiệm về VBA trong access
- Gán giá trị của checkbox trên formMain đến các bản ghi trong subform
- giúp e 1 bài VBA này cái
- Xin code khóa màn hình nhập liệu của form
- Xin code VBA
- Giúp sinh mã quản lý cho từng sản phẩm
-
08-02-2010, 06:34 PM #2Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Mã hóa trong Access !
Gửi bởi glasseggs
Thân
-
08-02-2010, 08:35 PM #3Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Mã hóa trong Access !
Gửi bởi glasseggs
Nói chơi thôi chứ cám ơn bạn, đây là một cách mã hoá cơ bản nhất. Phòng được người ngay chứ không phòng được kẻ gian :runcamcap:
-
08-02-2010, 10:11 PM #4Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Mã hóa trong Access !
Ơ ơ, hay nhở, lỡ cái Asc(char) nó nhỏ hơn 4 thì sao nhở
Bạn này hay tự làm khó mình. Xin thưa đã có Encode tất sẽ có Decode. Và chuyện gì sẽ xảy ra nhỉ?
Cách mã hóa thì mỗi người mỗi kiểu ,người ta muốn phá thì lại mất công ngâm cứu cách mã hóa của mình thì mới phá được.
Ví dụ với cách mã hóa trên ,theo mình đoán mò giả sử 1 lập trình viên muốn phá cũng phải vào xem code của mình thì ra ngay, nhưng nếu mình đặt pass cho VBA thì họ lại phải phá pass của VBA trước. Chứ ngồi dò ra thì đến bao giờ.
Kể với bác sĩ, anh M. cho biết bữa qua là sinh nhật của mình nên có đi ăn tối, rồi trở về nhà quan hệ tình dục với vợ. Trong quá trình quan hệ , vợ anh dùng miệng "tác động" nhiều vào vùng tinh hoàn....
Hy hữu. Anh chàng suýt mất tinh hoàn vì chơi bằng miệng với vợ