Chủ đề: Help: linktable bi loi code VBA
-
09-07-2013, 07:20 AM #1Member
- Ngày tham gia
- Oct 2015
- Bài viết
- 97
Help: linktable bi loi code VBA
Private Sub tenthuoc_AfterUpdate()
If IsNull(tenthuoc) Then
MsgBox "Chöa nhaäp teân thuoác ", , "Chu y"
Exit Sub
End If
tenthuoc = StrConv(NGHIEMTRANG(tenthuoc, 0), 3)
Mathuoc = Trim(tenthuoc & "-" & Hamlg & "-" & dongia & "-" & nhom)
Dim Rdmt As Recordset
Set Rdmt = CurrentDb.OpenRecordset("dmthuoc", dbOpenDynaset)
Rdmt.Index = "PrimaryKey"
Rdmt.Seek "=", Mathuoc
If Not Rdmt.NoMatch Then
MsgBox "Thuoác naøy ñaõ coù roài , xin nhaäp teân khaùc", , "Chuù yù"
DoCmd.RunCommand acCmdUndo
End If
End SubView more random threads:
- Hỏi xuất dữ liệu Access sang Excel để in!
- Hàm tính số ngày trong tháng
- Query khó đây thử sức nha
- Giúp đở về listbox và textbox . help !
- Hàm DSum() với 2 điều kiện chuỗi số và chữ
- Cho mình hỏi về Access 2007 Runtime ?
- Help! Tự động ẩn dòng khi giá trị bằng 0 trong
- Xin giúp em về listview
- Sử dụng hàm xây dựng như thế nào?
- Tạo key bản quyền cho access
-
09-09-2013, 10:01 PM #2Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Help: linktable bi loi code VBA
Bạn vui lòng xem lại khóa chính "PrimaryKey" vì đã trùng lấp khóa chính .
Giá thu hẹp vùng kín và thu hẹp vùng kín ở đâu tốt nhất Đà Nẵng? Đây là chủ đề được rất nhiều chị em quan tâm, trong quá trình tìm hiểu để làm đẹp vùng tam giác nhớ thương của mình. Hãy cùng tìm hiểu...
Giá Thu Hẹp Vùng Kín và Thu Hẹp Vùng Kín Ở Đâu Tốt Nhất Đà Nẵng