• Cần Giúp Đỡ Về Lỗi 2105 Của access :((:((
  • 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 Cry_smile
    e mới học access hk rành lắm 47_47
    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 47_47
  • 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ụ đó 47_47
    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 Cry_smile
  • 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