Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Giúp e tao nút sửa và lưu, e đã làm theo hướng dẫn trên 4r mà k được
#1
Ngâm cứu tan nát mà hok ra, khi nhấn nút thêm mới nhập dữ liệu vào các ô trên form xong bấm lưu thì nó sẽ kiểm tra số đến nếu trùng nó sẽ đưa ra câu hỏi có thay thế k, nếu nhấn có thì thay thế toàn bộ còn không thì quay lại cho sửa số đến (các ô trong sub form phải tự f5 số liệu khi có thay đổi hoặc khi click các nút lệnh).
Em gặp vướng thêm ở trường hợp về nút sửa, khi chọn dữ liệu cần sửa xong, nhấn nút sửa xong bấm lưu thì nó luôn hỏi trùng số đến, làm sao để khi nhấn nút sửa thì mình nhập các số liệu trên form xong (nếu có sửa số đến thì nó mới kiểm tra trùng) nhấn nút lưu nó sẽ cập nhật số liệu vào record đó
cái file của e đây:
http://www.4shared.com/rar/7WORoI-s/qlcv_3.html
Giúp em với, đa tạ, đa tạ.....
Chữ ký của audition Xin chào, mình là audition, Tham gia http://thuthuataccess.com/forum từ ngày 08-02 -12.
Reply
Những người đã cảm ơn
#2
Bạn cần cho form nào thế. Bạn trình bày rối quá, đọc hai ba lần mà không nắm được ý của bạn.

Việc kiểm tra trùng số, nếu bạn đã đặt khóa chính thì giao cho Access tự nó xử! Hơi đâu mắc công vậy
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
(15-02-12, 04:44 PM)audition Đã viết: Ngâm cứu tan nát mà hok ra, khi nhấn nút thêm mới nhập dữ liệu vào các ô trên form xong bấm lưu thì nó sẽ kiểm tra số đến nếu trùng nó sẽ đưa ra câu hỏi có thay thế k, nếu nhấn có thì thay thế toàn bộ còn không thì quay lại cho sửa số đến (các ô trong sub form phải tự f5 số liệu khi có thay đổi hoặc khi click các nút lệnh).
Em gặp vướng thêm ở trường hợp về nút sửa, khi chọn dữ liệu cần sửa xong, nhấn nút sửa xong bấm lưu thì nó luôn hỏi trùng số đến, làm sao để khi nhấn nút sửa thì mình nhập các số liệu trên form xong (nếu có sửa số đến thì nó mới kiểm tra trùng) nhấn nút lưu nó sẽ cập nhật số liệu vào record đó
cái file của e đây:
http://www.4shared.com/rar/7WORoI-s/qlcv_3.html
Giúp em với, đa tạ, đa tạ.....

file di die roi bạn, ban kiem tra lại sem

(15-02-12, 04:44 PM)audition Đã viết: Ngâm cứu tan nát mà hok ra, khi nhấn nút thêm mới nhập dữ liệu vào các ô trên form xong bấm lưu thì nó sẽ kiểm tra số đến nếu trùng nó sẽ đưa ra câu hỏi có thay thế k, nếu nhấn có thì thay thế toàn bộ còn không thì quay lại cho sửa số đến (các ô trong sub form phải tự f5 số liệu khi có thay đổi hoặc khi click các nút lệnh).
Em gặp vướng thêm ở trường hợp về nút sửa, khi chọn dữ liệu cần sửa xong, nhấn nút sửa xong bấm lưu thì nó luôn hỏi trùng số đến, làm sao để khi nhấn nút sửa thì mình nhập các số liệu trên form xong (nếu có sửa số đến thì nó mới kiểm tra trùng) nhấn nút lưu nó sẽ cập nhật số liệu vào record đó
cái file của e đây:
http://www.4shared.com/rar/7WORoI-s/qlcv_3.html
Giúp em với, đa tạ, đa tạ.....

cái này hay thật anh nhi? nhưng ko biết mổ xẻ ra xem ntn ca? hi`
Chữ ký của Greenlov3 Xin chào, mình là Greenlov3, Tham gia http://thuthuataccess.com/forum từ ngày 12-04 -12.
Reply
Những người đã cảm ơn
#4
(19-04-12, 12:34 PM)Greenlov3 Đã viết: cái này hay thật anh nhi? nhưng ko biết mổ xẻ ra xem ntn ca? hi`

Đây là nút Thêm

Mã PHP:
Private Sub cmdThem_Click()
    
Dim Khach As Recordset
    Set Khach 
CurrentDb.OpenRecordset("tblKhachHang"dbOpenTable)
    
Khach.Index "PrimaryKey"
    
Khach.Seek "="Me.MaKhach
    
If Not Khach.NoMatch Then 'Neu trung
        Anser = MsgBox("Ma khach da ton tai. Cap nhat(Yes) hay khong(No)", vbDefaultButton2 + vbQuestion + vbYesNo, "ThongBao")
        If Anser = vbNo Then '
Neu khong thay the
            Me
.MaKhach.SetFocus
        
Else 'Neu co thay the cac du lieu khac cua Ma Khach hien hanh, khong thay ma khach
            Khach.Bookmark = Khach.LastModified
            Khach.Edit
            Khach.Fields(1) = Me.TenKhach
            Khach.Fields(2) = Me.DiaChi
            Khach.Update
        End If
    Else '
Neu khong trung
        DoCmd
.RunCommand acCmdSaveRecord
    End 
If
End Sub 
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , haquocquan , autokiss


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] K biết là lỗi hay gì cần trợ giúp. nhocdevill11 2 68 08-12-16, 05:02 PM
Bài mới nhất: nhocdevill11
  [Help] Thiết kế form nhập và lưu trữ dữ liệu theo yêu cầu brianhuynh 16 627 20-10-16, 10:54 PM
Bài mới nhất: brianhuynh
  [Hỏi] Cách loại bỏ icon Filter trên Datasheet Form có nguồn là Query. toancvp 2 103 19-10-16, 08:53 PM
Bài mới nhất: toancvp
  [Lỗi] Không chạy được VBA Code hungthanmx 3 219 04-09-16, 03:48 PM
Bài mới nhất: Nguyen Hoang Diep
  [Lỗi] Không import được hết dữ liệu từ Excel và Access huedhcs 2 160 03-07-16, 11:27 PM
Bài mới nhất: zinzin8x

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ