Nhập mới form chưa có dữ liệu bị báo lỗi
hoat > 13-04-23, 03:59 PM
Chào anh chị em, mình có tạo 1 form nhập liệu, có nút nhập mới. Nếu trên table đã có 1 dòng dữ liệu thì khi bấm nút nhập mới không bị báo lỗi và form nhập liệu được. Nếu trên Table mới chưa có dữ liệu thị hiện bảng báo lỗi:
Run-time error '2105'
You can't go to the specified record
bấm Debug thì báo ở dòng: DoCmd.GoToRecord , , acNewRec
code của mình:
Private Sub cmdNhapMoi_Click()
Dim soao
LSTDanhsachdutruCPDA.Requery
sangmo False
cmdCapnhat.Enabled = False
cmdXoa.Enabled = False
LSTDanhsachdutruCPDA.Enabled = False
txtNam.Enabled = False
txtSTT.Enabled = False
txtNVnhap.Enabled = False
txtNVsua.Enabled = False
txtSotiencanthanhtoanNT.Enabled = False
txtSotiencanthanhtoanVND.Enabled = False
txtNgaysua.Enabled = False
txtNgaynhap.Enabled = False
txtMaduan.SetFocus
DoCmd.GoToRecord , , acNewRec
soao = Nz(DMax("[STT]", "T_Dutrutaichinh"))
txtSTT = Format(soao + 1, "#")
txtNgaynhap = Date
txtNgayPO = Date
txtNVnhap = TempVars!UserName
txtNam = Year(txtNgaynhap)
End Sub
nhờ anh chị em xem và hướng dẫn cách khăc phục
Trân trọng