-
Cần Giúp Đỡ Về Lỗi 2105 Của access :((:((
tieutri912 > 01-06-12, 09:27 AM
Hk bít bị sao mà code e viết cho nút Lưu bị lỗi hoài hjc bác nào biết cách khắc phục giúp e vs
e mới học access hk rành lắm
Mã:Private Sub Command12_Click()
If MsgBox("Ban chac chan muon luu mau tin ?", vbQuestion + vbYesNo, "Save Record?") = vbNo Then
DoCmd.RunCommand acCmdUndo
Else
[color=#FFD700]DoCmd.GoToRecord , , acNewRec[/color]
DoCmd.OpenQuery "TONG_TIEN", acViewNormal, acEdit
End If
sai dòng DoCmd.GoToRecord , , acNewRec
e tô màu chứ hk faj~ code trong vba
-
RE: Cần Giúp Đỡ Về Lỗi 2105 Của access :((:((
Noname > 01-06-12, 09:36 AM
Bạn post bài của bạn lên mọi người xem thử! Nhìn code vầy thì khó biết lắm! Có vẻ như là ổn trừ trường hợp record source của form có vấn đề! -
RE: Cần Giúp Đỡ Về Lỗi 2105 Của access :((:((
tieutri912 > 01-06-12, 09:57 AM
hjx e cũng hk rành lắm 3 cái zụ đó
hay a có code nút Lưu nào khác cái ở trên hk e xem thữ còn báo lỗi nữa hk
-
RE: Cần Giúp Đỡ Về Lỗi 2105 Của access :((:((
Noname > 01-06-12, 06:20 PM
bạn thử lại thế này
Mã:Private Sub Command12_Click()
If MsgBox("Ban chac chan muon luu mau tin ?", vbQuestion + vbYesNo, "Save Record?") = vbNo Then
DoCmd.RunCommand acCmdUndo
Else
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.OpenQuery "TONG_TIEN", acViewNormal, acEdit
End If