Процедура СоединитьсяСMySQL ()
Соединение = Новый COMОбъект("ADODB.Connection");
Соединение.ConnectionString ="DRIVER={MySQL ODBC 3.51 Driver};OPTION=3;DATABASE=Имя базы данных;PWD=Пароль;PORT=3306;SERVER=IP адрес сервера;UID=Пользователь БД;";
// инициализируем набор записей и комманду
НаборЗаписей = Новый COMОбъект("ADODB.Recordset");
Команда = Новый COMОбъект("ADODB.Command");
Попытка
Соединение.Open();
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
КонецПроцедуры
ТекстЗапроса = "SET NAMES 'cp1251'";
Команда.CommandText = ТекстЗапроса;
НаборЗаписей = Команда.Execute();