Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Code số thứ tự tăng theo điều kiện
#1
Nhờ mọi người giúp đở mình với
Mình có một code tìm trên thuthataccess như bên dưới, mình muốn sang năm mới thì mới reset lại 1thì sửa code như thế nào, giúp mình với. (bây giờ cứ sang 1 ngày thì nó lại reset lại 1)[/code]
Mã:
Private Sub Form_Current()
'kiêÒm tra sôì thýì týò, nêìu Null thiÌ ðây laÌ record mõìi
If IsNull(Me.STT) Then
STT.Value = SoTT
End If
End Sub

Function SoTT() As String
Dim so As Integer
so = Nz(DMax("[Couter]", "BangChi", "[Date]= date()"))
Couter.Value = so + 1
SoTT = Date & "-" & Format(Couter, "000")
End Function
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#2
Mã PHP:
Function SoTT() As String
Dim so 
As Integer
so 
DMax("[Couter]""BangChi""Year(Ngaylamviec) = " Year(Date()))
If 
Nz(so0) = 0 Then
Couter
.Value so 1
Else
SoTT Date "-" Format(Couter"000")
End If
End Function 

Chưa test, bạn thử xem sao.

Hoặc cần tham khảo bài này: Số TT tự động Reset mỗi năm, có cả demo

http://thuthuataccess.com/forum/thread-1...l#pid25032
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thanhtruong


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Function] Code Xếp hạng tranthanhan1962 4 889 23-07-15, 12:25 AM
Bài mới nhất: maidinhdan
  Hướng Dẫn Demo Code Xếp hạng trong Query giống như hàm Rank trong Excel maidinhdan 0 1,182 02-03-15, 01:01 AM
Bài mới nhất: maidinhdan
  Tùy biến gọi hàm theo giá trị Noname 1 1,488 25-04-11, 02:36 PM
Bài mới nhất: Noname

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ơ