wrkODBC = dbe0.CreateWorkspace("NewODBCWorkspace", "nobody", "",  1 );// dbUseODBC);
	Try //падает, ссука, без обработок ошибок.

Function TestADO( strADO)  //As ADODB.Connection
Перем  СоединениеSQL;
Перем  ЗаписиSQL;

	//пытаемся СНАЧАЛА закрыть, поскольку 1С безбожно бажит при явно незакрытом ADODB.Connection
	//предыдущей сессии
	//у  СоединениеSQL СРАЗУ же появляется строка подключения
	СоединениеSQL = Новый ComObject("ADODB.Connection");
	ЗаписиSQL = Новый ComObject("ADODB.RecordSet");
        TRY		
		ЗаписиSQL.Close();
		ЗаписиSQL =  неопределено;
	EXCEPT
		СообщитьОшибку1С();
	ENDTRY;
	TRY	
    	ЗаписиSQL =  неопределено;
	EXCEPT
		СообщитьОшибку1С();
	ENDTRY;
	
	TRY		
		СоединениеSQL.Close();
		СоединениеSQL = неопределено;
	EXCEPT
		СообщитьОшибку1С();
	ENDTRY;
	TRY
		СоединениеSQL = неопределено;
	EXCEPT
		СообщитьОшибку1С();
	ENDTRY;
	
	СоединениеSQL = Новый ComObject("ADODB.Connection");
	ЗаписиSQL = Новый ComObject("ADODB.RecordSet");

	СоединениеSQL.Open(strADO);
	ЗаписиSQL = Новый ComObject("ADODB.RecordSet");
	ЗаписиSQL.CursorType =  3 ;
	ЗаписиSQL.ActiveConnection = СоединениеSQL;
	ЗаписиSQL.Open ("select version();",СоединениеSQL);
	СОобщить (ЗаписиSQL.Fields( 0 ).Value ); 
	RETURN ЗаписиSQL.RecordCount; //СоединениеSQL;
//Пока ЗаписиSQL.EOF= 0  Цикл	
ENDfunction