Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Append cả giá trị 0 vào table mới
#1
Tôi có dữ liệu như sau:
http://www.mediafire.com/download/67k8qq...CT_-_5.mdb
Có 2 vấn đề muốn các ace giúp đỡ.
1. Tôi có qryUPDATEXDLLThang dùng để tạo một table mới với các trường dữ liệu mới đã thành công. Nhưng đối với các giá trị 0 thì nó không cập nhập được. Vậy có thể dùng lệnh nào để thực hiện, mong các bạn chỉ giáo.
2. Nếu đã cập nhập được thì tôi muốn khi dữ liệu bị trùng thì nó sẽ không cho cập nhập.
Mong các ace giúp đỡ nhiều. Thanks.
Chữ ký của hueqlhc Hãy chia sẻ kinh nghiệm cùng mình trên ThuThuatAccess nhé! Chúc vui vẻ rose
ღღღღღTài sản của hueqlhc (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#2
1. Tôi thấy qryUPDATEXDLLThang của bạn là "Append query" chứ không phải là "Make query" nên không tạo mới table được. Việc bạn tạo mới 1 table với các trường có giá trị là 0 vẫn OK mà !
2. Nếu không muốn Update các giá trị trùng thì hãy dùng code đi nhé !
Mình lấy 1 ví dụ một sub Update như sau:
Mã:
Private sub Update()
    Dim rs As DAO.Recordset
    Dim db As DAO.Database
    Set db = CurrentDb()
    Set rs = db.OpenRecordset("TableName", dbOpenTable) 'TableName là tên Table của bạn cần Update.
    rs.Index = "Primarykey"
    rs.Seek "=", "Field" 'Field là tên trường tương ứng với trường bạn lập chỉ mục trong TableName của bạn. Nếu dùng trực tiếp trên Form bạn có thể thay "Field" bằng Me.TextboxName.Value
    If rs.NoMatch Then
        rs.AddNew
        rs!Field = "Field" 'Nếu sub bạn đặt trong form bạn có thể thay "Field" bằng Me.TextboxName.Value
        rs!Field1 = "Field1" 'Tương tự như trên.
        ...
        rs.Update
    End If
    rs.Close
    Set db = Nothing
End sub
Bạn hãy biến tấu cho ứng dụng của bạn nhé. Chúc bạn thành công !
Thân chào !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn Noname , hueqlhc
#3
(15-05-14, 03:32 PM)tmtien261 Đã viết: 1. Tôi thấy qryUPDATEXDLLThang của bạn là "Append query" chứ không phải là "Make query" nên không tạo mới table được. Việc bạn tạo mới 1 table với các trường có giá trị là 0 vẫn OK mà !
2. Nếu không muốn Update các giá trị trùng thì hãy dùng code đi nhé !
Mình lấy 1 ví dụ một sub Update như sau:
Mã:
Private sub Update()
    Dim rs As DAO.Recordset
    Dim db As DAO.Database
    Set db = CurrentDb()
    Set rs = db.OpenRecordset("TableName", dbOpenTable) 'TableName là tên Table của bạn cần Update.
    rs.Index = "Primarykey"
    rs.Seek "=", "Field" 'Field là tên trường tương ứng với trường bạn lập chỉ mục trong TableName của bạn. Nếu dùng trực tiếp trên Form bạn có thể thay "Field" bằng Me.TextboxName.Value
    If rs.NoMatch Then
        rs.AddNew
        rs!Field = "Field" 'Nếu sub bạn đặt trong form bạn có thể thay "Field" bằng Me.TextboxName.Value
        rs!Field1 = "Field1" 'Tương tự như trên.
        ...
        rs.Update
    End If
    rs.Close
    Set db = Nothing
End sub
Bạn hãy biến tấu cho ứng dụng của bạn nhé. Chúc bạn thành công !
Thân chào !

Vấn đề 1 có lẽ do mình đặt câu hỏi chưa kỹ nên bạn hiểu nhầm. Ý mình là mặc dù các đơn vị khác không có dữ liệu nhưng khi thực hiện query qryUPDATETHANG thì nó vẫn xuất hiện các trường với giá trị bằng 0.
Vấn đề 2 thì mình vẫn đang biến tấu theo như bạn đã chỉ.
Thanks. Mong các bạn hồi âm sớm.
Chữ ký của hueqlhc Hãy chia sẻ kinh nghiệm cùng mình trên ThuThuatAccess nhé! Chúc vui vẻ rose
ღღღღღTài sản của hueqlhc (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
Xin lỗi "hueqlhc", mình vẫn chưa hiểu hết ý của bạn. Bạn hãy nói rõ hơn tí nhé ! Có thể cho VD càng tốt, khi đó các Pro sẽ giúp bạn.
Thân chào !
Chữ ký của Minh Tiên -----------------------------------------------
Đường tuy ngắn, không đi không đến
Việc tuy nhỏ, không làm không nên.
                                           Tuân Tử
-----------------------------------------------
Reply
Những người đã cảm ơn hueqlhc


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  LỌC GIÁ TRỊ DUY NHẤT thanh872 1 120 27-10-16, 11:46 PM
Bài mới nhất: maidinhdan
  Hướng Dẫn Cách tạo Query để cập nhật lại thời gian trong table. ngokimhang33 9 378 28-09-16, 10:36 AM
Bài mới nhất: lamvankhanh
  [Help] Tính tổng theo điều kiện các trường trong nhiều table,đưa ra kết quả bignosevinatex 6 753 06-09-16, 10:56 PM
Bài mới nhất: maidinhdan
  Cách huỷ bỏ các thông báo của append query. quanghoasla 10 2,133 11-08-16, 02:00 PM
Bài mới nhất: toancvp
  So sánh 02 table/Query khoidong 14 635 05-07-16, 10:12 PM
Bài mới nhất: maidinhdan

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ơ