Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim rs2 As New ADODB.Recordset
cn.Open strConnection
rs.Open "select a1,a2,a3,a4,a5 from a", cn
set rs2=rs
然後對rs2中的某些字段進行篩選分組。
另我不想重新查數據庫。
Dim rs As New ADODB.Recordset
Dim rs2 As New ADODB.Recordset
cn.Open strConnection
rs.Open "select a1,a2,a3,a4,a5 from a", cn
set rs2=rs
然後對rs2中的某些字段進行篩選分組。
另我不想重新查數據庫。
这个方法好啊!用查询的结果作为下次使用的表,好!我喜欢!