• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

V/v Cách tạo phiếu xuất thứ tự theo từng ngày

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Thành viên giúp nhau
  • V/v Cách tạo phiếu xuất thứ tự theo từng ngày
• V/v Cách tạo phiếu xuất thứ tự theo từng ngày

• V/v Cách tạo phiếu xuất thứ tự theo từng ngày

  vuga > 04-01-17, 11:56 AM

  Hi Anh Chị, Kính nhờ Anh Chị hỗ trợ cho em. e có bảng table là T_phieuXuat(id,NgayXuat,TenPhieuXuat,Số_TT)
  
  e muốn lấy số lớn nhất trong từng ngày xuất của số Thứ tự. nếu chưa có thì sẽ là 00001
  ngc lại nếu có thì cộng dồn theo điều kiện trong ngày hiện tại.
  
  e viết hoài mà nó báo lỗi so = DMax("So_TT", "T_phieuXuat", "date(NgayXuat)= Date()")
  kính mong Anh Chị chỉ giáo. Trân trọng cảm ơn. 
  
  Đoạn code đính kèm:
  Private Sub btn_TaoPX_Click()
  Dim so
  so = DMax("So_TT", "T_phieuXuat", "date(NgayXuat)= Date()")
  If Nz(so, 0) = 0 Then
      So_TT = "00001"
  Else
      So_TT = Right("00000" & CLng(so) + 1, 5)
  End If
  MsgBox (So_TT)
  Me.txtTenPhieuXuat.Value = CStr(Year(Me.txtNgayXuat.Value)) & CStr(Month(Me.txtNgayXuat.Value)) & CStr(Day(Me.txtNgayXuat.Value)) & "_PX_" & CStr(So_TT)
  End Sub

• RE: V/v Cách tạo phiếu xuất thứ tự theo từng ngày

  maidinhdan > 04-01-17, 06:38 PM

  (04-01-17, 11:56 AM)vuga Đã viết: e viết hoài mà nó báo lỗi so = DMax("So_TT", "T_phieuXuat", "date(NgayXuat)= Date()")
  Đoạn code đính kèm:
  Dim so
  so = DMax("So_TT", "T_phieuXuat", "date(NgayXuat)= Date()")

  
  * Bạn chỉnh thử như thế này
  

  Mã PHP:

  so = DMax("So_TT", "T_phieuXuat", "[NgayXuat]='" & Date() & "'") 


  
  * Ngoài ra tôi đính thêm Demo cho bạn cách tạo thêm Số TT có ghép với chuỗi bất kỳ
  Chú ý cái xem cái query và hàm lấy Số thứ tự
  
  Thân mến!
• Bài trước Bài tiếp