哪位高手能帮小弟分析一下啊，要求有流程图及作用，小弟叩谢啦！

[llxtjf]

struct InitOle
{
InitOle() { ::CoInitialize(NULL); }
~InitOle() { ::CoUninitialize(); }
} _init_InitOle_;

long mSqlCode;
BOOL CHmbAdoDB::Open(LPCSTR lpszConnect)
{
try
{
CREATEiNSTANCE(m_DbConn,Connection);
m_DbConn->Open(lpszConnect,"", "", adModeUnknown );
}
catch( _com_error &e)
{
return FALSE;
}
catch(...)
{
return FALSE;
}
return TRUE;
}

void CHmbAdoDB::Close()
{
if( IsOpen() )
{
m_DbConn->Close();
}
}

long CHmbAdoDB::BeginTrans()
{
return m_DbConn->BeginTrans();
}

void CHmbAdoDB::CommitTrans()
{
m_DbConn->CommitTrans();
}

void CHmbAdoDB::RollbackTrans()
{
m_DbConn->RollbackTrans();
}

void CHmbAdoDB::Cancel()
{
m_DbConn->Cancel();
}

BOOL CHmbAdoDB::IsOpen()
{
return ( (m_DbConn->GetState() != 0) ? TRUE : FALSE );
}

BOOL CHmbAdoDB::Execute(LPCTSTR lpSQL)
{
if (!IsOpen())
{
AfxMessageBox("Network error, Database do not open.");
return FALSE;
}

CString strSQL(lpSQL);
strSQL.TrimLeft();
strSQL.TrimRight();

try
{
m_DbConn->Execute(_bstr_t(strSQL), NULL, adExecuteNoRecords);
}
catch( _com_error &e)
{
return FALSE;
}
catch(...)
{
return FALSE;
}

return TRUE;
}

void CHmbAdoDB::ProviderError()
{
// Print Provider Errors from Connection object.
// pErr is a record object in the Connection's Error collection.
ErrorPtr pErr = NULL;

if( (m_DbConn->Errors->Count) > 0)
{
long nCount = m_DbConn->Errors->Count;

// Collection ranges from 0 to nCount -1.
for(long i = 0; i < nCount; i++)
{
pErr = m_DbConn->Errors->GetItem(i);
mSqlCode = pErr->NativeError;
m_ErrMsg.Format("SQLCODE : %ld\t%s",mSqlCode, LPCTSTR(pErr->Description));
m_SQLState.Format("%s",(char*)pErr->SQLState);
printf("%s // %s\n",m_SQLState,m_ErrMsg);
}
}
m_DbConn->Errors->Clear();
}

CHmbAdoDBRs::CHmbAdoDBRs( )
{
}

CHmbAdoDBRs::~CHmbAdoDBRs()
{

}

BOOL CHmbAdoDBRs::Open( CHmbAdoDB *pDB, LPCSTR szSource,long option )
{
CString strSQL;
strSQL = CString(szSource);
strSQL.TrimLeft();
strSQL.TrimRight();
_variant_t vRecsAffected(0L);
// CREATEiNSTANCE( m_Rs,Recordset) ;
// m_Rs->PutRefActiveConnection( pDB->m_DbConn );
try
{
m_Rs = pDB->m_DbConn->Execute(_bstr_t(strSQL),
&vRecsAffected,
adOptionUnspecified);
m_Rs->AddRef();
// m_Rs->Open(szSource, vtMissing, adOpenKeyset, adLockBatchOptimistic, adOptionUnspecified);
// m_Rs->Open(szSource, vtMissing, adOpenKeyset, adLockReadOnly, option);
// m_Rs->Open(szSource,pDB->m_DbConn.GetInterfacePtr(),adOpenDynamic,adLockOptimistic, adCmdText);

}
catch( _com_error &e)
{
//ErrorMessage();
m_Rs->Close();
m_Rs->Release();
return FALSE;
}
catch(...)
{
m_Rs->Close();
m_Rs->Release();
return FALSE;
}
return TRUE;
}

void CHmbAdoDBRs::Close()
{
m_Rs->Close();
m_Rs->Release();
}
void CHmbAdoDBRs::GetRs(_variant_t x,_bstr_t &ret)
{
ret = (m_Rs->Fields->Item[x]->Value);
}

void CHmbAdoDBRs::GetRs(_variant_t x,CString &ret)
{
_bstr_t retVal;

try{
retVal = (m_Rs->Fields->Item[x]->Value);
}
catch(...){

ret = "";
return;
}

ret = CString((char*) retVal);
}


BOOL CHmbAdoDBRs::IsEOF()
{
return m_Rs->adoEOF;
}

BOOL CHmbAdoDBRs::IsOpen()
{
return ( (m_Rs->GetState() != 0) ? TRUE : FALSE );
}

BOOL CHmbAdoDBRs::MoveNext() { return (FAILED(m_Rs->MoveNext()) ? FALSE : TRUE ); }
BOOL CHmbAdoDBRs::MovePrev() { return (FAILED(m_Rs->MovePrevious()) ? FALSE : TRUE ); }
BOOL CHmbAdoDBRs::MoveFirst() { return (FAILED(m_Rs->MoveFirst()) ? FALSE : TRUE ) ; }
BOOL CHmbAdoDBRs::MoveLast() { return (FAILED(m_Rs->MoveLast()) ? FALSE : TRUE ) ; }

[doway]

逃

[希望之晨]

一些数据库的操作，应该不难。不过没接触过，帮你顶下。