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

Kiểm tra sự tồn tại của Fields trong table

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư viện thủ thuật
  • Kiểm tra sự tồn tại của Fields trong table
• Kiểm tra sự tồn tại của Fields trong table

• Kiểm tra sự tồn tại của Fields trong table

  Noname > 26-08-10, 08:27 PM

  Hỏi : tôi có 1 table là: tblHOSO; tôi muốn dùng code để kiểm tra xem trong tblHOSO có field KIEMTRA không?
  
  
  Đáp: Bạn chép Function sau:
  
  

  Mã:

  Function DoesFieldExist (tableName As String, fieldName As String) As Boolean
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim i As Integer

Set db = CurrentDb
Set tdf = db.TableDefs(tableName)

For i = 0 To tdf.Fields.Count - 1

If fieldName = tdf.Fields(i).Name Then
DoesFieldExist = True
Exit Function
End If
Next
End Function

  Giờ bạn có thể gọi
  
  

  Mã:

  If DoesFieldExist("tblHoso","KiemTra") then
Msgbox " Co Field ton tai trong table"
Else
Msgbox " khong co field ton tai trong table"
End If

  Theo Spammail-KHPT.net
• Bài trước Bài tiếp