Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Thủ Thuật] Dùng Array để AddNew một Recordset
#1
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
.CloseSet 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 varfieldsvarValues
  rs
.Update
  rs
.CloseSet DB Nothing
End Sub 

Thân mến
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn Noname , Minh Tiên


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Hàm đọc số dùng mã Unicode trong Access Noname 28 11,705 23-03-16, 11:45 PM
Bài mới nhất: thiennamlong
  [Thủ Thuật] Hỏi_Xác định phiên bản Access đang dùng maidinhdan 1 380 18-12-15, 08:43 AM
Bài mới nhất: ongke0711
  [Thủ Thuật] 25 thủ thuật sử dụng Combobox, ListBox, Option group (Sưu tầm) ongke0711 0 562 03-12-15, 05:06 PM
Bài mới nhất: ongke0711
  Xây dựng đồng hồ đếm ngược Noname 7 4,270 17-03-15, 04:57 PM
Bài mới nhất: ledungddk001
  [Hàm] Hàm tạo Mã (dùng cho Học Sinh, Sinh Viên, Cán Bộ, Hộ Khẩu....) Xuân Thanh 17 4,415 04-11-14, 12:25 AM
Bài mới nhất: tranthanhan1962

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ơ