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

Dùng Array để AddNew một Recordset

• Trang chủ

  • Thủ Thuật Access
  • Access Nâng Cao
  • Thư viện thủ thuật
  • [Thủ Thuật] Dùng Array để AddNew một Recordset
• Dùng Array để AddNew một Recordset

• Dùng Array để AddNew một Recordset

  Xuân Thanh > 08-12-12, 10:04 AM

  Thông thương chúng ta hay dùng cách sau để AddNew một Recordset
  

  Mã PHP:

  Public Sub AddNew()
  Dim DB As Database
  Dim rs As Recordset
  Set DB = CurrentDB
  Set rs = DB.OpenRecordset("tblCompany", dbOpenTable)
  With rs
     .AddNew
     !CompanyName = "A"
     !Address = "B"
     !City = "C"
     .Update
  End With
  rs.Close: Set DB = Nothing
End Sub 


  
  Ta cũng có thể dùng Array như sau :
  
  

  Mã PHP:

  Public Sub AddNewArray()
  Dim DB As Database
  Dim rs As Recordset
  Set DB = CurrentDB
  Set rs = DB.OpenRecordset("tblCompany", dbOpenTable)    
  varfields = Array("CompanyName", "Address", "City")
  varValues = Array("A", "B", "C")
  rs.AddNew varfields, varValues
  rs.Update
  rs.Close: Set DB = Nothing
End Sub 


  
  Thân mến
• Bài trước Bài tiếp