file co 585Kb thì làm gì có dữ liệu đâu bạn
xoá hết rồi bạn ạ
rất tiếc
Hổng biết bạn định xem cái gì?Tôi có file mdb (đình kèm) dữ liệu để chạy một chương trình quản lý nhân sự. Nhưng khi mở lên hoàn toàn không thấy gì cả. Xin các bạn giúp đỡ. Cám ơn nhiều.
Option Compare Database
Option Explicit
Dim Test As Byte
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Dim intAltDown As Integer
Dim intCtrlDown As Integer
Dim dbs As Database
If KeyCode = vbKeyF12 Then
SendKeys "{TAB}{TAB}{TAB}{ENTER}{ENTER}", False
Exit Sub
End If
intAltDown = (Shift And acAltMask) > 0
intCtrlDown = (Shift And acCtrlMask) > 0
If KeyCode = vbKeyD Then
If intAltDown Then
If intCtrlDown Then
Set dbs = Application.CurrentDb
dbs.Properties("AllowBypassKey") = True
dbs.Properties("AllowBreakIntoCode") = True
dbs.Close
Set dbs = Nothing
Test = 1
End If
End If
End If
End Sub
Private Sub Form_Load()
Test = 0
Application.SetOption "Show Hidden objects", False
Application.SetOption "Four-Digit Year Formatting All Databases", True
Application.SetOption "Auto Compact", True
On Error Resume Next
Application.References.AddFromFile "D:\HoiDong\Dao360.dll"
End Sub
Bạn mở file, vào Tools, chọn option, chọn View, click chọn cái check Hidden objects nhấn OK thì bạn sẽ thấy.Tôi có file mdb (đình kèm) dữ liệu để chạy một chương trình quản lý nhân sự. Nhưng khi mở lên hoàn toàn không thấy gì cả. Xin các bạn giúp đỡ. Cám ơn nhiều.
e có file .mde có cách nào chỉnh sửa được frorms không các bác
có cách nào không bác:Chắc chăn là không vì file mde đã được biên dịch ra mã máy nên Form, Report, Modul không thể chỉnh sửa.