如下,在连接数据库,打开记录集之后,我要解决如下难题。
'连接数据库 Set adoCon = New ADODB.Connection adoCon.CursorLocation = adUseClient adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "d:\huitu\quyu.mdb" '打开记录集 Set adoRs = New Recordset adoRs.Open "diyu", adoCon, adOpenDynamic, adLockOptimistic (1)对表"DIYU"的记录按AA="KLK"的条件进行筛选。对筛选后的记录进行读写操作。
(2)将表"DIYU"复制为“SSS",然后对“SSS”表进行读写操作。
我是一名初学者,加之手头资料有限,请各位大侠将具体代码写上,谢谢了。 |