ongke0711 > 04-09-16, 09:39 AM
thanlaem > 04-09-16, 10:39 AM
(04-09-16, 09:39 AM)ongke0711 Đã viết: Bạn up file lên đi. Xem cho nhanh.https://drive.google.com/open?id=0B9pE23...TBFQ2VRRzQ
ongke0711 > 04-09-16, 12:27 PM
thanlaem > 04-09-16, 01:16 PM
ongke0711 > 04-09-16, 03:43 PM
thanlaem > 05-09-16, 03:32 PM
(04-09-16, 03:43 PM)ongke0711 Đã viết: Bạn đã biết mã lỗi là 3022 thì bẫy lỗi cho nó luôn ở nút GHI
-------------------------------
On Error GoTo ErrTrap
If IsNull(MaXang) = True Then
MsgBox ("Ma xang khong dc de trong")
ElseIf IsNull(MaXe) = True Then
MsgBox ("Ma xe khong dc de trong")
ElseIf IsNull(NgayCap) = True Then
MsgBox ("Ngay cap ko dc de trong")
ElseIf IsNull(Lit) = True Then
MsgBox ("So lit khong dc de trong")
Else
DoCmd.RunCommand acCmdSaveRecord
Command8.Enabled = True
Command17.Enabled = False
Command15.Enabled = True
Command14.Enabled = True
Command16.Enabled = False
DoCmd.RunCommand acCmdRefresh
End If
ErrTrap:
If Err.Number = 3022 Then
MsgBox "Da co roi"
Else
MsgBox Err.Description
End If
On Error Resume Next
Me.Undo
--------------------------------------------------
ongke0711 > 05-09-16, 04:04 PM
thanlaem > 05-09-16, 06:43 PM
(05-09-16, 04:04 PM)ongke0711 Đã viết: Bạn xem file: http://www.mediafire.com/download/owb220...d/QL.accdb
Bạn thao tác nhập liệu như thế nào mà ko bắt được lỗi?
thanlaem > 05-09-16, 07:29 PM
ongke0711 > 05-09-16, 10:21 PM