|
#2
leo_li2004-04-26 13:48
|
this->_OraDset->MoveFirst();
for(int j=0;j<_RecCount;j++)
{
//字段值
VARIANT FldValue;
::VariantInit(&FldValue);
CString Value;
for(long k=0;k<g_FldCount-1;k++)
{
//得到当前记录位置的字段集
Fields=this->_OraDset->GetFields();
Field=Fields->GetItem(k);
FldValue=Field->GetValue();
//得到并转换字段值
if(FldValue.vt ==VT_NULL)
Value="";
else
{
FldValue.vt = VT_BSTR;
Value = FldValue.bstrVal;
}
//更新字段值。？？？无法执行了，voilation错误提示
Field->PutValue(Value);
}
//如果到了记录的最后则退出循环
if(!this->_OraDset->GetBOF())
{
this->_OraDset->MoveNext();
continue;
}
else
{
break;
}
}