使用ado，如何删除所有的记录？

Question

strsql="select * from vio";
p.CreateInstance("ADODB.Recordset");
try
{
    p->Open((_variant_t)strsql,_variant_t((IDispatch *)_pConOracle),true),adOpenStatic,adLockPessimistic,adCmdText);
}
catch (_com_error e)
{
}p->MoveFirst();
short a=3;
_variant_t t(a);
p->_pROracle->Filter=t;
p->_pROracle->Delete(adAffectGroup);
a=0;
_variant_t b(a);
p->_pROracle->Filter=b;
为什么只能删除一条记录，问题出在哪里？该如何修改？

Answer 1

p->_pROracle->Filter=t;
//
p->UpDate();试试：）
//
p->_pROracle->Delete(adAffectGroup);

Answer 2

先delete table,然后再create table,这样就很快了。哈。

Answer 3

flyingjust(just)不好意思，根本就不能执行update

Answer 4

p->_pROracle->Delete(adAffectAll);

Answer 5

Earthdog(Earthdog) adAffectAll这个参数不能使用

Answer 6

已经解决了，使用的批更新模式一条条删除，updatebatch