Chào mừng đến với Diễn đàn Dân Kế Toán - Kế toán tổng hợp thực tế.
Kết quả 1 đến 4 của 4
  1. #1
    Ngày tham gia
    Aug 2015
    Bài viết
    0

    Hiện nội dung từng lỗi theo bảng (table) ta dựng sẵn.

    Em có rắc rối mong được anh chị chỉ bảo.

    Em có 1table, tên tblEr, tại đây em có 2 cột, STT (là Primary key), NoiDung.

    + Tại cột STT: là ký hiệu các lỗi do em tự đặt từ 1 đến vô cùng...
    + Tại cột NoiDung: Là nội dung các lỗi có ký hiệu tại cột STT

    Giờ em tạo 1 form và bẫy lỗi, nếu một lỗi nào đó có số = STT tại tblEr thì hiện NoiDung lên, còn không thì hiện nội dung của Access.

    Em xin cảm ơn anh, chị !

  2. #2
    Ngày tham gia
    Nov 2015
    Bài viết
    3
    Ðề: Hiện nội dung từng lỗi theo bảng (table) ta dựng sẵn.




    Trích dẫn Gửi bởi dtngoc
    Em có rắc rối mong được anh chị chỉ bảo.

    Em có 1table, tên tblEr, tại đây em có 2 cột, STT (là Primary key), NoiDung.

    + Tại cột STT: là ký hiệu các lỗi do em tự đặt từ 1 đến vô cùng...
    + Tại cột NoiDung: Là nội dung các lỗi có ký hiệu tại cột STT

    Giờ em tạo 1 form và bẫy lỗi, nếu một lỗi nào đó có số = STT tại tblEr thì hiện NoiDung lên, còn không thì hiện nội dung của Access.

    Em xin cảm ơn anh, chị !
    Access có cả một "rừng" chỉ số lỗi. Bạn có thể tham khảo chúng mà đặt vào bảng của mình. Chứ bạn "chế" chỉ số lỗi thì lấy gì mà bắt?

    Bạn vào Help của Access, tìm Error Trapping mà xem.

  3. #3
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Ðề: Hiện nội dung từng lỗi theo bảng (table) ta dựng sẵn.




    Trích dẫn Gửi bởi phatnq2002
    Access có cả một "rừng" chỉ số lỗi. Bạn có thể tham khảo chúng mà đặt vào bảng của mình. Chứ bạn "chế" chỉ số lỗi thì lấy gì mà bắt?

    Bạn vào Help của Access, tìm Error Trapping mà xem.
    CÓ vẻ như ý bạn dtngoc là dịch sẵn 1 số lỗi sang tiếng Việt, như thế gặp lỗi là đã dịch rồi thì hiện tiếng Việt, còn gặp lỗi lạ thì cho hiện y sì tiếng Anh.

    Như vậy trong cột STT đã chứa sẵn 1 số mã lỗi và cột ND chứa sẵn các thông báo bằng tiếng Việt.

    Ở phía đầu chương trình dĩ nhiên là:

    On Error GoTo Err_VN

    và ở cuối là

    Err_VN:
    Dim thongbao as string
    thongbao = timNDtiengVN(Err.Number)

    IF thongbao = ""
    MsgBox Err.Description
    Else
    MsgBox thongbao
    End If


    Dĩ nhiên là phải viết 1 cái function timNDtiengVN() để dò tìm theo mã lỗi và trả về thông báo lỗi, nếu không tìm thấy thì trả về "".

  4. #4
    Ngày tham gia
    Aug 2015
    Bài viết
    0
    Ðề: Hiện nội dung từng lỗi theo bảng (table) ta dựng sẵn.

    Và đây là bảng mã lỗi được dịch bằng Google:

    View attachment db3.rar

    . Nhiều lỗi dịch chưa được chuẩn, chưa đúng về mặt kỹ thuật. Bạn tinh chỉnh lại để được bảng mã như ý nhé.

 

 

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
  •