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
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
全站熱搜
留言列表