debug версия вернула:filetxt.cpp line 166 assertionfail- но это, у меня, только из процедуры записи ошибки (в файл).Вообще выходит из программы после вывода "второго сообщения", собрана на XP вып. на 98 (не наоборот)try{ ////////////////////////////////////////////////////////////// strcpy(szSplashMsg,"Создание подключения"); // 3 ::SendMessage(pfrmS->m_hWnd, WM_COPYDATA, 0, (LPARAM) &cd); ::UpdateWindow(pfrmS->GetSafeHwnd()); ////////////////////////////////////////////////////////////// m_pConnection.CreateInstance( __uuidof( ADODB::Connection ) ); szCnt.Format( "Provider=Microsoft.Jet.OLEDB.4.0;" "Data Source=%s;" "Jet OLEDB:Database Password=%s;" "Persist Security Info=False", m_dbname, m_dbpwd); m_pConnection->CursorLocation = ADODB::adUseClient; m_pConnection->Open(_bstr_t(szCnt), _bstr_t(""), _bstr_t(""), ADODB::adOpenUnspecified); ////////////////////////////////////////////////////////////// strcpy(szSplashMsg,"Подключение таблицы 1"); // 4 ::SendMessage(pfrmS->m_hWnd, WM_COPYDATA, 0, (LPARAM) &cd); ::UpdateWindow(pfrmS->GetSafeHwnd()); ////////////////////////////////////////////////////////////// m_pRecordset1.CreateInstance( __uuidof ( ADODB::Recordset )); m_pRecordset1->put_ActiveConnection(_variant_t((IDispatch*)m_pConnection)); m_pRecordset1->CursorLocation = ADODB::adUseClient; m_pRecordset1->Open( "Таблица 1", _variant_t((IDispatch*)m_pConnection), ADODB::adOpenKeyset, ADODB::adLockOptimistic, ADODB::adCmdTable ); m_pRecordset2.CreateInstance( __uuidof ( ADODB::Recordset )); m_pRecordset2->put_ActiveConnection(_variant_t((IDispatch*)m_pConnection)); m_pRecordset2->CursorLocation = ADODB::adUseClient;