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

Kiểm tra Table trống

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thủ thuật VBA
  • Kiểm tra Table trống
• Kiểm tra Table trống

• Kiểm tra Table trống

  trav2t > 01-08-13, 01:47 AM

  Mình kiểm tra Table trống (không có dữ liệu) hay đã có dữ liệu bằng code sau, nhưng mà không được. Nhờ anh em giúp với. Xin chân thành cảm ơn.
  
  

  Mã PHP:

  Dim rs As Recordset
Set rs= CurrentDb.OpenRecordset("tblName", dbOpenDynaset)
If IsNull(rs) Then
  MsgBox "Table không có dữ liệu.", vbInformation, "Thong bao!"
Else
  MsgBox "Table đã có dữ liệu.", vbInformation, "Thong bao!"
End If 


• RE: Kiểm tra Table trống

  Xuân Thanh > 01-08-13, 06:50 AM

  Mã PHP:

  Dim rs As Recordset
Set rs= CurrentDb.OpenRecordset("tblName", dbOpenTable)
If rs.Recordcound > 0 Then
  MsgBox "Table da có dữ liệu.", vbInformation, "Thong bao!"
Else
  MsgBox "Table khong có dữ liệu.", vbInformation, "Thong bao!"
End If 


• RE: Kiểm tra Table trống

  trav2t > 01-08-13, 11:00 AM

  (01-08-13, 06:50 AM)Xuân Thanh Đã viết:

  Mã PHP:

  Dim rs As Recordset
Set rs= CurrentDb.OpenRecordset("tblName", dbOpenTable)
If rs.Recordcound > 0 Then
  MsgBox "Table da có dữ liệu.", vbInformation, "Thong bao!"
Else
  MsgBox "Table khong có dữ liệu.", vbInformation, "Thong bao!"
End If 


  
  Cảm ơn Xuân Thanh rất nhiều, rất nhiều và rất nhiều.
• Bài trước Bài tiếp