ПутьПодключения = "c:\";
	СтрокаПодключения 	= "Driver={Microsoft Text Driver (*.txt; *.csv)};"; 
	СтрокаПодключения 	= СтрокаПодключения + "Dbq=" + ПутьПодключения + ";"; 
	СтрокаПодключения 	= СтрокаПодключения + "Uid=" + "Extensions=txt" + ";"; 
	
	Conn = Новый COMОбъект("ADODB.Connection"); 
	Conn.ConnectionString = СтрокаПодключения; 
	Conn.Open();
	
	
	rst = Новый COMОбъект("ADODB.Recordset"); 
	
	Попытка
		rst.Open("Select * from file#txt", Conn); 
		
				
		Пока rst.EOF() =  0  Цикл
			
			textstr="";

			Для iCount =  0  По rst.Fields.Count- 1  Цикл
				
				textstr =  textstr   + "|" + rst.Fields(iCount).Value;
							
			КонецЦикла;
			Сообщить(textstr);
             rst.MoveNext();	
		КонецЦикла;
	Исключение
		rst.Close();
		Conn.Close();
		
		Предупреждение(ОписаниеОшибки());
	КонецПопытки;	

 544   995   622 | 30 . 12 . 1899   18 : 14 : 08 | 659   125   866 |