Access 2003 + vc6.0删除中出现的一个简单问题,还请各位高手帮忙
bool IsEmpty = true;
CString strSql = "select * from DefinitionD";
if (!Result.GetRecord(strSql))
{
return;
}//其中的Result.GetRecord(strSql)是程序中的一个类的一个函数
m_pRs = Result.GetRs();
while (!m_pRs->adoEOF)
{
IsEmpty = false;//保证数据不为空
break;
}
if (!IsEmpty)
{
m_pRs->MoveFirst();
while(m_pRs->adoEOF==VARIANT_FALSE)
{
m_pRs->Delete(adAffectCurrent);
m_pRs->Update();
m_pRs->MoveNext();
}
}
当数据库中只有一条记录的时候出现的错误提示:
RunTime Error
执行程序.exe
ABNormal Program Termination
当数据库中有多条记录的时候没有出错!