Set rs1 = New ADODB.Recordset
rs1.Fields.Append "a", 10, 20
rs1.Fields.Append "b", 10, 20
rs1.Fields.Append "c", 10, 20
rs1.Fields.Append "d", 10, 20
ff = Array("a", "b", "c", "d")
vv = Array("aaaa", "bbbb", "cccc", "dddd")
rs1.Open
rs1.AddNew ff, vv
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(2) 人氣()