Không cho sửa , xóa dòng table hay ẩn table

[ĐỖ SƠN HẢI]

Các bạn có biết cách ẩn table không ? chỉ mình với :wall:

 

[dongnamnb]

Bạn nháy phải chuột vào table muốn ẩn, chọn properties, tích vào ô Attributes Hidden, OK.
Chúc thành công!

 

[ĐỖ SƠN HẢI]

Cảm ơn bạn, cho minh hỏi một câu - mình có thể cài pasword không cho người khác mở table để chỉnh sửa được không .
các bạn có biết cách nào không cho người khác can thiệp vào table không , nếu minh chuyển file thanh MDE thì khi cần có cách nào phục hồi lại không.

 

[dongnamnb]

Bạn có thể cài pass cho cơ sở dữ liệu bằng cách vào menu Tools/Security/Set Database Password...
Tuy nhiên một số người am hiểu có thể phá password này rất dể dàng.
Sau khi hoàn thiện chương trình, bạn có thể viết một hàm không cho người sử dụng mở cửa sổ database bằng cách giữ phím shift khi mở file rồi chuyển thành file .mde là các bảo vệ table và code tương đối an toàn.

 

[ĐỖ SƠN HẢI]

Cảm ơn bạn Thanh Hà, có cách nào đứng tại form của file dữ liệu này cập nhật vào file dữ liệu khác có cài password không các bạn .
vd : Mình làm được trong trường hợp form cập nhật dữ liệu vào file khác với điều kiện file đó không có password như sau :

Dim DB1 As Database, RS1 As Recordset, MB1 As Variant, DB2 As Database
Dim ST1 As String, ST2 As String, N As Integer
Set DB1 = OpenDatabase("g:\chung\soquytienmat on Chung\SOQUY2007\tonghopquy.MDB")

Dim c03 As Recordset, c04 As Recordset
Set c03 = DB1.OpenRecordset("AUD-MAPHIEUTHUTIENMAT", dbOpenTable)
Set DB2 = CurrentDb
Set c04 = DB2.OpenRecordset("UC-MAPHIEUTHUTIENMAT", dbOpenTable)
c04.Index = "PRIMARYKEY"
If c03.RecordCount > 0 Then
c03.MoveFirst
Do Until c03.EOF
'On Error Resume Next
c04.Seek "=", c03!MAPHIEU
If c04.NoMatch Then
c04.AddNew
c04!MAPHIEU = c03!MAPHIEU
c04!madoanhthu = c03!madoanhthu
c04!DIENGIAI = c03!DIENGIAI
c04!NGAY = c03!NGAY
c04!TENKHACH = c03!TENKHACH
c04!PHANLOAI = c03!PHANLOAI
c04!SOTIEN = c03!SOTIEN
c04!diachi = c03!diachi

'On Error Resume Next
c04.UPDATE: c04.Bookmark = c04.LastModified
End If
c04.Edit
c04.UPDATE: c03.MoveNext
Loop
End If
c03.Close
c04.Close
DB1.Close
DB2.Close

các bạn có thể giúp mình chỉnh sửa đoạn code trên để : file UC-MAPHIEUTHUTIENMAT.mdb có thể cập nhật file cài password là
AUD-MAPHIEUTHUTIENMAT .mdb .

Mình thật sự cảm ơn nhiều